R/output.format1.R

Defines functions output.format1

Documented in output.format1

## File Name: output.format1.R
## File Version: 1.07


output.format1 <- function( stringtype, label, rep.N=1, stringlength=70)
{
    h1 <- paste( rep("\n",  rep.N), collapse="")
    cat(h1)
    cat( paste( paste( rep( stringtype, stringlength ), collapse="") ) )
    cat(h1)
    cat(label)
    cat(h1)
    cat("\n")
}

Try the miceadds package in your browser

Any scripts or data that you put into this service are public.

miceadds documentation built on May 29, 2024, 11:05 a.m.