我试图根据sapply的结果创建一个数据框。
变量拟合是nls对象的集合，所有对象都具有相同的名称。我能够创建一个数据帧，其中向量是系数，行是单独的拟合使用：
Coefficients <- sapply(fits,function(x){coef(x)},simplify = TRUE,USE.NAMES = TRUE)
Coefficients_df <- data.frame(t(Coefficients))
这很好用，当我做汇总（Coefficients_df）时，我得到了我所期望的，一个3列数据帧的正常摘要。
但我想要的是拥有一个包含每个拟合的系数和平均误差的数据帧。我可以用这个得到一个矩阵：
Coef_and_Error <- sapply(fits,function(x){c(coef(x),list(error = summary(x)$sigma))},simplify = TRUE,USE.NAMES = TRUE)
但是我没有使用这个获得正确的数据框：
Coef_and_Error_df <- data.frame(t(Coef_and_Error))
RStudio将此报告为数据帧（4个变量中的4105个障碍物），但是当我尝试查看数据帧的摘要时，它会发出一长串＆＃34; 1 -none-数字＆＃34;，充斥着控制台。
此外，当我点击＆＃34; Coef_and_Error_df＆＃34;在Rstudio中的三角形时，它没有显示我曾经使用的那种摘要。而不是每列有一行的简单摘要（例如k num 233 189 391 ......）它表示＆＃34; k：列表4105＆＃34;
我已经能够通过创建两个单独的矩阵来获得我想要的输出，将两者转换为数据帧并将另一个作为新向量添加到另一个，但这不是必需的。
我尝试使用＆＃34;追加＆＃34;而不是＆＃34; c＆＃34;结合价值观，但没有运气。