# 역행렬이 존재하지 않는 행렬
>>> D = matrix(c(2, -5, 4, 1, -2, 1, 1, -4, 5), byrow=T, nrow=3)
# solve로 역행렬을 구하며 역행렬이 존재하지 않는 특이행렬(singular)로 결과 출력
>>> solve(D)
Error in solve.default(D) :
  Lapack routine dgesv: system is exactly singular: U[3,3] = 0

# D의 1행을 2배, 2행을 -3배의 합과 D의 3행을 비교
>>> D[1, ] * 2 + D[2, ] * -3   # D의 1행을 2배, 2행을 -3배의 합
[1] 1 -4 5
>>> D[3,]                      # D의 3행
[1] 1 -4 5

>>> det(A)                     # 0이 아니면 행들이 선형적 독립, 비특이(정칙)행렬
[1] 1
>>> det(D)
[1] 0