Grab metadata table from a .tsv QIIME2-formatted file and format to tibble.
meta_data_qiime.Rd
Grab metadata table from a .tsv QIIME2-formatted file and format to tibble.
Examples
fpath <- system.file("extdata/qiime", "sample-metadata.tsv", package = "bubbler")
meta_data_qiime(fpath)
#> # A tibble: 34 × 9
#> sample_id barcode_sequence body_site year month day subject
#> <fct> <fct> <fct> <dbl> <dbl> <dbl> <fct>
#> 1 L1S8 AGCTGACTAGTC gut 2008 10 28 subject-1
#> 2 L1S57 ACACACTATGGC gut 2009 1 20 subject-1
#> 3 L1S76 ACTACGTGTGGT gut 2009 2 17 subject-1
#> 4 L1S105 AGTGCGATGCGT gut 2009 3 17 subject-1
#> 5 L2S155 ACGATGCGACCA left palm 2009 1 20 subject-1
#> 6 L2S175 AGCTATCCACGA left palm 2009 2 17 subject-1
#> 7 L2S204 ATGCAGCTCAGT left palm 2009 3 17 subject-1
#> 8 L2S222 CACGTGACATGT left palm 2009 4 14 subject-1
#> 9 L3S242 ACAGTTGCGCGA right palm 2008 10 28 subject-1
#> 10 L3S294 CACGACAGGCTA right palm 2009 1 20 subject-1
#> # ℹ 24 more rows
#> # ℹ 2 more variables: reported_antibiotic_usage <fct>,
#> # days_since_experiment_start <dbl>