ADias wrote: > > Hi, > > I am using the code below to get a plot that will show me on the X axis > the number of clusters and on the Y axis the cluster average widths. > However I am getting this error: > > Error in summary(silhouette(cutree(d, x), dist(iris[, -5])))$si.summary : > $ operator is invalid for atomic vectors > > the code I am using is: > > avgs<-sapply(1:20,function(x) > summary(silhouette(cutree(d,x), > dist(iris[,-5])))$si.summary[4]) > > I think the problem is on the si.summary. > > What can I do to solve this problem? > > thank you > > Regards, > A Dias. >
Hi, I have made this script library(cluster) d<-hclust(dist(iris[,-5])) avgs<-sapply(1:20,function(x) summary(silhouette(cutree(d,x), dist(iris[,-5])))) str(avgs) I need $ avg.width but I don't know how to take that out from the object avgs. The mode from avgs is "list" but it does not work as a normal list. Any help would be apreciated. thanks A. Dias -- View this message in context: http://r.789695.n4.nabble.com/Silhouette-function-problem-tp3169027p3169522.html Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.