# HG changeset patch
# User taoufik
# Date 1548548544 18000
# Node ID ea02d47cd0c29dacb7027d547fc53e7873cf4e69
# Parent  7c746038ed87d2ac8a6804f1ec884d7b12d28070
Uploaded

diff -r 7c746038ed87 -r ea02d47cd0c2 FormatDream.R
--- a/FormatDream.R	Sat Jan 26 19:02:54 2019 -0500
+++ b/FormatDream.R	Sat Jan 26 19:22:24 2019 -0500
@@ -13,6 +13,8 @@
 rownames(training)<-training1$V1
 training=t(training)
 training=training[,-c(4,7)]
+training[,4]<-as.numeric(gsub("HR", "", training[,4]))
+training[,4]=as.numeric(training[,4])
 fwrite(
   as.data.frame(training),"Format_Dream.tsv",sep="\t"
 )