** DATA_605_Discussion_2_C24_pg353_Daniel_Thonn **
Find determinant by hand:
m1-hand= -2[(-2*2) - 4] -3[(-42) - (21)] - 2[(-43) - (2-2)] = 16 + 30 + 24 = 70
Find determinant with R:
m1 <- matrix(
c(-2, -4, 2, 3,-2,4, -2,1,2),
nrow = 3,
ncol = 3)
m1
## [,1] [,2] [,3]
## [1,] -2 3 -2
## [2,] -4 -2 1
## [3,] 2 4 2
det(m1)
## [1] 70
# det(m1) = 70
END