如何计算直接在R

问题描述

我在lavaan中一直使用rsquare函数，但是找不到估计提取的平均方差的方法。

函数inspect()给出rsquare的值：

inspect(fit,what="rsquare")

但是如何直接在R中计算Average Variance Extracted？

AVE = sumeof(R^2)/N的公式。我是R的新手，所以无法开始自己编写函数。

任何指导或帮助将不胜感激。谢谢。

编辑：

似乎semTools包现在提供了一个功能，该功能可以基于拉凡人估计的模型来计算AVE：

reliability()：通过系数ω计算因子的可靠性值。

但是，当比较从可靠性函数生成的值时，它与我手动生成的AVE值不匹配。我还关注了以下链接：

https://rdrr.io/cran/semTools/man/reliability.html

https://stats.stackexchange.com/questions/97013/calculating-average-variance-extracted-ave-in-r-for-checking-discriminant-vali

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）