Geom-ribbon disappear after I saved it using ggsave in R

Question

I used geom-ribbon in ggplot2 in R to generate the following graph:

however, after I used ggsave to save this graph, the obtained figure is

Suddenly the ribbon disappeared. I am using the following command:

plotData<-ggplot(data = pd, aes(x = date, y = observed)) + geom_line(aes(color = "1"), size=0.95) +
        geom_line(aes(y = fitted,color="2"),size=0.95) + 
        geom_line(aes(y = forecast,color="3"), size=0.95) +
        scale_colour_manual(values=c("red", "blue","black"),labels = c("Observed", "Fitted", "Forecasted"), name="Data")+
        geom_ribbon(aes(ymin = lo95, ymax = hi95), alpha = .25)+
          #theme_bw()+
          #xlab("Time in Decades") + 
          #ylab(expression(paste ("Chl-a [mg/", m^3,"]"))) +
        scale_x_date(name = "Year", date_breaks = "2 year", labels=date_format("%Y ")) +
        scale_y_continuous(name =expression(paste ("Chl-a [mg ", m^-3,"]")))+
        theme(axis.text.x = element_text(size = 20, color="black" ,margin = margin(t = 10, r = 0, b = 0, l = 0), face="bold")) +
        theme(axis.text.y = element_text(size = 20,color="black",margin = margin(t = 0, r = 10, b = 0, l = 0), face="bold")) + 
        theme(axis.title.x = element_text(size = 35,margin = margin(t = 30, r = 0, b = 0, l = 0), face="bold")) +
        theme(axis.title.y = element_text(size = 35,margin = margin(t = 0, r = 30, b = 0, l = 0), face="bold")) + 
        #ggtitle("title")
        theme(legend.title = element_text(size = 20, face="bold"), legend.text = element_text(size =20, face="bold"))
       

plotData

ggsave(plotData, path="C:\\Users\\graphs",  file="dataaaa3.eps", device="eps", width=13, type = "cairo")
dev.off()

Thanks for your help.

PS: I am getting the followig warning:

Removed 24 rows containing missing values (geom_path).

Without any code on how you created the plot and without any data, I'm not able to reproduce the problem. See https://stackoverflow.com/a/5963610/5892059 — kath, Oct 04 '19 at 06:48
@00schneider Thank you very much for your help, it wokrs ! Please add it as answer to mark it correct if other users face the same problem. — Nizar, Oct 04 '19 at 08:58

score 3 · Accepted Answer · answered Oct 04 '19 at 09:07

3

You have to change the device to 'cairo_ps':

ggsave("dataaaa3.eps", device=cairo_ps)

answered Oct 04 '19 at 09:07

00schneider

698
9
21

score 0 · Answer 2 · answered Oct 04 '19 at 08:27

As you have not provided your data, we cannot reproduce your problem. However, you should be getting a warning when you export, such as

In grid.Call.graphics(C_polygon, x$x, x$y, index) :
  semi-transparency is not supported on this device: reported only once per page

This basically means that R cannot export transparent layers to .eps files. I don't know about your particular use case, but for use in LaTeX I have had good experience with exporting to .pdf.

Geom-ribbon disappear after I saved it using ggsave in R

2 Answers2