|
我得到的是实数特征向量
Real*8,ALLOCATABLE::VL(:,:),VR(:,:)
建议你用 lapack95 (即 MKL 中的 95 接口)有两个好处:
1. 参数简练
2. 编译器可以帮助你检查参数类型是否错误。
use lapack95
call GGEV( RA, RB, ALPHAR, ALPHAI, BETA, VL, VR )
Eigenvectors :
-0.81514 -0.18857 0.21030 1.00000 -0.99347
0.12299 -0.91484 -0.56855 -0.14668 0.04254
1.00000 0.32993 -0.46433 0.25260 -0.53968
-0.57390 -0.62498 1.00000 -0.94350 1.00000
0.25262 1.00000 -0.25022 -0.31995 -0.41905
matlab代码是
[V,D]=eig(A,B);
两者得到的一致。
|
|