2 つのデータ フレームがあります。L 行でデータを学習し、T 行でデータをテストします。
要素間の距離 (ユークリッド、マンハッタン、コサインなど) を含む L*T 行列を計算したいと考えています。
これが私の見解です:
distance2 <- function (x1, x2) {
temp <- x1 - x2
sum(temp * temp)
}
m <- matrix(0,nrow(learnData),nrow(testData))
for(td in 1:nrow(testData)) {
for(ld in 1:nrow(learnData)) {
m[ld,td] <- distance2(testData[td,],learnData[ld,])
}
}
これは、よりコンパクトな「R」の方法で実行できると思います。何か案は?ありがとう。