# NOT RUN {
download_ref(destination='/references',reference='silva_ko')
predicted_functions <- t4f(otu_table=DAVID$OTU,rows_are_taxa=FALSE,
tax_table=DAVID$TAX,reference='/references',
type='uproc',short=TRUE,cn_normalize=TRUE,
sample_normalize=FALSE,scalar=NULL,drop=TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab