|
11
|
1 first<-getGEO(TAB$ID[1],getGPL=FALSE)
|
|
|
2 require("BiocGenerics",quietly = TRUE)
|
|
|
3 require("data.table",quietly = TRUE)
|
|
|
4 require("minfi",quietly = TRUE)
|
|
|
5 require("ChIPseeker",quietly = TRUE)
|
|
|
6 require("ChIPpeakAnno",quietly = TRUE)
|
|
|
7 require("TxDb.Hsapiens.UCSC.hg19.knownGene",quietly = TRUE)
|
|
|
8 require("FDb.InfiniumMethylation.hg19",quietly = TRUE)
|
|
|
9 require("GEOquery",quietly = TRUE)
|
|
|
10 require("rtracklayer",quietly = TRUE)
|
|
|
11 install.packages("formatR")
|
|
|
12 library(formatR)
|
|
|
13 getwd()
|
|
|
14 tidy_eval("/Users/katarzynamurat/Desktop/galaxy/tools/getGEO")
|
|
|
15 tidy_eval("/Users/katarzynamurat/Desktop/galaxy/tools/getGEO")
|
|
|
16 source('~/Desktop/galaxy/tools/findDMR/findDMR.R')
|
|
|
17 source('~/Desktop/galaxy/tools/findDMR/findDMR.R')
|
