在R中，求将一行的矩阵扩展成n行，每行都与第一行相同的矩阵的函数。

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

求将一行的矩阵扩展成n行，每行都与第一行相同的矩阵的函数。新学的R，找了几天都没找到。

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：天都

a<-c(1,2,3,4)
b<-rbind(a,a,a,a)  #扩充为n行，则为n个a，此例为4行

1. # Following @edithpr
   
2. a<-c(1,2,3,4)
   
3. rep(1, times = 4) %*% t(a) #change times value to have different number of rows

复制代码

> x=1:4
> n=4
第一种思路：矩阵自动填充
> matrix(x,nrow=n,ncol=length(x),byrow=T)
     [,1] [,2] [,3] [,4]
[1,]    1    2    3    4
[2,]    1    2    3    4
[3,]    1    2    3    4
[4,]    1    2    3    4
第二种思路：矩阵外积
> t(outer(x,rep(1,n)))
     [,1] [,2] [,3] [,4]
[1,]    1    2    3    4
[2,]    1    2    3    4
[3,]    1    2    3    4
[4,]    1    2    3    4