矩阵的qr分解，特征值计算，谱分解

计算矩阵的特征值特征向量，对矩阵进行谱分解，可以很容易转换成C++语言。

function [aBwucha]=pufenjie（A）
D=A;
m=size（A）;
E=eye（m（1））;
n=500;
for i=1:n
    [QR]=qrfenjie（A）;
    E=E*Q;
    A=R*Q;
end
a=diag（R）;
C=0;
for i=1:m（1）
    B（::i）=E（:i）*（E（:i））‘;
    C=C+a（i）* B（::i）;
end
wucha=C-D;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        244  2009-12-17 12:55  pufenjie.m

     文件        125  2009-12-18 14:01  tezhengzhi.m

     文件        358  2009-12-18 00:24  qrfenjie.m

----------- ---------  ---------- -----  ----

                  727                    3