R ^ 2函数用于多元线性回归

Question

我正在寻找适用于测试数据集上多元线性回归预测的R ^ 2值的实现。

我读了一些建议，为预测值重复lm（），然后从模型的摘要中读取R ^ 2值。但我不认为这是一个合理的解决方案。