Page 353 - C25

A <- matrix(c(3,2,2,-1,5,0,4,1,6), nrow=3, ncol=3) 

A
##      [,1] [,2] [,3]
## [1,]    3   -1    4
## [2,]    2    5    1
## [3,]    2    0    6
det(A)
## [1] 60