Mercurial > repos > devteam > cummerbund
annotate test-data/maplot.txt @ 5:78fcfc04fcfe draft
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
author | devteam |
---|---|
date | Thu, 23 Feb 2017 20:24:03 -0500 |
parents | 587c425b4e76 |
children |
rev | line source |
---|---|
0
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
1 > get_features <- function(myGenes, f="gene") { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
2 + if (f == "isoforms") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
3 + return(isoforms(myGenes)) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
4 + else if (f == "tss") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
5 + return(TSS(myGenes)) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
6 + else if (f == "cds") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
7 + return(CDS(myGenes)) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
8 + else |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
9 + return(myGenes) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
10 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
11 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
12 > ## Main Function ## |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
13 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
14 > library(argparse) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
15 Loading required package: proto |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
16 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
17 > parser <- ArgumentParser(description='Create a plot with cummeRbund') |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
18 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
19 > parser$add_argument('--type', dest='plotType', default='Density', required=TRUE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
20 > parser$add_argument('--height', dest='height', type='integer', default=960, required=TRUE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
21 > parser$add_argument('--width', dest='width', type='integer', default=1280, required=TRUE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
22 > parser$add_argument('--outfile', dest='filename', default="plot-unknown-0.png", required=TRUE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
23 > parser$add_argument('--input', dest='input_database', default="cuffData.db", required=TRUE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
24 > parser$add_argument('--smooth', dest='smooth', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
25 > parser$add_argument('--gene_selector', dest='gene_selector', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
26 > parser$add_argument('--replicates', dest='replicates', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
27 > parser$add_argument('--labcol', dest='labcol', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
28 > parser$add_argument('--labrow', dest='labrow', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
29 > parser$add_argument('--border', dest='border', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
30 > parser$add_argument('--summary', dest='summary', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
31 > parser$add_argument('--count', dest='count', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
32 > parser$add_argument('--error_bars', dest='error_bars', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
33 > parser$add_argument('--log10', dest='log10', action="store_true", default=FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
34 > parser$add_argument('--features', dest='features', action="store", default="genes") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
35 > parser$add_argument('--clustering', dest='clustering', action="store", default="both") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
36 > parser$add_argument('--iter_max', dest='iter_max', action="store") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
37 > parser$add_argument('--genes', dest='genes', action="append") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
38 > parser$add_argument('--k', dest='k', action="store") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
39 > parser$add_argument('--x', dest='x', action="store") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
40 > parser$add_argument('--y', dest='y', action="store") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
41 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
42 > args <- parser$parse_args() |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
43 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
44 > ## Load cummeRbund library |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
45 > library("cummeRbund") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
46 Loading required package: BiocGenerics |
5
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
47 Loading required package: methods |
0
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
48 Loading required package: parallel |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
49 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
50 Attaching package: ‘BiocGenerics’ |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
51 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
52 The following objects are masked from ‘package:parallel’: |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
53 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
54 clusterApply, clusterApplyLB, clusterCall, clusterEvalQ, |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
55 clusterExport, clusterMap, parApply, parCapply, parLapply, |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
56 parLapplyLB, parRapply, parSapply, parSapplyLB |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
57 |
5
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
58 The following objects are masked from ‘package:stats’: |
0
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
59 |
5
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
60 IQR, mad, xtabs |
0
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
61 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
62 The following objects are masked from ‘package:base’: |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
63 |
5
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
64 anyDuplicated, append, as.data.frame, cbind, colnames, do.call, |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
65 duplicated, eval, evalq, Filter, Find, get, grep, grepl, intersect, |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
66 is.unsorted, lapply, lengths, Map, mapply, match, mget, order, |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
67 paste, pmax, pmax.int, pmin, pmin.int, Position, rank, rbind, |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
68 Reduce, rownames, sapply, setdiff, sort, table, tapply, union, |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
69 unique, unsplit, which, which.max, which.min |
0
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
70 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
71 Loading required package: RSQLite |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
72 Loading required package: DBI |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
73 Loading required package: ggplot2 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
74 Loading required package: reshape2 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
75 Loading required package: fastcluster |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
76 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
77 Attaching package: ‘fastcluster’ |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
78 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
79 The following object is masked from ‘package:stats’: |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
80 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
81 hclust |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
82 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
83 Loading required package: rtracklayer |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
84 Loading required package: GenomicRanges |
5
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
85 Loading required package: stats4 |
0
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
86 Loading required package: S4Vectors |
5
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
87 |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
88 Attaching package: ‘S4Vectors’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
89 |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
90 The following objects are masked from ‘package:base’: |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
91 |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
92 colMeans, colSums, expand.grid, rowMeans, rowSums |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
93 |
0
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
94 Loading required package: IRanges |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
95 Loading required package: GenomeInfoDb |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
96 Loading required package: Gviz |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
97 Loading required package: grid |
5
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
98 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
99 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
100 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
101 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
102 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
103 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
104 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
105 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
106 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
107 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
108 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
109 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
110 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
111 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
112 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
113 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
114 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
115 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
116 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
117 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
118 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
119 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
120 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
121 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
122 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
123 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
124 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
125 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
126 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
127 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
128 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
129 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
130 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
131 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
132 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
133 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
134 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
135 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
136 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
137 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
138 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
139 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
140 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
141 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
142 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
143 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
144 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
145 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
146 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
147 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
148 Warning: namespace ‘ensembldb’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
149 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
150 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
151 by .GlobalEnv when processing object ‘plot.index’ |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
152 Warning: namespace ‘AnnotationHub’ is not available and has been replaced |
78fcfc04fcfe
planemo upload for repository https://github.com/galaxyproject/tools-devteam/tree/master/tools/cummerbund commit f3f0bef4a450aafab3c6b05a27647471f93b22f3
devteam
parents:
0
diff
changeset
|
153 by .GlobalEnv when processing object ‘plot.index’ |
0
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
154 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
155 Attaching package: ‘cummeRbund’ |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
156 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
157 The following object is masked from ‘package:GenomicRanges’: |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
158 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
159 promoters |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
160 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
161 The following object is masked from ‘package:IRanges’: |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
162 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
163 promoters |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
164 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
165 The following object is masked from ‘package:BiocGenerics’: |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
166 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
167 conditions |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
168 |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
169 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
170 > ## Initialize cuff object |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
171 > cuff <- readCufflinks(dir = "", dbFile = args$input_database, rebuild = FALSE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
172 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
173 > ## Print out info |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
174 > print(cuff) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
175 CuffSet instance with: |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
176 2 samples |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
177 87 genes |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
178 90 isoforms |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
179 88 TSS |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
180 0 CDS |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
181 87 promoters |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
182 88 splicing |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
183 0 relCDS |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
184 > sink("cuffdb_info.txt") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
185 > print(cuff) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
186 > print("SAMPLES:") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
187 > samples(cuff) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
188 > print("REPLICATES:") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
189 > replicates(cuff) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
190 > print("FEATURES:") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
191 > print(annotation(genes(cuff))) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
192 > cat(annotation(genes(cuff))[[1]],sep=",") |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
193 > sink() |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
194 > |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
195 > png(filename = args$filename, width = args$width, height = args$height, type=c('cairo-png')) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
196 > tryCatch({ |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
197 + if (args$plotType == 'density') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
198 + csDensity(genes(cuff), replicates=args$replicates, logMode=args$log10) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
199 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
200 + else if (args$plotType == 'boxplot') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
201 + csBoxplot(genes(cuff), replicates=args$replicates, logMode=args$log10) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
202 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
203 + else if (args$plotType == 'mds') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
204 + MDSplot(genes(cuff), replicates=args$replicates) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
205 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
206 + else if (args$plotType == 'pca') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
207 + PCAplot(genes(cuff), "PC1", "PC2", replicates=args$replicates) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
208 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
209 + else if (args$plotType == 'dendrogram') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
210 + csDendro(genes(cuff), replicates=args$replicates) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
211 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
212 + else if (args$plotType == 'scatter') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
213 + if (args$gene_selector) { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
214 + myGenes <- getGenes(cuff, args$genes) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
215 + csScatter(get_features(myGenes, args$features), args$x, args$y, smooth=args$smooth, logMode=args$log10) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
216 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
217 + else { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
218 + csScatter(genes(cuff), args$x, args$y, smooth=args$smooth, logMode=args$log10) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
219 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
220 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
221 + else if (args$plotType == 'volcano') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
222 + if (args$gene_selector) { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
223 + myGenes <- get_features(getGenes(cuff, args$genes), args$features) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
224 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
225 + else { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
226 + myGenes <- genes(cuff) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
227 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
228 + csVolcano(myGenes, args$x, args$y) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
229 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
230 + else if (args$plotType == 'heatmap') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
231 + if (args$gene_selector) { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
232 + myGenes <- getGenes(cuff, args$genes) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
233 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
234 + else { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
235 + myGenes <- getGenes(cuff,annotation(genes(cuff))[[1]]) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
236 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
237 + csHeatmap(get_features(myGenes, args$features), clustering=args$clustering, labCol=args$labcol, labRow=args$labrow, border=args$border, logMode=args$log10) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
238 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
239 + else if (args$plotType == 'cluster') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
240 + myGenes <- getGenes(cuff, args$genes) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
241 + csCluster(get_features(myGenes, args$features), k=args$k) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
242 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
243 + else if (args$plotType == 'dispersion') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
244 + dispersionPlot(genes(cuff)) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
245 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
246 + else if (args$plotType == 'fpkmSCV') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
247 + fpkmSCVPlot(genes(cuff)) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
248 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
249 + else if (args$plotType == 'scatterMatrix') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
250 + csScatterMatrix(genes(cuff)) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
251 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
252 + else if (args$plotType == 'expressionplot') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
253 + myGenes <- getGenes(cuff, args$genes) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
254 + expressionPlot(get_features(myGenes, args$features), drawSummary=args$summary, showErrorbars=args$error_bars, replicates=args$replicates) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
255 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
256 + else if (args$plotType == 'expressionbarplot') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
257 + myGeneId <- args$genes |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
258 + myGenes <- getGenes(cuff, myGeneId) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
259 + expressionBarplot(get_features(myGenes, args$features), showErrorbars=args$error_bars, replicates=args$replicates) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
260 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
261 + else if (args$plotType == 'mds') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
262 + MDSplot(genes(cuff),replicates=args$replicates) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
263 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
264 + else if (args$plotType == 'pca') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
265 + PCAplot(genes(cuff),"PC1","PC2", replicates=args$replicates) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
266 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
267 + else if (args$plotType == 'maplot') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
268 + MAplot(genes(cuff), args$x, args$y, useCount=args$count) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
269 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
270 + else if (args$plotType == 'genetrack') { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
271 + myGene <- getGene(cuff, args$genes) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
272 + plotTracks(makeGeneRegionTrack(myGene)) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
273 + } |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
274 + },error = function(e) { |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
275 + write(paste("Failed:", e, sep=" "), stderr()) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
276 + q("no", 1, TRUE) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
277 + }) |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
278 Warning message: |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
279 Removed 52 rows containing missing values (geom_point). |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
280 > devname = dev.off() |
587c425b4e76
Initial commit with version 1.0.0 of the cummeRbund wrapper.
devteam
parents:
diff
changeset
|
281 > |