iT邦幫忙

0

R語言-任意欄位間的距離計算

大家好,小弟是個迴圈菜鳥,只懂最基本的邏輯,最近想看任兩個欄位之間的歐式距離(不包含自己跟自己),但是一直錯誤,想詢問解決方法,或是相關網站也行,謝謝大家~

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)
  }
}

1 個回答

1
obarisk
iT邦新手 5 級 ‧ 2021-04-19 09:09:02
最佳解答
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])
  }
}

感謝,已成功跑出來惹 謝謝~~~

我要發表回答

立即登入回答