Mercurial > repos > fubar > rglasso_1_9_8

comparison test-data/genTest.R @ 19:8c31e2aac682 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author iuc
date Wed, 29 Apr 2015 12:07:11 -0400
parents 445cb45d1bc0
children
comparison
equal deleted inserted replaced
18:23155115ed77 19:8c31e2aac682
1 ids=c(1:50)
2 io1 = rep(c(0,0,0,0,1),10)
3 ip2 = runif(50)+0.1
4 ip2[which(ip2>1.0)] = 1.0
5 ip1 = runif(50)+0.05
6 ip1[which(ip1>1.0)] = 1.0
7 df=data.frame(id=ids,input1_observed=io1,input1_predicted=ip1,input2_predicted=ip2)
8 fout='test-data/nri_test1.xls'
9 write.table(df,file=fout, quote=FALSE, sep="\t",row.names=F)
10 # planemo test --job_output_files /home/rlazarus/tmp --test_output /home/rlazarus/tmp/startest/foo.html --update_test_data --galaxy_root /home/rlazarus/galaxy rg_nri.xml