R/mat_1_0.R

mat_1_0 <-
function(mat, e){
    mat2 <- ifelse(mat <= e, 1, 0)
    return(mat2)}
jeitziner/TTMap documentation built on May 23, 2019, 4:24 p.m.