请问一下，这个相似矩阵怎么求MDS啊。求R代码。

niutyut

require(graphics)
setwd("d:")
eurodist1<- read.csv("book2.csv")  
loc <- cmdscale(eurodist1,eig = TRUE)
x <- loc[, 1]
y <- -loc[, 2]
plot(x, y, type = "n", xlab = "", ylab = "", asp = 1, axes = FALSE,
text(x, y, rownames(loc), cex = 0.6)
以上代码出现如下错误。
> loc <- cmdscale(eurodist1,eig = TRUE)
Error in FUN(left, right) : non-numeric argument to binary operator

seaholly

我以为求MD5K呢，看错了，不好意思