Originally from Nott et al. (2019). Specifically: aay0793-Nott-Table-S6.xlsx.

get_NOTT2019_superenhancer_interactome()

Examples

if (FALSE) {
NOTT2019_superenhancer_interactome <- data.table::data.table(
    readxl::read_excel(
        file.path(
            "~/Desktop/Fine_Mapping/echolocatoR",
            "annotations/NOTT2019/aay0793-Nott-Table-S6.xlsx"
        ),
        skip = 2
    )
)

#### piggyback ####
tmp <- file.path(tempdir(), "NOTT2019_superenhancer_interactome.tsv.gz")
data.table::fwrite(NOTT2019_superenhancer_interactome, tmp, sep = "\t")
piggyback::pb_upload(
    file = tmp,
    repo = "RajLabMSSM/echoannot"
)
}