Re: [問題]有關R程式
※ 引述《qwer098 (小六)》之銘言:
: 想請問一下...
: 如果說現在有一個3*3矩陣
: 假設是1 2 3
: 4 5 6
: 7 8 9
: 想要計算(1,1)*{(2,2)+(2,3)+(3,2)+(3,3)}+(1,2)*{(2,3)+(3,3)}+(2,1)*{(3,2)+(3,3)}+(2,2)*(3,3)
: 也就是 1 * * * 2 * * * * * * *
: * 5 6 * * 6 4 * * * 5 *
: * 8 9 * * 9 * 8 9 * * 9
: 1*(5+6+8+9) +2*(6+9) +4*(8+9) +5*9
: 如果想用R程式來寫...該如何表示
: 請知道的大大說明一下
: 謝謝^^
隨便寫的~答案應該是171沒錯吧~
a <- rbind(c(1,2,3),c(4,5,6),c(7,8,9))
ans <- 0
for(i in 1:2){
for(j in 1:2){
ans <- ans + a[i,j]*sum(a[-c(1:i),-c(1:j)])
}
}
a 換成任意 3X3 的矩陣應該都適用
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 152.2.149.157
討論串 (同標題文章)