I just recently ran into the same issue when fitting models with lots of fixed effects and the correlation table was huge and really cluttered up the output. Looking at print.summary.lme()
(which isn't exported, so you have to use nlme:::print.summary.lme
) shows that the part comes from these lines:
if (nrow(x$tTable) > 1) {
corr <- x$corFixed
class(corr) <- "correlation"
print(corr, title = " Correlation:", ...)
}
as already pointed out by Ben. Instead of rewriting/replacing the entire function, we can also use a simple trick, replacing nlme:::print.correlation
(which is what is actually doing the printing of the correlation matrix) with our own print
method for objects of class correlation
. This can be done with:
assignInNamespace("print.correlation", function(x, title) return(), ns="nlme")
Now the correlation matrix will be omitted, but you get the remaining output.