R/frequency_mult_100_q.R

In manzomonza/auto-ngs-annotation: Editing, Parsing And Annotation of ThermoFisher IonReporter and Genexus Precision NGS Results

#' Multiply by 100 or not
#'
#' @param IRoutput 
#'
#' @return
#' @export
#'
#' @examples
mult100 <- function(IRoutput){
  if ("allele_frequency" %in% colnames(IRoutput) | "allele_fraction" %in% colnames(IRoutput)){
    return(TRUE)
  }else{
    return(FALSE)
  }
}