R/tidysig_contexts_and_palettes.R

#' A list of the SBS96 mutational contexts
#'
sbs_96_contexts <- c("ACA","ACC","ACG","ACT","ACA","ACC",
                     "ACG","ACT", "ACA","ACC","ACG","ACT",
                     "ATA","ATC","ATG","ATT","ATA","ATC",
                     "ATG","ATT","ATA","ATC","ATG","ATT",
                     "CCA","CCC","CCG","CCT","CCA","CCC",
                     "CCG","CCT","CCA","CCC","CCG","CCT",
                     "CTA","CTC","CTG","CTT","CTA","CTC",
                     "CTG","CTT","CTA","CTC","CTG","CTT",
                     "GCA","GCC","GCG","GCT","GCA","GCC",
                     "GCG","GCT","GCA","GCC","GCG","GCT",
                     "GTA","GTC","GTG","GTT","GTA","GTC",
                     "GTG","GTT","GTA","GTC","GTG","GTT",
                     "TCA","TCC","TCG","TCT","TCA","TCC",
                     "TCG","TCT","TCA","TCC","TCG","TCT",
                     "TTA","TTC","TTG","TTT","TTA","TTC",
                     "TTG","TTT","TTA","TTC","TTG","TTT")
#' A list of the six possible (normalized) SBS96 mutational changes
sbs_96_changes <- c("C>A","C>G","C>T",
                    "T>A","T>C","T>G")

#' A color palette for SBS96 changes. Matches that of SigProfilerPlotting
sbs_96_changes_colors <- c(rgb(3/256,189/256,239/256),
                           rgb(1/256,1/256,1/256),
                           rgb(228/256,41/256,38/256),
                           rgb(203/256,202/256,202/256),
                           rgb(162/256,207/256,99/256),
                           rgb(236/256,199/256,197/256))

#' A color palette for ID83 changes. Matches that of SigProfilerPlotting
id_83_colors <- c(rgb(253/256,190/256,111/256), rgb(255/256,128/256,2/256), rgb(176/256,221/256,139/256), rgb(54/256,161/256,46/256), 
                  rgb(253/256,202/256,181/256), rgb(252/256,138/256,106/256), rgb(241/256,68/256,50/256), rgb(188/256,25/256,26/256),
                  rgb(208/256,225/256,242/256), rgb(148/256,196/256,223/256), rgb(74/256,152/256,201/256), rgb(23/256,100/256,171/256),
                  rgb(226/256,226/256,239/256), rgb(182/256,182/256,216/256), rgb(134/256,131/256,189/256), rgb(98/256,64/256,155/256))
edawson/tidysig documentation built on May 2, 2020, 5:33 a.m.