R/cleanVarG.r

In FREddyPro: Post-Processing EddyPro Full Output File

Defines functions cleanVarG

Documented in cleanVarG

cleanVarG <-
function (data, x, y = NULL, greaterThan = NULL) 
{
    clean <- which(data[[x]] >= greaterThan)
    if (is.null(y)) {
        data[[x]][clean] <- NA
    }
    else {
        data[[y]][clean] <- NA
    }
    return(data)
}

Try the FREddyPro package in your browser