min_dense_file = system.file("extdata", "min_dense_otu_table.biom", package = "biom")
min_sparse_file = system.file("extdata", "min_sparse_otu_table.biom", package = "biom")
rich_dense_file = system.file("extdata", "rich_dense_otu_table.biom", package = "biom")
rich_sparse_file = system.file("extdata", "rich_sparse_otu_table.biom", package = "biom")
min_dense_file = system.file("extdata", "min_dense_otu_table.biom", package = "biom")
rich_dense_char = system.file("extdata", "rich_dense_char.biom", package = "biom")
rich_sparse_char = system.file("extdata", "rich_sparse_char.biom", package = "biom")
# Read the biom-format files
x1 = read_biom(min_dense_file)
x2 = read_biom(min_sparse_file)
x3 = read_biom(rich_dense_file)
x4 = read_biom(rich_sparse_file)
x5 = read_biom(rich_dense_char)
x6 = read_biom(rich_sparse_char)
# Extract the data matrices
biom_data(x1)
biom_data(x2)
biom_data(x3)
biom_data(x4)
biom_data(x5)
biom_data(x6)
Run the code above in your browser using DataLab