Skip to contents

Grab metadata table from a .tsv QIIME2-formatted file and format to tibble.

Usage

meta_data_qiime(tsv)

Arguments

tsv

Path to .tsv file in QIIME2 format.

Value

A 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>