Prints summary and sink output in a File

summary_sink( object, file, append=FALSE, ...)

Arguments

object

Object for which a summary method is defined

file

File name

append

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.

Examples

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 )
}