R反转矩阵与求解返回错误

Question

我正在学习 R 编程。

我正在尝试反转矩阵。以下是我尝试过的。

x <- matrix(1:16, 4, 4)
x
#      [,1] [,2] [,3] [,4]
# [1,]    1    5    9   13
# [2,]    2    6   10   14
# [3,]    3    7   11   15
# [4,]    4    8   12   16

solve(x)
# Error in solve.default(x) : 
#  Lapack routine dgesv: system is exactly singular: U[3,3] = 0

solve(x) %*% x
# Error in solve.default(x) : 
#  Lapack routine dgesv: system is exactly singular: U[3,3] = 0

x %*% solve(x)
# Error in solve.default(x) : 
#  Lapack routine dgesv: system is exactly singular: U[3,3] = 0

我不明白“奇异”是什么意思。根据这个link，据说如果solve没有第二个参数，它会反转第一个参数。

我完全糊涂了，所以需要一些例子来解释会很棒。

Answer 1

如果计算矩阵的determinant，则为0：

det(x)
[1] 0

根据定义，您的矩阵是不可逆的。但在尝试求平方矩阵求逆之前，首先应该先分析研究矩阵是否可逆。

你得到的奇异误差只是反映了矩阵是不可逆的。