用R语言 提取矩阵的左上和右下三角

假设我们有如下矩阵：

m <- matrix(1:9, nrow=3)
m
#      [,1] [,2] [,3]
# [1,]    1    4    7
# [2,]    2    5    8
# [3,]    3    6    9

我们可以使用以下代码提取左上三角：

triu(m)
#      [,1] [,2] [,3]
# [1,]    1    4    7
# [2,]    0    5    8
# [3,]    0    0    9

`triu`函数用于提取矩阵的上三角部分，即左上角为1的对角线及以上部分。

我们也可以使用以下代码提取右下三角：

tril(m)
#      [,1] [,2] [,3]
# [1,]    1    0    0
# [2,]    2    5    0
# [3,]    3    6    9

`tril`函数用于提取矩阵的下三角部分，即左下角为1的对角线及以下部分。