# [R] font and size times New Roman

Prof Brian Ripley ripley at stats.ox.ac.uk
Wed Apr 13 07:07:23 CEST 2011

```You wrote yesterday and got a reply asking for more information (as
did the posting guide), which you still have not provided, and giving
you several hints of where in the help to look. We cannot help you if
you refuse to help us help you.

See
https://stat.ethz.ch/pipermail/r-help/2011-April/274765.html
https://stat.ethz.ch/pipermail/r-help/2011-April/274768.html

On Tue, 12 Apr 2011, Fabiane Silva wrote:

> Hello
>
> I wonder how to change the font of
> chart to Times New Roman and size 9.
>
> plot(c(0,100,20),c(0,600,50), xlab= 'Idade(meses)', ylab="Peso(kg)",
> type = "n", axes=F)
>
> axis(1, pos=0, at=seq(0,100,20))
> axis(2, pos=0,  at=seq(0,600,100))
> t<- seq(0,100,1)
> TA=543.56*(1-0.8976*exp(-0.0522*t))
> NI=498.97*(1-0.9259*exp(-0.0494*t))
> RC=514.57*(1-0.9112*exp(-0.0499*t))
> TS=553.47*(1-0.9119*exp(-0.0535*t))
>
> lines(t, TA, col='black',lty=1, lwd=4)
> lines(t, NI, col="black", lty=2, lwd=4)
> lines(t, RC, col='black',lty=3, lwd=4)
> lines(t, TS, col='black',lty=4, lwd=4)
> legend(40,200, legend = c("A=553,47 kg k=0,0535","A=543,56 kg
> k=0,0522","A=514,57 kg k=0,0499","A=498,97 kg k=0,0494"), col=c("black"),
> cex=0.8, lwd=4, lty=c(4,1,3,2))
>
> Attached is the graphic I need to make these changes
>
> Thanks
>

--
Brian D. Ripley,                  ripley at 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 272595

```