Простой для цикла для графика

Question

Итак, я создал матрицу B весов и вектор b порядка, в котором я хочу выбирать узлы.

Мои b=(3 5 1 2 4)

Теперь я хочу подвести веса, от вектора В, ребер я traversed.ie я хочу подвести

B[3,5]+B[5,1]+... 

Так что я сказал:

for(i in 1:n-1){ 
    s=sum(B[b[i],b[i+1]])  
} 
s 

, но все это производит выводится как например:

[1] 1 

Я сделал что-то глупое?

Answer 1

Вы можете попробовать:

sum(B[cbind(head(b,-1),b[-1])]) 

И FYI, ваша петля должна быть:

s = 0 
for(i in 1:n-1){ 
    s=s + B[b[i],b[i+1]]  
}