R/SRM_OPEN_SINK.R

Defines functions SRM_OPEN_SINK

## File Name: SRM_OPEN_SINK.R
## File Version: 0.02

SRM_OPEN_SINK <- function(file, suffix="__SUMMARY.Rout")
{
    if (!is.null(file)){
        sink(paste0(file, suffix), split=TRUE)
    }
}
alexanderrobitzsch/srm documentation built on Nov. 5, 2022, 4:47 p.m.