R/rmatTrim.R

In fcros: A Method to Search for Differentially Expressed Genes and to Detect Recurrent Chromosomal Copy Number Aberrations

rmatTrim <- function(rvect, n, m, idx, m2) {
    .Call(C_rmat2, rvectC = as.double(rvect),
               nC = as.integer(n),
               mC = as.integer(m),
               idxC = as.integer(idx),
               m2C = as.integer(m2));
}