R语言 如何创建反对角矩阵

在这篇文章中，我们将讨论如何在R编程语言中创建一个反对角矩阵及其工作实例。

反对角线 矩阵 ：反对角线矩阵是一个正方形矩阵，除了反对角线上的条目外，所有条目都是零。也就是说，对角线从左下角到右上角。我们可以通过使用matrix()函数在R中创建一个矩阵。

矩阵函数 。

语法： matrix(vector)

其中，向量是输入向量。

我们可以通过使用以下语法来创建一个对角线矩阵。

diag(vector)[length(vector):1,]

diag(vector) **** 将设置对角线格式的元素。length(vector) 将获得矩阵大小。

例1 :

在这个例子中，我们将使用R编程语言中的diag()函数创建5*5的对角线矩阵。

# create a vector with 5 elements
vector1 = c(1, 2, 3, 4, 5)
 
# display anti-diagonal matrix
print(diag(vector1)[length(vector1):1, ])

输出 。

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

例2 :

在这个例子中，我们将用R语言中diag()函数传递的浮点数创建2*2的反对角矩阵。

# create a vector with 2 elements
vector1 = c(1, 2.5)
 
# display anti-diagonal matrix
print(diag(vector1)[length(vector1):1, ])

输出 。

     [,1] [,2]
[1,]    0  2.5
[2,]    1  0.0