test_that("PPI network gets computed", {
  library(msigdb)
  data('hgsc')
  ppihs = getIMEX("hs", version = "2022-02-03")
  ppimm = getIMEX("mm", version = "2022-02-03")
  grps = list('early' = 'HALLMARK_ESTROGEN_RESPONSE_EARLY', 'late' = 'HALLMARK_ESTROGEN_RESPONSE_LATE')
  
  expect_s3_class(plotMsigPPI(ppihs, hgsc, grps), 'ggplot')
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.