R/asyr_get_template_name.R

Defines functions get_template_name

get_template_name<-function(X){
  if(xpathSApply(X,path="//IsUserTemplate",xmlValue)=='false'){
    return(NA)
  }else{
    basename(xpathSApply(X,path="//AssayTemplate",xmlValue))
  }
}
JARS3N/asyr documentation built on July 19, 2023, 9:19 p.m.