R/pollenThreshold.R

pollenThreshold <- function(commM, perc){
  maxCon <- apply(commM, MARGIN=2, FUN=max)
  thres <- as.vector(perc * maxCon)
  result <- data.frame(colnames(commM), thres)
  return(result)
}
dinilu/paleoCLMs-package documentation built on May 15, 2019, 8:46 a.m.