R/f1prime3.R

Defines functions f1prime3

f1prime3 <-
function(xprime, mprime, eprime=1){
    xprime[abs(xprime-apply(
    cbind(xprime, mprime), 1, function(x){
    mean(x[x > 0])})) > 2 * eprime] <- NA
    return(xprime);
}
chronchi/simpleTTMap documentation built on May 12, 2020, 12:38 p.m.