R中nls模型的统计显着性

Question

我有一些不带截距的多线性模型，如下所示：

Y = a*X1 + b*X2 + c*X3

然而，这个模型是一个线性模型，但由于它没有截距，我们必须把它写成R中的非线性模型：

model1= nls(Y ~ a*X1+b*X2, data = trainDat, start = list(a = 1, b=1))

问题在于summary(model1)没有像F统计数据那样向我们提供模型的统计信息，因为它不是lm。 我们如何在R？

中报告这些模型的重要性