Hello
I am using the following command but not able to text the values on the graph
can
someone please make suggestions for improvement
#here is the command
loc_mds <- cmdscale(dist.r, k = 7, eig = TRUE)
loc_mds$eig
sum(abs(loc_mds$eig[1:2]))/sum(abs(loc_mds$eig))
sum((loc_mds$eig[1:2])^2)/sum((loc_mds$eig)^2)
x <-loc_mds$points[,1]
y <-loc_mds$points[,2]
plot(x, y, xlab="Coordinate 1",
ylab="Coordinate 2",
main="Metric MDS", type="n")
text(x, y, labels = row.names(dist.r), cex=.7)#the same as the last code
text(x, y, labels = colnames(dist.r))# I am not getting the drawing why?
With Kind regards
_________________________________________________________________
[[alternative HTML version deleted]]
______________________________________________
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.
