Reads the SampleAnalysisResults.json.gz file output from the TSO500 workflow.
Examples
x <- system.file("extdata/tso/sample705_SampleAnalysisResults.json.gz", package = "dracarys")
d <- tso_sar_read(x)
options(pillar.max_dec_width = 99) # for scientific notation switchoff
d |>
dplyr::filter(name == "sar_qc") |>
dplyr::select(data) |>
tidyr::unnest(data) |>
tidyr::pivot_longer(dplyr::everything())
#> # A tibble: 24 × 2
#> name value
#> <chr> <dbl>
#> 1 contamination_score 61
#> 2 contamination_p_value 1
#> 3 median_exon_coverage 59
#> 4 pct_exon_1000x 0
#> 5 gene_scaled_mad 0.114
#> 6 median_bin_count_cnv_target 0.6
#> 7 total_pf_reads 1088930210
#> 8 mean_family_size 449
#> 9 median_target_coverage 55
#> 10 pct_chimeric_reads 0.81
#> # ℹ 14 more rows