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, rip...@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
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
