作者maoc (懋牌貨)
看板Statistics
標題Re: [問題] [R]identity matrix
時間Sat Apr 18 09:42:54 2009
※ 引述《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
1F：推 KnightX:高招！其中 I <- diag(3) 就好了～！ 04/18 10:08