R/set_threshold.R

In Meiomap/SureTypeSCR: Library for (single-cell) SNP array processing

Defines functions set_threshold

Documented in set_threshold

set_threshold <- function(.data,clfcol,threshold)
{
  .data %>%
    mutate(gtype= case_when(eval(parse(text = clfcol))>threshold~ gtype,
                            TRUE ~ 'NC'))
}