x
Assign a new otu_table object to x orig_feat slot
orig_feat(x) <- value # S4 method for siamcat,otu_table orig_feat(x) <- value
an object of class siamcat-class
an object of class otu_table-class
none
data(siamcat_example) orig_feat(siamcat_example) <- orig_feat(siamcat_example)