comparison FormatDream.R @ 2:ea02d47cd0c2 draft

Uploaded
author taoufik
date Sat, 26 Jan 2019 19:22:24 -0500
parents 7c746038ed87
children 6978113c6053
comparison
equal deleted inserted replaced
1:7c746038ed87 2:ea02d47cd0c2
11 training=as.matrix(training) 11 training=as.matrix(training)
12 training=training[,-1] 12 training=training[,-1]
13 rownames(training)<-training1$V1 13 rownames(training)<-training1$V1
14 training=t(training) 14 training=t(training)
15 training=training[,-c(4,7)] 15 training=training[,-c(4,7)]
16 training[,4]<-as.numeric(gsub("HR", "", training[,4]))
17 training[,4]=as.numeric(training[,4])
16 fwrite( 18 fwrite(
17 as.data.frame(training),"Format_Dream.tsv",sep="\t" 19 as.data.frame(training),"Format_Dream.tsv",sep="\t"
18 ) 20 )
19 21
20 22