Saving a plot made with ggplot2 as an SVG is straightforward using the ggsave function. 

However, additional package(s) beyond ggplot2 may be required, such as svglite. 

Some sample code:

        require(&quot;ggplot2&quot;)
    #some sample data
        head(diamonds) 
    #to see actually what will be plotted and compare 
        qplot(clarity, data=diamonds, fill=cut, geom=&quot;bar&quot;)
    #save the plot in a variable image to be able to export to svg
        image=qplot(clarity, data=diamonds, fill=cut, geom=&quot;bar&quot;)
    #This actually save the plot in a image
        ggsave(file=&quot;test.svg&quot;, plot=image, width=10, height=8)

Hope it works for you.

  [1]: http://www.google.com/url?sa=t&amp;rct=j&amp;q=&amp;esrc=s&amp;source=web&amp;cd=1&amp;cad=rja&amp;ved=0CCAQFjAA&amp;url=http://www.ceb-institute.org/bbs/wp-content/uploads/2011/09/handout_ggplot2.pdf&amp;ei=htJhUJyHJo-1hAem_IHQBw&amp;usg=AFQjCNHnQpwiIL9vra5pMg25kdX2X7_zAA

I am trying to build a small site with the server push functionality on Flask micro-web framework, but I did not know if there is a framework to work with directly. 

I used [Juggernaut][1], but it seems to be not working with [redis-py][2] in current version, and Juggernaut has been deprecated recently.

Does anyone has a suggestion with my case?


  [1]: http://flask.pocoo.org/snippets/80/
  [2]: https://github.com/andymccurdy/redis-py

How to implement server push in Flask framework?

I have an element with the ID `history` type of `TableView`. How can I find and access this object if I have the instance  of `Scene scene`?

How to find an element with an ID in JavaFX?

I want to save a stacked area plot (Plot example with code can be found [here][1]) made with **ggplot2** as **SVG**. Tried it with the **Cairo package** but the outcome is bad.

    library(ggplot2)
    library(grid)
    library(Cairo)
    ...
        
    #png(output_file, width=800, height=400)
    Cairo(800,400,file=paste(output_file, &quot;.svg&quot;, sep=&quot;&quot;),type=&quot;svg&quot;,bg=&quot;transparent&quot;,pointsize=8, units=&quot;px&quot;,dpi=400)
    
    gt &lt;- ggplot_gtable(ggplot_build(p))
    gt$layout$clip[gt$layout$name==&quot;panel&quot;] &lt;- &quot;off&quot;
    grid.draw(gt)
        
    dev.off()


  [1]: https://stackoverflow.com/questions/12196529/how-to-name-sections-on-x-axis-that-are-seperated-by-vertical-lines-in-an-r-plot

How to save a plot made with ggplot2 as SVG

I want to save a stacked area plot (Plot example with code can be found <a href="https://stackoverflow.com/questions/12196529/how-to-name-sections-on-x-axis-that-are-seperated-by-vertical-lines-in-an-r-plot" target="_blank" rel="noopener noreferrer">here</a>) made with ggplot2 as SVG. Tried it with the Cairo package but the outcome is bad.
<pre><code class="hljs language-scss">library(ggplot2)
library(grid)
library(Cairo)
...
 
#png(output_file, width=800, height=400)
Cairo(800,400,file=paste(output_file, ".svg", sep=""),type="svg",bg="transparent",pointsize=8, units="px",dpi=400)

gt &#x3C;- ggplot_gtable(ggplot_build(p))
gt$layout$clip[gt$layout$name=="panel"] &#x3C;- "off"
grid.draw(gt)
 
dev.off()
</code></pre>

I&#39;d like to reorder columns in my `data.table` `x`, given a character vector of column names, `neworder`:

    library(data.table)
    x &lt;- data.table(a = 1:3, b = 3:1, c = runif(3))
    neworder &lt;- c(&quot;c&quot;, &quot;b&quot;, &quot;a&quot;)

Obviously I could do:

    x[ , neworder, with = FALSE]
    # or
    x[ , ..neworder]
    #            c b a
    # 1: 0.8476623 3 1
    # 2: 0.4787768 2 2
    # 3: 0.3570803 1 3

but that would require copying the entire dataset again. Is there another way to do this?




How to reorder data.table columns (without copying)

i am having trouble understanding the difference between the R function `rank` and the R function `order`.  they seem to produce the same output:

    &gt; rank(c(10,30,20,50,40))
    [1] 1 3 2 5 4
    &gt; order(c(10,30,20,50,40))
    [1] 1 3 2 5 4
   
Could somebody shed some light on this for me?
Thanks 

rank and order in R

I have a file containing a certain number of lines. Each line looks like this:

&lt;!-- language: none --&gt;

    TF_list_to_test10004/Nus_k0.345_t0.1_e0.1.adj:PKMYT1

I would like to remove all before &quot;:&quot; character in order  to retain only PKMYT1 that is a gene name. 
Since I&#39;m not an expert in regex scripting can anyone help me to do this using Unix (sed or awk) or in R?

Remove all text before colon

I would like to add a table of the coordinates of highlighted site in a ggplot.

Using a previous [question][1] as example data:

    set.seed(1)
    mydata &lt;- data.frame(a=1:50, b=rnorm(50))
    ggplot(mydata,aes(x=a,y=b)) + 
        geom_point(colour=&quot;blue&quot;) + 
        geom_point(data=mydata[10:13, ], aes(x=a, y=b), colour=&quot;red&quot;, size=5)

![enter image description here][2]
  
I would like to add the following table to the lower right-hand corner of the plot within the plotting region. Any advice?

    table&lt;-cbind(sites=c(&quot;site 1&quot;,&quot;site 2&quot;,&quot;site 3&quot;,&quot;site 4&quot;),mydata[10:13,])
    table

        sites  a          b
        site 1 10 -0.3053884
        site 2 11  1.5117812
        site 3 12  0.3898432
        site 4 13 -0.6212406


  [1]: https://stackoverflow.com/questions/11467965/r-ggplot2-highlighting-selected-points-and-strange-behavior
  [2]: http://i.stack.imgur.com/mGKNl.png

Adding table within the plotting region of a ggplot in r

I have a data frame named &quot;mydata&quot; that looks like this this: &lt;br/&gt;


       A  B  C   D 
    1. 5  4  4   4 
    2. 5  4  4   4 
    3. 5  4  4   4 
    4. 5  4  4   4 
    5. 5  4  4   4 
    6. 5  4  4   4 
    7. 5  4  4   4 

I&#39;d like to delete row 2,4,6. For example, like this:

       A  B  C   D
    1. 5  4  4  4 
    3. 5  4  4  4 
    5. 5  4  4  4 
    7. 5  4  4  4 




How do I delete rows in a data frame?

Let&#39;s say I have the SVG file:

    &lt;svg width=&quot;1024&quot; height=&quot;768&quot; xmlns=&quot;http://www.w3.org/2000/svg&quot; xmlns:xlink=&quot;http://www.w3.org/1999/xlink&quot;&gt;
    	&lt;text x=&#39;20&#39; y=&#39;60&#39; style=&quot;font-size: 60px&quot;&gt;b&lt;/text&gt;
    	&lt;text x=&#39;100&#39; y=&#39;60&#39; style=&quot;font-size: 60px&quot;&gt;a&lt;/text&gt;
    &lt;/svg&gt;

I want to somehow align the top of `a` and `b`. Actually, I want my positioning to be according to the `roofline` instead of `baseline`!

vertical alignment of text element in SVG

I am trying to choose the right technology to use for updating a project that basically renders thousands of points in a zoomable, pannable graph. The current implementation, using Protovis, is underperformant. Check it out here:

http://www.planethunters.org/classify

There are about 2000 points when fully zoomed out. Try using the handles on the bottom to zoom in a bit, and drag it to pan around. You will see that it is quite choppy and your CPU usage probably goes up to 100% on one core unless you have a really fast computer. Each change to the focus area calls a redraw to protovis which is pretty darn slow and is worse with more points drawn.

I would like to make some updates to the interface as well as change the underlying visualization technology to be more responsive with animation and interaction. From the following article, it seems like the choice is between another SVG-based library, or a canvas-based one:

http://www.sitepoint.com/how-to-choose-between-canvas-and-svg/

[d3.js][1], which grew out of Protovis, is SVG-based and is [supposed to be better at rendering animations][2]. However, I&#39;m dubious as to how much better and what its performance ceiling is. For that reason, I&#39;m also considering a more complete overhaul using a canvas-based library like [KineticJS][3]. However, before I get too far into using one approach or another, I&#39;d like to hear from someone who has done a similar web application with this much data and get their opinion.

The most important thing is performance, with a secondary focus on ease of adding other interaction features and programming the animation. There will probably be no more than 2000 points at once, with those small error bars on each one. **Zooming in, out, and panning around need to be smooth.** If the most recent SVG libraries are decent at this, then perhaps the ease of using d3 will outweigh the increased setup for KineticJS, etc. But if there is a huge performance advantage to using a canvas, especially for people with slower computers, then I would definitely prefer to go that way.

Example of app made by the NYTimes that uses SVG, but still animates acceptably smoothly:
http://www.nytimes.com/interactive/2012/05/17/business/dealbook/how-the-facebook-offering-compares.html . If I can get that performance and not have to write my own canvas drawing code, I would probably go for SVG.

I noticed that some users have used a hybrid of [d3.js manipulation combined with canvas rendering][4]. However, I can&#39;t find much documentation about this online or get in contact with the OP of that post. If anyone has any experience doing this kind of DOM-to-Canvas ([demo][5], [code][6]) implementation, I would like to hear from you as well. It seems to be a good hybrid of being able to manipulate data and having custom control over how to render it (and therefore performance), but I&#39;m wondering if having to load everything into the DOM is still going to slow things down.

I know that there are some existing questions that are similar to this one, but none of them exactly ask the same thing. Thanks for your help.

**Follow-up**: the implementation I ended up using is at https://github.com/zooniverse/LightCurves

  [1]: http://d3js.org/
  [2]: http://mbostock.github.com/d3/tutorial/protovis.html
  [3]: http://www.kineticjs.com/
  [4]: https://stackoverflow.com/questions/12098286/canvas-tooltip-to-appear-outside-canvas
  [5]: http://bl.ocks.org/1276463
  [6]: https://gist.github.com/1276463

Fast and responsive interactive charts/graphs: SVG, Canvas, other?

How could I save the following svg code as .svg image

    &lt;svg width=&quot;100%&quot; height=&quot;100%&quot; version=&quot;1.1&quot; xmlns=&quot;http://www.w3.org/2000/svg&quot;&gt;

    &lt;defs&gt;
    &lt;linearGradient id=&quot;fill&quot; x1=&quot;0%&quot; y1=&quot;0%&quot; x2=&quot;0%&quot; y2=&quot;100%&quot;&gt;
    &lt;stop offset=&quot;0%&quot; style=&quot;stop-color:rgb(224,224,224);stop-opacity:1&quot;/&gt;
    &lt;stop offset=&quot;100%&quot; style=&quot;stop-color:rgb(153,153,153);stop-opacity:1&quot;/&gt;
    &lt;/linearGradient&gt;
    &lt;/defs&gt;

    &lt;path d=&quot;M 0 0 L 64 0 L 32 64 z&quot; stroke=&quot;colourname&quot; fill=&quot;url(#fill)&quot;/&gt;

    &lt;/svg&gt;

Any help would be appreciated. Thanks.

How can I save svg code as a .svg image?

I have a bunch of SVG images that I want to embed in an HTML page, which is styled with CSS.

I want to be able to have elements in the SVG have their color inherited from the parent HTML element&#39;s color attribute.

I tried setting `style=&quot;stroke: none; fill: inherit&quot;` but this doesn&#39;t work.

How do I have an SVG image inherit colors from the HTML document?

How would I fill an SVG shape, not with a single colour, an image or a gradient, but with a hatching pattern, diagonal if possible.

It&#39;s been 2 hours and I&#39;ve found nothing (at least after 2005).

I figure a possible hack would be a hatched PNG that would serve as fill, but that is not ideal.

Simple fill pattern in svg : diagonal hatching

I would like to associate sample size values with points on a plot.  I can use `geom_text` to position the numbers near the points, but this is messy.  It would be much cleaner to line them up along the outside edge of the plot.

For instance, I have:

    df=data.frame(y=c(&quot;cat1&quot;,&quot;cat2&quot;,&quot;cat3&quot;),x=c(12,10,14),n=c(5,15,20))

    ggplot(df,aes(x=x,y=y,label=n))+geom_point()+geom_text(size=8,hjust=-0.5)

Which produces this plot:
![enter image description here][1]

I would prefer something more like this:
![enter image description here][2]

I know I can create a second plot and use `grid.arrange` (a la [this post][3]) but it would be tedious to determine the spacing of the textGrobs to line up with the y-axis. Is there an easier way to do this?  Thanks!


  [1]: http://i.stack.imgur.com/QMnHc.jpg
  [2]: http://i.stack.imgur.com/wKDTK.jpg
  [3]: https://stackoverflow.com/questions/10525957/how-to-draw-lines-outside-of-plot-area-in-ggplot2

ggplot2 - annotate outside of plot

I&#39;m creating a plot in ggplot from a 2 x 2 study design and would like to use 2 colors and 2 symbols to classify my 4 different treatment combinations.  Currently I have 2 legends, one for the colors and one for the two shapes.  How can I combine them into a single legend so I have one blue circle, one red circle, one blue triangle, and one read triangle?

Some data:

    state1 &lt;- c(rep(c(rep(&quot;N&quot;, 7), rep(&quot;Y&quot;, 7)), 2))
    year &lt;- rep(c(2003:2009), 4)
    group1 &lt;- c(rep(&quot;C&quot;, 14), rep(&quot;E&quot;, 14))
    group2 &lt;- paste(state1, group1, sep = &quot;&quot;)
    beta &lt;- c(0.16,0.15,0.08,0.08,0.18,0.48,0.14,0.19,0.00,0.00,0.04,0.08,0.27,0.03,0.11,0.12,0.09,0.09,0.10,0.19,0.16,0.00,0.11,0.07,0.08,0.09,0.19,0.10)
        lcl &lt;- c(0.13,0.12,0.05,0.05,0.12,0.35,0.06,0.13,0.00,0.00,0.01,0.04,0.20,0.00,0.09,0.09,0.06,0.06,0.07,0.15,0.11,0.00,0.07,0.03,0.05,0.06,0.15,0.06)
        ucl &lt;- c(0.20,0.20,0.13,0.14,0.27,0.61,0.28,0.27,0.00,1.00,0.16,0.16,0.36,0.82,0.14,0.15,0.13,0.13,0.15,0.23,0.21,0.00,0.15,0.14,0.12,0.12,0.23,0.16)
    data &lt;- data.frame(state1,year,group1,group2,beta,lcl,ucl)


Plot:

    library(ggplot2)
    pd &lt;- position_dodge(.65)
    ggplot(data = data, aes(x = year, y = beta, colour = state1, group = group2, shape = group1)) +
      geom_point(position = pd, size = 4) +
      geom_errorbar(aes(ymin = lcl, ymax = ucl),colour = &quot;black&quot;, width = 0.5, position = pd) +
      scale_colour_hue(name = &quot;Treatment &amp; State&quot;,  #Legend label, use darker colors
                       labels = c(&quot;Control&quot;, &quot;Exclosure&quot;),
                       l = 40) +
      scale_shape(name = &quot;State&quot;, labels = c(&quot;Non-F&quot;, &quot;Flwr&quot;))

[![enter image description here][1]][1]


  [1]: https://i.stack.imgur.com/Kitw2.png

Combine legends for color and shape into a single legend

I&#39;d like to add latex text to a ggplot2 plot using `annotate()`. Using `expression()`, as described [here][1] for adding latex to axis labels, does not seem to work.  To wit:

    # Use expression() to create subscripted text
    p &lt;- ggplot(mpg, aes(x=cty, y=hwy)) + geom_point() +
      scale_x_continuous(expression(text[subscript])) 

    # But expression() in annotate adds nothing to the plot
    p + annotate(&quot;text&quot;, x=10, y=40, label=expression(text[subscript])) 
    
    # Passing regular text to annotate works fine
    p + annotate(&quot;text&quot;, x=10, y=40, label=&quot;foo&quot;) 

Why are `expression`s treated differently by `annotate` than by other ggplot functions? And how can I annotate with latex?


  [1]: https://stackoverflow.com/questions/1395105/getting-latex-into-r-plots

How to annotate() ggplot with latex

Apparently, folk have figured out how to make [xkcd][1] style graphs [in Mathematica][2] and [in LaTeX][3]. Can we do it in R? Ggplot2-ers? A geom_xkcd and/or theme_xkcd?

I guess in base graphics, par(xkcd=TRUE)?  How do I do it?

![xkcd#1064][4]

As a first stab (and as much more elegantly shown below) in ggplot2, adding the jitter argument to a line makes for a great hand-drawn look.  So - 

    ggplot(mapping=aes(x=seq(1,10,.1), y=seq(1,10,.1))) + 
      geom_line(position=&quot;jitter&quot;, color=&quot;red&quot;, size=2) + theme_bw()

It makes for a nice example - but the axes and fonts appear trickier. Fonts appear solved (below), though. Is the only way to deal with axes to blank them out and draw them in by hand? Is there a more elegant solution? In particular, in ggplot2, can element_line in the new theme system be modified to take a jitter-like argument?

  [1]: http://xkcd.com/
  [2]: https://mathematica.stackexchange.com/questions/11350/xkcd-style-graphs
  [3]: https://tex.stackexchange.com/questions/74878/create-xkcd-style-diagram-in-tex
  [4]: http://i.stack.imgur.com/f2UqI.png
       &quot;FYI: I&amp;#39;ll be releasing a wolf into a randomly-chosen front yard sometime in the next 30 years. Now your fear is reasonable, and you don&amp;#39;t need to feel embarrassed anymore. Problem solved!&quot;


Content Type	Original Author	Original Content on Stackoverflow
Question	Matthias Munz	View Question on Stackoverflow
Solution 1 - R	E1000i	View Answer on Stackoverflow

How to save a plot made with ggplot2 as SVG

R Problem Overview

R Solutions

Solution 1 - R

How to find an element with an ID in JavaFX?

How to implement server push in Flask framework?

Attributions