Mercurial > repos > iuc > ggplot2_point

comparison ggplot_point.xml @ 6:87908c76ca8d draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
"planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/ggplot2 commit dba267a10fe1a97ebb49b4b6a441b0cc56678da5"
author iuc
date Thu, 30 Apr 2020 04:41:52 -0400
parents 9cec81e1b90e
children e3a675da7fd0
comparison
equal deleted inserted replaced
5:9cec81e1b90e 6:87908c76ca8d
1 <tool id="ggplot2_point" name="Scatterplot w ggplot2" version="@VERSION@+galaxy1"> 1 <tool id="ggplot2_point" name="Scatterplot with ggplot2" version="@VERSION@+galaxy2" profile="18.01">
2 <macros> 2 <macros>
3 <import>macros.xml</import> 3 <import>macros.xml</import>
4 </macros> 4 </macros>
5 <expand macro="requirements"> 5 <expand macro="requirements">
6 <requirement type="package" version="1.2.1">r-svglite</requirement> 6 <requirement type="package" version="1.2.1">r-svglite</requirement>
35 color_scale = NULL 35 color_scale = NULL
36 #if $adv.points.pointoptions == "default" 36 #if $adv.points.pointoptions == "default"
37 gg_point = geom_point(size=1, alpha=1, gg_factor) 37 gg_point = geom_point(size=1, alpha=1, gg_factor)
38 gg_line = geom_line(size=1, alpha=1, gg_factor) 38 gg_line = geom_line(size=1, alpha=1, gg_factor)
39 #else 39 #else
40 gg_point = geom_point(size='$adv.points.size', alpha='$adv.points.alpha', colour='$adv.points.pointcolor') 40 gg_point = geom_point(size$adv.points.size, alpha=$adv.points.alpha, colour='$adv.points.pointcolor')
41 gg_line = geom_line(size='$adv.points.size', alpha='$adv.points.alpha', colour='$adv.points.pointcolor') 41 gg_line = geom_line(size=$adv.points.size, alpha=$adv.points.alpha, colour='$adv.points.pointcolor')
42 #end if 42 #end if
43 43
44 names(input)[$adv.factor.factorcol] <- "factor" 44 names(input)[$adv.factor.factorcol] <- "factor"
45 45
46 #elif $adv.factor.factoring == "Single" 46 #elif $adv.factor.factoring == "Single"
49 49
50 #if $adv.points.pointoptions == "default" 50 #if $adv.points.pointoptions == "default"
51 gg_point = geom_point(size=1, alpha=1, gg_factor) 51 gg_point = geom_point(size=1, alpha=1, gg_factor)
52 gg_line = geom_line(size=1, alpha=1, gg_factor) 52 gg_line = geom_line(size=1, alpha=1, gg_factor)
53 #else 53 #else
54 gg_point = geom_point(size=$adv.points.size, alpha='$adv.points.alpha', gg_factor) 54 gg_point = geom_point(size=$adv.points.size, alpha=$adv.points.alpha, gg_factor)
55 gg_line = geom_line(size=$adv.points.size, alpha='$adv.points.alpha', gg_factor) 55 gg_line = geom_line(size=$adv.points.size, alpha=$adv.points.alpha, gg_factor)
56 #end if 56 #end if
57 57
58 #if $adv.factor.colororder == 1 58 #if $adv.factor.colororder == 1
59 color_scale = scale_colour_hue(direction='$adv.factor.colororder') 59 color_scale = scale_colour_hue(direction='$adv.factor.colororder')
60 #else 60 #else
69 69
70 #if $adv.points.pointoptions == "default" 70 #if $adv.points.pointoptions == "default"
71 gg_point = geom_point(size=1, alpha=1, gg_factor) 71 gg_point = geom_point(size=1, alpha=1, gg_factor)
72 gg_line = geom_line(size=1, alpha=1, gg_factor) 72 gg_line = geom_line(size=1, alpha=1, gg_factor)
73 #else 73 #else
74 gg_point = geom_point(size=$adv.points.size, alpha='$adv.points.alpha', colour='$adv.points.pointcolor') 74 gg_point = geom_point(size=$adv.points.size, alpha=$adv.points.alpha, colour='$adv.points.pointcolor')
75 gg_line = geom_line(size=$adv.points.size, alpha='$adv.points.alpha', colour='$adv.points.pointcolor') 75 gg_line = geom_line(size=$adv.points.size, alpha=$adv.points.alpha, colour='$adv.points.pointcolor')
76 #end if 76 #end if
77 #end if 77 #end if
78 78
79 @TRANSFORM@ 79 @TRANSFORM@
80 80
81 ##axis label custization 81 ##axis label custization
82 #if $adv.axis_title_customization.axis_customization == "default" 82 #if $adv.axis_title_customization.axis_customization == "default"
83 gg_axistitle = theme(axis.title = element_text(color = NULL, size = NULL, face = NULL)) 83 gg_axistitle = theme(axis.title = element_text(color = NULL, size = NULL, face = NULL))
84 #else 84 #else
85 gg_axistitle = theme(axis.title = element_text(color = '$adv.color', size = '$adv.size', face = '$adv.face')) 85 gg_axistitle = theme(axis.title = element_text(color = '$adv.color', size = $adv.size, face = '$adv.face'))
86 #end if 86 #end if
87 87
88 ##axis text(tick) custization 88 ##axis text(tick) custization
89 #if $adv.axis_text_customization.axis_customization == "default" 89 #if $adv.axis_text_customization.axis_customization == "default"
90 gg_axistext = theme(axis.text = element_text(color = NULL, size = NULL, face = NULL)) 90 gg_axistext = theme(axis.text = element_text(color = NULL, size = NULL, face = NULL))
91 #else 91 #else
92 gg_axistext = theme(axis.text = element_text(color = '$adv.color', size = '$adv.size', face = '$adv.face')) 92 gg_axistext = theme(axis.text = element_text(color = '$adv.color', size = $adv.size, face = '$adv.face'))
93 #end if 93 #end if
94 94
95 ##plot title custimization 95 ##plot title custimization
96 #if $adv.plot_title_customization.axis_customization == "default" 96 #if $adv.plot_title_customization.axis_customization == "default"
97 gg_plottitle = theme(plot.title = element_text(color = NULL, size = NULL, face = NULL)) 97 gg_plottitle = theme(plot.title = element_text(color = NULL, size = NULL, face = NULL))
98 #else 98 #else
99 gg_plottitle = theme(plot.title = element_text(color='$adv.color', size='$adv.size', face='$adv.face')) 99 gg_plottitle = theme(plot.title = element_text(color='$adv.color', size=$adv.size, face='$adv.face'))
100 #end if 100 #end if
101 101
102 ## grid line customization 102 ## grid line customization
103 #if $adv.gridlinecust == "default" 103 #if $adv.gridlinecust == "default"
104 gg_gridline = NULL 104 gg_gridline = NULL