From: Prof Brian Ripley <ripley_at_stats.ox.ac.uk>

Date: Fri 27 Jan 2006 - 03:44:09 EST

Date: Fri 27 Jan 2006 - 03:44:09 EST

You haven't told us much, for example not your R version nor your exact platform (nor if this is a binary or self-compiled version of R) nor your locale.

And you (or something between you and me) have wrapped the R code onto just two lines. You talk about saving as pdf, and ran a jpeg device, unless I missed something in those messed-up lines.

I am afraid there is just too much uncertainty here. For current R, with the pdf() device and a Latin-1 or UTF-8 locale, this should work. For a jpeg() device, it depends on the fonts you have installed in your X11 server, but it usually works.

If you can explain whether you want pdf or jpeg and give the missing details (and any others you think might be relevant), people here may be able to help you further.

On Thu, 26 Jan 2006, Alexandra R. M. de Almeida wrote:

> Dear R users

*>
**> I'm having problems in putting special characters (like á, ã, ç ) in my plots, as much in titles, as in axis names, as in legend...when I save them as a pdf document. They don't appear...
**> I don't know if it is because I'm using a linux platform...
**> The script is the following:
**>
**> library(grDevices) jpeg(file="Fronteira/FronteiraNova.jpeg", bg="white", quality=100,width = 600, height = 480) grafico.fe<-function(varFA,retFA,varC,retC,covRF,retRF,varD,retD) { minx<-min(100*sqrt(varFA),100*varC,100*sqrt(covRF[1,1]),100*sqrt(covRF[2,2]),100*sqrt(covRF[3,3]),100*sqrt(covRF[4,4]),100*varD) maxx<-max(100*sqrt(varFA),100*varC,100*sqrt(covRF[1,1]),100*sqrt(covRF[2,2]),100*sqrt(covRF[3,3]),100*sqrt(covRF[4,4]),100*varD) miny<-min(100*retFA,retC,retRF,retD) maxy<-max(100*retFA,retC,retRF,retD) plot(100*sqrt(varFA),100*retFA,type="l",lwd=2,col=2,xlab="Risco %", ylab="Retorno % (anualizado)", xlim=c(minx-0.01,maxx), ylim=c(miny,maxy),main="Fronteira Eficiente") points(100*varC,retC,pch=16,cex=0.6, col=3) points(100*sqrt(covRF[1,1]),retRF[1],pch=16,cex=0.6,col=4) points(100*sqrt(covRF[2,2]),retRF[2],pch=16,cex=0.6,col=5) points(100*sqrt(covRF[3,3]),retRF[3],pch=16,cex=0.6,col=6) points(100*sqrt(covRF[4,4]),retRF[4],pch=16,cex=0.6,col=7)
**> points(100*varD,retD,pch=16,cex=0.6,col=1) legend(c(0.91,1.11),c(17.97,18.156),c("Fronteira Eficiente"),lwd=2,cex=0.6, col=2) legend(0.93,18.13,c("Consolidado","Brad","AB","It","Uni","Ot"),pch=16, bty="n", cex=0.6, col=c(3,4,5,6,7,1), ncol=1) } grafico.fe(varFA,retFA,varC,retC,covRF,retRF,varD,retD) dev.off()
**>
**> Do someome have a problem like this?
**>
**> Thanks
**>
**> Alexandra Almeida
**>
**>
**>
**>
**> Alexandra R. Mendes de Almeida
**>
**>
**>
**>
**>
**> ---------------------------------
**>
**> [[alternative HTML version deleted]]
**>
**>
*

-- Brian D. Ripley, ripley@stats.ox.ac.uk Professor of Applied Statistics, http://www.stats.ox.ac.uk/~ripley/ University of Oxford, Tel: +44 1865 272861 (self) 1 South Parks Road, +44 1865 272866 (PA) Oxford OX1 3TG, UK Fax: +44 1865 272595Received on Fri Jan 27 03:52:54 2006______________________________________________ R-help@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html

*
This archive was generated by hypermail 2.1.8
: Fri 03 Mar 2006 - 03:42:12 EST
*