Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/80.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
将向量转换为矩阵R_R_Vector_Matrix - Fatal编程技术网

将向量转换为矩阵R

将向量转换为矩阵R,r,vector,matrix,R,Vector,Matrix,我有一个大小为n的向量vec和一个满是0(矩阵)的矩阵mixi。我想用向量vec的第一I个条目替换矩阵的第一列,然后用向量vec的条目I+1到2I-1替换矩阵m的第二列的第一I-1个条目,然后用向量vec的条目2I到3I-2替换矩阵m的第三列的第一I-3个条目,依此类推。在R中有没有快速的方法? 谢谢 也许将来我们可以有一个 这似乎与您上面的口头描述相符: n <- 5 m <- matrix(0,n,n) m[((n+1)-col(m))>=row(m)] <- 1:(

我有一个大小为n的向量vec和一个满是0(矩阵)的矩阵mixi。我想用向量vec的第一I个条目替换矩阵的第一列,然后用向量vec的条目I+1到2I-1替换矩阵m的第二列的第一I-1个条目,然后用向量vec的条目2I到3I-2替换矩阵m的第三列的第一I-3个条目,依此类推。在R中有没有快速的方法?
谢谢

也许将来我们可以有一个

这似乎与您上面的口头描述相符:

n <- 5
m <- matrix(0,n,n)
m[((n+1)-col(m))>=row(m)] <- 1:(n*(n+1)/2)
m
##      [,1] [,2] [,3] [,4] [,5]
## [1,]    1    6   10   13   15
## [2,]    2    7   11   14    0
## [3,]    3    8   12    0    0
## [4,]    4    9    0    0    0
## [5,]    5    0    0    0    0

n是长度匹配。n=prod{i=1}^{i}几乎是wokrs,它只是不取列的第一个条目,而是取列的最后一个条目。噢,它是n=sum{i=1}^{i}我走吧!m[(列(m)+行(m))