## The function 'osink' is currently defined as
function (file, suffix){
if (!is.null(file)) {
base::sink(paste0(file, suffix), split=TRUE)
}
}
## The function 'csink' is currently defined as
function (file){
if (!is.null(file)) {
base::sink()
}
}
Run the code above in your browser using DataLab