summary and sink Output in a Filesummary_sink.RdPrints summary and sink output in a File
summary_sink( object, file, append=FALSE, ...)Object for which a summary method is defined
File name
Optional logical indicating whether console output should
be appended to an already existing file. See argument append in
base::sink.
Further arguments passed to summary.
if (FALSE) {
#############################################################################
# EXAMPLE 1: summary_sink example for lm function
#############################################################################
#--- simulate some data
set.seed(997)
N <- 200
x <- stats::rnorm( N )
y <- .4 * x + stats::rnorm(N, sd=.5 )
#--- fit a linear model and sink summary into a file
mod1 <- stats::lm( y ~ x )
CDM::summary_sink(mod1, file="my_model")
#--- fit a second model and append it to file
mod2 <- stats::lm( y ~ x + I(x^2) )
CDM::summary_sink(mod2, file="my_model", append=TRUE )
}