comparison mixomics_plotvar_script.R @ 1:6595c17673cb draft

planemo upload for repository https://github.com/bilille/galaxy-mixomics-blocksplsda commit 7ed137ea956b8074c34d43a5e1d46b39ddef1482-dirty
author ppericard
date Wed, 12 Jun 2019 11:22:33 -0400
parents bea08702ed51
children
comparison
equal deleted inserted replaced
0:bea08702ed51 1:6595c17673cb
34 34
35 load(args$input_rdata) 35 load(args$input_rdata)
36 36
37 pdf(args$output_pdf) 37 pdf(args$output_pdf)
38 38
39 plotVar(mixomics_result, 39 # plotVar(mixomics_result,
40 legend = args$legend, 40 # legend = args$legend,
41 cutoff = args$cutoff) 41 # cutoff = args$cutoff)
42 42
43 for(k in 1:(length(mixomics_result$names[[3]])-1)) 43 for(k in 1:(length(mixomics_result$names[[3]])-1))
44 { 44 {
45 name_block = mixomics_result$names[[3]][k] 45 name_block = mixomics_result$names[[3]][k]
46 46