2012-06-03 27 views

回答

6

與行

f=c(1,22,33,44,55,66) 

獲取其長度

然後使基質

R=matrix(rep(f,lf), 
     ncol=lf, 
     byrow=T) 

給出:

R 
    [,1] [,2] [,3] [,4] [,5] 
[1,] 1 33 44 55 66 
[2,] 1 33 44 55 66 
[3,] 1 33 44 55 66 
[4,] 1 33 44 55 66 
[5,] 1 33 44 55 66 
3

這是一個可能性:

mymat <- do.call(rbind, rep(list(f), 10)) 
5
R <- matrix(f, 1)[rep(1,n), ] 
    [,1] [,2] [,3] [,4] [,5] 
[1,] 1 2 3 4 5 
[2,] 1 2 3 4 5 
[3,] 1 2 3 4 5 
[4,] 1 2 3 4 5 
[5,] 1 2 3 4 5 

甚至更​​緊湊:

R <- rbind(f)[rep(1,n), ] 
    [,1] [,2] [,3] [,4] [,5] 
f 1 2 3 4 5 
f 1 2 3 4 5 
f 1 2 3 4 5 
f 1 2 3 4 5 
f 1 2 3 4 5 

需要注意的是矩陣的rownames不必是唯一的,不像data.frames的情況。