用R语言求典型相关分析中的特征根,会的大佬看过来啊!!

图片说明
典型相关分析中,本来应该是A、B矩阵的特征根求出来是一样的,为什么我这里不仅值不一样,连个数也不一样,不知道哪里出问题了,有没有大佬帮我看看!!!
很急呜呜呜呜

https://blog.csdn.net/gavin_cdc/article/details/102579353