I am trying to insert a .eps file for journal publishing requirements.
I create my plot using ggplot2:
p=ggplot(data=sim, aes(x=TIME,y=DV,group=ID))+ theme_few()+ geom_point(aes(shape=as.factor(SEASON2)),size=3,fill="white")+ geom_point(aes(color=as.factor(AGE2),shape=as.factor(SEASON2)),size=3,fill="white",show_guide=F)+ scale_shape_manual(name="Season",values=c(25,24))+ geom_line(aes(color=as.factor(AGE2),linetype=as.factor(MODEL2)),size=0.75)+ scale_linetype_manual(name="Model [Population]",values=c("dotted","solid"))+ scale_color_manual(name="Age",values=as.vector(c(ggthemes_data$few$medium[5],ggthemes_data$few$medium[4])))+ theme(legend.position="bottom",legend.direction="vertical",legend.box="horizontal")+ guides(color=guide_legend(order=1), shape=guide_legend(order=2), linetype=guide_legend(order=3))+ xlab("Clock time [hours]")+ ylab("Testosterone levels [ng/dL]")+ geom_hline(yintercept=300,linetype="dashed",color="black") print(p)
And then I create .eps
postscript(file.path(directory,"Script","Figure5.eps"), width=10, height=12.25, paper="a4", horizontal=T, onefile=TRUE) print(p) dev.off()
This .eps was not accepted for the online application when I tried to submit the plot because I need to make fonts available for ADQ Advisor.
For this, I used:
install.packages("extrafont") library("extrafont") font_import() fonts() loadfonts(device = "postscript") ## for postscript() embed_fonts("./Figure5.eps", outfile = "./Figure5-embed.eps", options = "-dEPSCrop") embedFonts(file="Figure5.eps", outfile="Figure5EMB.eps", options="-dEPSCrop")
Both of these functions failed and gave me the following error:
Error in embedFonts (file = "Figure5.eps", outfile = "Figure5EMB.eps" ,: GhostScript not found
I have GhostScript 9.18 installed in the following path: C: \ Program Files (x86) \ gs \ gs9.18
Any suggestions?