是否有方法打印模型摘要的特定部分?

如果你只想得到这些线路,你可以使用 capture.output 然后选择相关行。

temp = capture.output(summary(model))
Start = grep("Random effects", temp)
End   = grep("Number of obs", temp)
print(unname(temp[Start:End]))

[1] "Random effects:"                                  
[2] " Groups       Name        Variance Std.Dev. Corr "
[3] " Petal.Length (Intercept) 2.16667  1.4720        "
[4] "              Petal.Width 0.62156  0.7884   -0.91"
[5] " Residual                 0.08241  0.2871        "
[6] "Number of obs: 150, groups:  Petal.Length, 43"