> c     [,1] [,2] [,3] [,4][1,]    1    4    7   10[2,]    2    5    8   11[3,]    3    6    9   12> eigen(c)eigen() decomposition$`values`[1]  3.620937e+01 -2.209373e+00  1.599839e-15  7.166935e-16$vectors          [,1]        [,2]       [,3]       [,4][1,] 0.4140028  0.82289268 -0.5477226  0.1125155[2,] 0.4688206  0.42193991  0.7302967  0.2495210[3,] 0.5236384  0.02098714  0.1825742 -0.8365883[4,] 0.5784562 -0.37996563 -0.3651484  0.4745519