2010-09-19 R 行列 R A(行列)のn乗 n<-3 A<-matrix(c(1:(n^2)),n,n) x<-eigen(A) #固有値と固有ベクトル D<-diag(x$value) #対角行列 P<-x$vectors #固有ベクトルが行列になっている A^3 #これは要素を3乗した行列 A%*%A%*%A P%*%D^3%*%solve(P) #対角化して計算 eigen(A): $valueと$vectoresがある diag(v): 対角行列 solve(A): 逆行列 上記記事の修正についてこちらを参照