R/estpabin.R

Defines functions estpabin

estpabin <- function(vec) {
  vec <- round(vec)
  m <- length(vec)
  freq <- table(vec)
  freq <- as.numeric(freq/m)
  return(freq)

}
abx56/mrmr documentation built on May 30, 2019, 7:19 a.m.