diff findDMR/findDMR.R @ 5:715d03e1fd83 draft

Uploaded
author testtool
date Mon, 20 Mar 2017 06:51:59 -0400
parents 0d1957068766
children a0e3f4efb03f
line wrap: on
line diff
--- a/findDMR/findDMR.R	Mon Feb 20 08:32:26 2017 -0500
+++ b/findDMR/findDMR.R	Mon Mar 20 06:51:59 2017 -0400
@@ -12,11 +12,10 @@
 clusterSize = as.numeric(args[5])
 DMR = args[6]
 
-#GSMTable<-("test-data/input.csv")
 TAB = fread(GSMTable)
-#IlmnTable <- ("test-data/IlmnTable.csv")
+
 IlmnInfo = fread(platform)
-#gmTable<-("test-data/gmTable.csv")
+
 gmSet = fread(Data_Table)
 
 # bumphunter Run with processed data
@@ -35,7 +34,7 @@
 DMRInfo <- data.table(DMRTable$chr, DMRTable$start, DMRTable$end)
 
 
-#DMR<-("test-data/DMR.bed")
+
 write.table(
   DMRInfo,
   DMR,