Skip to contents

Table of distinct factors (sample annotation)

Usage

table_factors(pdata, file_name, sample_name, factor_keys)

Arguments

pdata

data.frame

file_name

character — file name column

sample_name

character — sample name column

factor_keys

character vector — factor column names

Examples


istar <- sim_lfq_data_peptide_config()
#> creating sampleName from file_name column
#> completing cases
#> completing cases done
#> setup done
lfq <- LFQData$new(istar$data, istar$config)
xx <- table_factors(lfq$get_data(), lfq$file_name(), lfq$sample_name(), lfq$factor_keys())
xt <- xx |> dplyr::group_by(!!!rlang::syms(lfq$factor_keys())) |>
 dplyr::summarize(n = dplyr::n())
stopifnot(all(xt$n == 4))