** DATA_605_Discussion_2_C21_pg353_Response_Daniel_Thonn **

Find determinant by hand:

m1-hand= 2-18 = -16

=

Find determinant with R:

m1 <- matrix(
  c(1,6, 3,2),
  nrow = 2,
  ncol = 2)

m1
##      [,1] [,2]
## [1,]    1    3
## [2,]    6    2
det(m1)
## [1] -16
# det(m1) = -16

Find determinant with R:

m2 <- matrix(
  c(1,3, 6,2),
  nrow = 2,
  ncol = 2)

m2
##      [,1] [,2]
## [1,]    1    6
## [2,]    3    2
det(m2)
## [1] -16
# det(m2) = -16

END