\[ \begin{bmatrix} 1 & 3\\ 6 & 2 \end{bmatrix} \]

# C21 on Page 353
# Doing the computations by hand, nd the determinant of the matrix below.

determinant_hand = 1 * 2 - 3 * 6
determinant_hand
## [1] -16
# Using function

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

det(x)
## [1] -16