Re: [問題] [R]identity matrix

看板Statistics作者 (懋牌貨)時間17年前 (2009/04/18 09:42), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串5/5 (看更多)
※ 引述《paiyeu (微笑台灣)》之銘言: : [,1] [,2] [,3] : [1,] 1 0 0 : [2,] 0 1 0 : [3,] 0 0 1 : [4,] 1 0 0 : [5,] 0 1 0 : [6,] 0 0 1 : [7,] 1 0 0 : [8,] 0 1 0 : [9,] 0 0 1 : . . . : . . . : . . . one <- rep(1,10) I <- diag(rep(1,3)) out <- one %x% I ## %x% 是 Kronecker product -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.116.52.78

04/18 10:08, , 1F
高招!其中 I <- diag(3) 就好了~!
04/18 10:08, 1F
文章代碼(AID): #19wJ0VTU (Statistics)
文章代碼(AID): #19wJ0VTU (Statistics)