oncokbR

{oncokbR} allows you to annotate genomic data sets using MSK’s OncoKB Precision Oncology Knowledge Base directly in R. The package wraps existing OncoKB API endpoints so R users can easily leverage the existing API to annotate data on mutations, copy number alterations and fusions.

This package is compatible with oncoKB data v3.16, but is subject to change as new versions are released. For more information on oncoKB, see [Chakravarty et al. 2017[(https://ascopubs.org/doi/full/10.1200/PO.17.00011).

Gao et al. Sci. Signal. 2013 Cerami et al. Cancer Discov. 2012

Installation

You can install the development version of oncokbR like so:

remotes::install_github('karissawhiting/oncokbR')

Annotate Data

Annotate Mutations:

library(oncokbR)
library(dplyr)
#> 
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#> 
#>     filter, lag
#> The following objects are masked from 'package:base':
#> 
#>     intersect, setdiff, setequal, union

Annotate MAF data with tumor type indicated for annotations on oncogenicity and oncoKB treatment levels:

blca_mutation <- oncokbR::blca_mutation %>%
  mutate(tumor_type = "BLCA")

annotated_tt <- annotate_mutations(mutations = blca_mutation[1:50,])

annotated_tt %>%
  select(oncogenic) %>% 
  table()
#> oncogenic
#> Likely Oncogenic        Oncogenic          Unknown 
#>                4                1               45

annotated_tt %>%
  select(treatments_level ) %>% 
  table()
#> treatments_level
#> LEVEL_3B 
#>        1

You can also annotated with no tumor type data for oncogenicity only:

blca_mutation <- oncokbR::blca_mutation

annotated_no_tt <- annotate_mutations(mutations = blca_mutation[1:50,])
#> ℹ No "tumor_type" found in data. No treatment-level annotations will be returned.

annotated_no_tt %>%
  select(oncogenic) %>% table()
#> oncogenic
#> Likely Oncogenic        Oncogenic          Unknown 
#>                4                1               45

Annotate CNA:

blca_cna <- blca_cna %>%
  mutate(tumor_type = "BLCA")


annotated <- annotate_cna(blca_cna[1:10,])
table(annotated$oncogenic)
#> 
#> Likely Oncogenic        Oncogenic          Unknown 
#>                3                6                1

Annotate Structural Variants:

blca_sv <- blca_sv %>%
  mutate(tumor_type = "BLCA")


annotated <- annotate_sv(blca_sv[1:10,])
table(annotated$oncogenic)
#> 
#> Likely Oncogenic        Oncogenic          Unknown 
#>                6                3                1