data-raw/for.generating.package.data/get.signature.params.R

In steverozen/SynSigGen: Create Catalogs of Synthetic Mutational Spectra

# Warning, some signatures present in only one sample, dropping: SBS43 SBS53
SBS96.real.exposures <- PCAWG7::exposure$PCAWG$SBS96
SBS96.sig.params <-
  GetSynSigParamsFromExposuresOld(exposures = SBS96.real.exposures,
                                  verbose = 1,
                                  distribution = "neg.binom")

DBS78.real.exposures <- PCAWG7::exposure$PCAWG$DBS78
DBS78.sig.params <-
  GetSynSigParamsFromExposuresOld(exposures = DBS78.real.exposures,
                                  verbose = 1,
                                  distribution = "neg.binom")

ID.real.exposures <- PCAWG7::exposure$PCAWG$ID
ID.sig.params <-
  GetSynSigParamsFromExposuresOld(exposures = ID.real.exposures,
                                  verbose = 1,
                                  distribution = "neg.binom")

signature.params <- list(SBS96 = SBS96.sig.params,
                         DBS78 = DBS78.sig.params,
                         ID = ID.sig.params)
usethis::use_data(signature.params)