Menu
I want to save a stacked area plot (Plot example with code can be found here) 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, ".svg", sep=""),type="svg",bg="transparent",pointsize=8, units="px",dpi=400)
gt <- ggplot_gtable(ggplot_build(p))
gt$layout$clip[gt$layout$name=="panel"] <- "off"
grid.draw(gt)
dev.off()
958
You can either print directly a ggplot into PNG/PDF files or use the convenient function ggsave() for saving a ggplot. The default of ggsave() is to export the last plot that you displayed, using the size of the current graphics device. It also guesses the type of graphics device from the extension.
Second, in R you can save a plot as Scalable Vector Graphics (SVG) with the svg function.
Click the File options menu in the top right corner and select Print or press Ctrl + P . Select Print to File and choose SVG as the Output format. Choose a name and folder in which to save the file, then click Print. The SVG file will be saved in the folder you chose.
The plot can be saved in the eps format using the ggplot. save() method, which takes as argument the string name of the plot.
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("ggplot2")
#some sample data
head(diamonds)
#to see actually what will be plotted and compare
qplot(clarity, data=diamonds, fill=cut, geom="bar")
#save the plot in a variable image to be able to export to svg
image=qplot(clarity, data=diamonds, fill=cut, geom="bar")
#This actually save the plot in a image
ggsave(file="test.svg", plot=image, width=10, height=8)
Hope it works for you.
81
If you love us? You can donate to us via Paypal or buy me a coffee so we can maintain and grow! Thank you!
Donate Us With
