私はRを初めて使用するので、いくつかの情報が欠けている可能性がありますが、この動作に頭を悩ませることはできません:
neighbors<-function(topo,usr){
n = NULL
for (i in 1:length(topo[,1])){
if (topo[i,1] == usr){
n <- append(n,topo[i,2])
}
}
return(n)
}
どこtopo
に次の構造があります:
2l59mm6jc8pae32vilsr99ljp0 40iml67hpjsr8o1oo7f4oin706
3359mm6jc8pae32vilsr99ljp0 411iml67hpjsr8o1oo7f4oin706
...
私がやりたいことは、最初の列をループして、最初の列usr
からの一致を確認し、2 番目の列の内容を に追加してn
返すことです。
何が起こるかというと、出力にいくつかの数値が表示されます:19
と16
. デバッグしようとすると、次の答えが得られました。
[1] vi4govpcqjnf6imquadf9ae4f0
20 Levels: 2l59mm6jc8pae32vilsr99ljp0 40iml67hpjsr8o1oo7f4oin706 ... vvqp3im2g3r90ibv56817asfq7
[1] 19
[1] nb9b1vh6ocaqsmgp8dv1s22f61
20 Levels: 2l59mm6jc8pae32vilsr99ljp0 40iml67hpjsr8o1oo7f4oin706 ... vvqp3im2g3r90ibv56817asfq7
[1] 19 16
[1] 19 16
私は何を間違っていますか?