R/check_peakfiles.R

Defines functions check_peakfiles

check_peakfiles <- function(peakfiles){
  if(all(unlist(lapply(peakfiles,length))==0)){
    stopper("No peaks found in any of the peakfiles.")
  }
}
neurogenomics/EpiCompare documentation built on Oct. 18, 2024, 11:04 p.m.