按特定顺序将R中的向量转换为下三角矩阵

Question

我有一个向量，其中元素的顺序很重要，比方说

x <- c(1,2,3,4)

我想将我的向量排列成具有特定顺序的下三角矩阵，其中每一行包含向量的前一个元素。我的目标是获得以下矩阵

lower_diag_matrix   
       [,1] [,2] [,3] [,4]
[1,]    4    0    0    0
[2,]    3    4    0    0
[3,]    2    3    4    0
[4,]    1    2    3    4

我知道我可以使用 lower_diag_matrix[lower.tri(lower_diag_matrix,diag = T)]<-some_vector 填充下三角区域，但我似乎无法弄清楚用于填充下三角区域的矢量的排列方式。实际上，数字是随机的，所以我需要一种通用的方法来填充该区域。

Answer 1

这是一种方法：

x <- c(2, 4, 7)
M <- matrix(0, length(x), length(x))
M[lower.tri(M, diag = TRUE)] <- rev(x)[sequence(length(x):1)]
M
#      [,1] [,2] [,3]
# [1,]    7    0    0
# [2,]    4    7    0
# [3,]    2    4    7

按特定顺序将R中的向量转换为下三角矩阵

Converting a vector in R into a lower triangular matrix in specific order

r

vector

matrix

triangular