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

Arguments

x

an object of class siamcat-class

value

an object of class otu_table-class

Value

none

Examples

data(siamcat_example) orig_feat(siamcat_example) <- orig_feat(siamcat_example)