R/collect_asyr_qc.R

Defines functions collect_asyr_qc

collect_asyr_qc<-function(dir=choose.dir()){
  require(dplyr)
    lapply(list.files(dir,pattern="asyr$",full.names=T),XML::xmlTreeParse,useInternalNodes=T)%>%
    lapply(.,munge_inst_qc) %>%
    bind_rows()
}
JARS3N/outliers documentation built on July 29, 2023, 8:46 p.m.