大家好，小弟是個迴圈菜鳥，只懂最基本的邏輯，最近想看任兩個欄位之間的歐式距離(不包含自己跟自己)，但是一直錯誤，想詢問解決方法，或是相關網站也行，謝謝大家~
data(iris)
library(TSdist)
EuclideanDistance(iris$Sepal.Length, iris$Sepal.Width)
loop <- iris[,1:4]
ncol(loop)
out = data.frame()
for(i in 1:ncol(loop)) {
for (j in 1:ncol(loop)) {
a=EuclideanDistance(i,j)
out[[i,j]] = as.data.frame(a)
final = subset(out[[i,j]] < 100)
}
}
已邀請的邦友 {{ invite_list.length }}/5
NCol <- ncol(loop)
out <- matrix(NA, NCol, NCol)
for (i in seq_length(NCol)) {
for (i in seq_length(NCol)) {
out[i, j] <- EuclidenDistance(loop[, i], loop[, j])
}
}
iThome鐵人賽
看影片追技術