conditions <- caroline::nv(factor(x=1:2, labels=c('ambient','plusFe')) ,c('ref','obs'))
manta.path <- system.file("extdata","PapaGO-BLAST.results-diatoms.Rdata", package="manta")
load(manta.path)
x$mm <- normfact2absTMM(x=x, pair=conditions)
Run the code above in your browser using DataLab