## ----setup, include=FALSE-----------------------------------------------------
knitr::opts_chunk$set(echo = TRUE)

## ----message = FALSE----------------------------------------------------------
library(ExperimentHub)
eh <- ExperimentHub()
query(eh, c("epimutacionsData"))

## ----message = FALSE, eval = FALSE--------------------------------------------
# candRegsGR <- eh[["EH6692"]]

## ----message = FALSE----------------------------------------------------------
reference_panel <- eh[["EH6691"]]

## ----message = FALSE----------------------------------------------------------
methy <- eh[["EH6690"]]

## ----message = FALSE, eval = FALSE--------------------------------------------
# library(minfi)
# baseDir <- system.file("extdata", package = "epimutacionsData")
# targets <- read.metharray.sheet(baseDir)

## ----sessionInfo--------------------------------------------------------------
sessionInfo()