最近在学习多元统计分析的主成分分析时,发现需要经常计算矩阵的特征值和特征向量,自己就找了下用R来做计算的函数。
我们可以用sigen()函数来计算特征对。

#创建一个矩阵
a <- matrix(c(11,sqrt(3)/2,3/2,sqrt(3)/2,21/4,5*sqrt(3)/4,3/2,5*sqrt(3)/4,31/4),
            ncol=3,
            nrow=3
            )
#使用函数eigen()计算特征对
ev <- eigen(a)
#访问列表val项,即特征值
ev$val
#访问列表vec项,即特征向量
ev$vec

Out:
在这里插入图片描述
a矩阵:
在这里插入图片描述
ev:
在这里插入图片描述

Logo

有“AI”的1024 = 2048,欢迎大家加入2048 AI社区

更多推荐