Beezer: A First Course in Linear Algebra, Page:388

Prob C11 Find the characteristic polynomial of the matrix

m <- matrix(c(3, 2, 1, 0,1,1,1,2,0), nrow = 3, ncol = 3, byrow=T)
m
##      [,1] [,2] [,3]
## [1,]    3    2    1
## [2,]    0    1    1
## [3,]    1    2    0
eigen(m)
## eigen() decomposition
## $values
## [1]  3.618034  1.381966 -1.000000
## 
## $vectors
##           [,1]       [,2]          [,3]
## [1,] 0.9363100  0.8087826 -5.551115e-17
## [2,] 0.1253069 -0.5493940 -4.472136e-01
## [3,] 0.3280576 -0.2098498  8.944272e-01