R/frm_partable_thresholds.R

Defines functions frm_partable_thresholds

## File Name: frm_partable_thresholds.R
## File Version: 0.041

frm_partable_thresholds <- function(partable)
{
    dfr <- partable
    ind <- grep( 'difflogthresh', paste(dfr$parm) )
    if (length(ind) > 0 ){
        dfr$parm <- paste(dfr$parm)
        dfr[ind, 'ON'] <- 0
        dfr[ind, 'parm'] <- gsub( ' ON ', ' ', dfr[ind, 'parm'] )
    }
    return(dfr)
}

Try the mdmb package in your browser

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

mdmb documentation built on Sept. 11, 2024, 5:23 p.m.