#To run input data
core_1 <- CoreMicrobiome(
otu_table = demo_otu,
tax_table = demo_tax,
metadata_table = demo_md,
filter_type = "occupancy_fun_filter", #Or "abundance_fun_filter", Or "combined_filter"
percent = 0.5,
method = "css", # Or "srs", "rrarefy", "tmm", "tmmwsp", "rle", "upperquartile", "none"
beta_diversity_method = "jaccard",
top_percentage = 10 # Adjust the percentage as needed for core/non-core OTUs
)
#To view the line plot
visualize(filtered_otu = core_1[["final_otu_table_bef_filter"]],
min_count_val = 5,
max_count_val = 25,
count_val_interval = 5,
prop = 0.1,
min_total_count = 10,
method = "srs",
top_percentage =10)
Run the code above in your browser using DataLab