R/chartOpts.R

Defines functions add2chartOpts

## chartOpts.R
## Karl W Broman

# add an option to chartOpts, if it's not already present
add2chartOpts <-
function(chartOpts, ...)
{
    dots <- list(...)
    for(newarg in names(dots)) {
        if(!(newarg %in% names(chartOpts)))
          chartOpts <- c(chartOpts, dots[newarg])
    }
    chartOpts
}
kbroman/qtlcharts documentation built on May 10, 2023, 6:07 p.m.