做因子分析反馈错误:
> cor <- read.table("data.txt", header = T)
>
> factanal(factors=5,covmat=cor)
错误于factanal(factors = 5, covmat = cor) : 'covmat'这个协方差串列有错
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
1.00 0.24 0.04 0.31 0.09 0.23 -0.11 0.27 0.55 0.35 0.28 0.34 0.37 0.47 0.59
0.24 1.00 0.12 0.38 0.43 0.37 0.35 0.48 0.14 0.34 0.55 0.51 0.51 0.28 0.38
0.04 0.12 1.00 0.00 0.00 0.08 -0.03 0.05 0.27 0.09 0.04 0.20 0.29 -0.32 0.14
0.31 0.38 0.00 1.00 0.30 0.48 0.65 0.35 0.14 0.39 0.35 0.50 0.61 0.69 0.33
0.09 0.43 0.00 0.30 1.00 0.81 0.41 0.82 0.02 0.70 0.04 0.72 0.68 0.48 0.25
0.23 0.37 0.08 0.48 0.81 1.00 0.36 0.83 0.15 0.70 0.76 0.88 0.78 0.53 0.42
-0.11 0.35 -0.03 0.65 0.41 0.36 1.00 0.23 -0.16 0.28 0.21 0.39 0.42 0.45 0.00
0.27 0.48 0.05 0.35 0.82 0.83 0.23 1.00 0.23 0.81 0.86 0.77 0.73 0.55 0.55
0.55 0.14 0.27 0.14 0.02 0.15 -0.16 0.23 1.00 0.34 0.20 0.30 0.35 0.21 0.69
0.35 0.34 0.09 0.39 0.70 0.70 0.28 0.81 0.34 1.00 0.78 0.71 0.79 0.61 0.62
0.28 0.55 0.04 0.35 0.04 0.76 0.21 0.86 0.20 0.78 1.00 0.78 0.77 0.55 0.43
0.34 0.51 0.20 0.50 0.72 0.88 0.39 0.77 0.30 0.71 0.78 1.00 0.88 0.55 0.53
0.37 0.51 0.29 0.61 0.68 0.78 0.42 0.73 0.35 0.79 0.77 0.88 1.00 0.54 0.57
0.47 0.28 -0.32 0.69 0.48 0.53 0.45 0.55 0.21 0.61 0.55 0.55 0.54 1.00 0.40
0.59 0.38 0.14 0.33 0.25 0.42 0.00 0.55 0.69 0.62 0.43 0.53 0.57 0.40 1.00