knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
library(KRSA) library(knitr) library(tidyverse)
You can perform gene set enrichment analysis using Enrichr by using either a set of PamChip peptide IDs or gene symbols.
example_peptide_list <- c("ACM5_494_506", "ADDB_696_708", "ADRB2_338_350", "ANXA1_209_221") enrichr_results <- krsa_enrichr(peptides = example_peptide_list) head(enrichr_results, 10)
Alternatively, the input coould be gene symbols instead of peptide ids:
enrichr_results_genes <- krsa_enrichr(genes = c("AKT1", "AKT2", "AKTe")) head(enrichr_results_genes, 10)
The results could be plotted using the krsa_enrichr_plot function:
krsa_enrichr_plot(enrichr_results)
Showing only top 5 terms per library: `
krsa_enrichr_plot(enrichr_results, terms_to_plot = 5)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.