R/assay.R

 assay<-function(X){
    AL<-list("Gain"=axml::newGain,"Ksv"=axml::Ksv)
    AL[[X$assay]](X) %>%
      merge(.,data.frame(sn=X$sn,Inst=X$Inst,Lot=X$Lot))
  }
JARS3N/axml documentation built on May 7, 2019, 6:47 a.m.