Mercurial > repos > taoufik > dream_challenge

comparison FormatDream.R @ 1:7c746038ed87 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author taoufik
date Sat, 26 Jan 2019 19:02:54 -0500
parents
children ea02d47cd0c2
comparison
equal deleted inserted replaced
0:4eb60f0a4fdb 1:7c746038ed87
1 log_file=file("Read_Dataset.log", open = "wt")
2 sink(log_file)
3 sink(log_file, type = "out")
4 suppressWarnings(suppressMessages(library("batch")))
5 suppressWarnings(suppressMessages(library(data.table)))
6 listArguments = parseCommandArgs(evaluate=FALSE)
7 datasetsource = listArguments[["datasetsource"]]
8
9 training=fread(datasetsource,header = T)
10 training1=fread(datasetsource,header = T)
11 training=as.matrix(training)
12 training=training[,-1]
13 rownames(training)<-training1$V1
14 training=t(training)
15 training=training[,-c(4,7)]
16 fwrite(
17 as.data.frame(training),"Format_Dream.tsv",sep="\t"
18 )
19
20
21
22
23
24
25
26