R help - Apr 2011 - font and size times New Roman

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

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

Tena koe Fabiane

?par

In particular, various cex. parameters.  These can be used with plot (e.g.,
plot(x, y, cex.axis=1.2))

HTH ....

Peter Alspach
> -----Original Message-----
> From: r-help-bounces at r-project.org [mailto:r-help-bounces at r-
> project.org] On Behalf Of Fabiane Silva
> Sent: Wednesday, 13 April 2011 11:23 a.m.
> To: r-help at r-project.org
> Subject: [R] font and size times New Roman
> 
> 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
The contents of this e-mail are confidential and may be subject to legal
privilege.
 If you are not the intended recipient you must not use, disseminate, distribute
or
 reproduce all or any part of this e-mail or attachments.  If you have received
this
 e-mail in error, please notify the sender and delete all material pertaining to
this
 e-mail.  Any opinion or views expressed in this e-mail are those of the
individual
 sender and may not represent those of The New Zealand Institute for Plant and
 Food Research Limited.