R中的錯誤：餘弦相似度和MDS

Question

我使用包'lsa'中的cosine（）計算餘弦相似度。這裏有三個測試向量：

d <- data.frame(c(-1,1,0,-1,1,1,-1,1,0),c(-1,1,1,1,-1,1,-1,0,1),c(0,0,1,0,-1,-1,0,1,-1)) 
colnames(d) <- c("vector1","vector2","vector3") 
d_dist <- cosine(as.matrix(d)) 

現在，我想要做的降維與cmdscale和情節後，作爲散點圖：

fit <- cmdscale(d_dist,k=2) 

x <- fit[,2] 
y <- fit[,1] 
plot(x,y) 

但我一直得到警告在cmdscale（d_dist， k = 2）：前2個特徵值中只有0個> 0 [從德語翻譯]和一個空的擬合對象。

我在做什麼錯？非常感謝你的幫助！

Answer 1

輸入應該是距離矩陣。例如：

d_dist <- 1-d_dist 
fit <- cmdscale(d_dist,k=2) 

x <- fit[,2] 
y <- fit[,1] 
plot(x,y)