連接一組點與作爲R線

目前我使用以下腳本連接一組點與作爲R線

dat <- matrix(runif(1000*99),99,1000) 
dat <- rbind(rep(0.1,1000),dat) 
out <- cmdscale(dist(dat),k = 2) 
plot(out) 
points(out[1,1],out[1,2],col = "red")

enter image description here

基於上述數字產生一數字，我希望連接該紅點與其它點，該怎麼做？

來源

2012-03-09 user288609

「連接」是什麼意思？你可以做'行（out）'，它按照它們生成的順序連接這些點。或者你的意思是y值？ – 2012-03-09 02:47:36

你是什麼意思？你想要所有的點通過線連接，或者你只是想要一個點連接到其他點？哪點？ – Andrew 2012-03-09 02:49:02

他說了些什麼。我已經投票結束，直到我們澄清... – Spacedman 2012-03-09 08:23:06

如果你想所有的點連接到該紅點，你可以嘗試...

segments(out[1,1],out[1,2],out[,1],out[,2])

enter image description here

調整印刷和圖形特徵的順序可以使它一點點容易看太：

dat <- matrix(runif(1000*99),99,1000) 
dat <- rbind(rep(0.1,1000),dat) 
out <- cmdscale(dist(dat),k = 2) 
plot(out,type="n") 
segments(out[1,1],out[1,2],out[,1],out[,2],col="#cccccc") 
points(out,col="black",pch=20) 
points(out[1,1],out[1,2],col = "red",pch=20)

enter image description here

來源

2012-03-09 03:02:19 thelatemail

連接一組點與作爲R線

回答

相關問題