Reads an annotation file, validates the control level exists, and adds a CONTROL column (C for control, T for treatment).
Examples
csv <- system.file("application/contrasts/scenario1_single_factor.csv",
package = "prolfquapp")
result <- run_contrasts_single(csv, control = "WT")
#> Rows: 9 Columns: 3
#> ── Column specification ────────────────────────────────────────────────────────
#> Delimiter: ","
#> chr (3): file, name, group
#>
#> ℹ Use `spec()` to retrieve the full column specification for this data.
#> ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
table(result$group, result$CONTROL)
#>
#> C T
#> KO 0 3
#> OE 0 3
#> WT 3 0