t<--4:4 y<-c(5,7,10,13,15,16,14,12,11) plot(t,y,type="l") how can i add a curve y=0.83*t-0.44*t^2 in the graph? [[alternative HTML version deleted]]
t<- -4:4
y<-c(5,7,10,13,15,16,14,12,11)
plot(t,y,type="l", ylim=c(-20,20))
curve(0.83*x-0.44*x^2, add=TRUE)
I added ylim to plot so that your curve is on the graph. Maybe you wanted to use
different parameters.
Try going through a basic manual of R!
daniel
________________________________________
Felad?: r-help-bounces at r-project.org [r-help-bounces at r-project.org] ;
meghatalmazó: ???? [1248283536 at qq.com]
K?ldve: 2013. december 15. 13:46
To: r-help
T?rgy: [R] how to add a line in the graph?
t<--4:4
y<-c(5,7,10,13,15,16,14,12,11)
plot(t,y,type="l")
how can i add a curve y=0.83*t-0.44*t^2 in the graph?
[[alternative HTML version deleted]]
______________________________________________
R-help at 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.
Hi, On itself one way of doing this is: lines(seq(-4,4,0.1),sapply(seq(-4,4,0.1),function(t)0.83*t-0.44*t^2)) The curve does not fit in the scale, however. Are you sure the formula is correct? Then you have to adapt the scale: plot.new() plot.window(xlim=c(-4,4), ylim=c(-10,16)) axis(1) axis(2) t<--4:4 y<-c(5,7,10,13,15,16,14,12,11) lines(t,y,type="l") lines(seq(-4,4,0.1),sapply(seq(-4,4,0.1),function(t)0.83*t-0.44*t^2)) ) 2013/12/15 水静流深 <1248283536@qq.com>> t<--4:4 > y<-c(5,7,10,13,15,16,14,12,11) > plot(t,y,type="l") > > how can i add a curve y=0.83*t-0.44*t^2 in the graph? > [[alternative HTML version deleted]] > > ______________________________________________ > 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. >-- ------------------- dr F.H.G. (Frans) Marcelissen DigiPsy (www.DigiPsy.nl <http://www.digipsy.nl/>) Pomperschans 26 5595 AV Leende tel: 040 2065030/06 2325 06 53 skype adres: frans.marcelissen email: frans.marcelissen@digipsy.nl [[alternative HTML version deleted]]
On Dec 15, 2013, at 4:46 AM, ???? wrote:> t<--4:4 > y<-c(5,7,10,13,15,16,14,12,11) > plot(t,y,type="l") > > how can i add a curve y=0.83*t-0.44*t^2 in the graph? > [[alternative HTML version deleted]]t<--4:4 y<-c(5,7,10,13,15,16,14,12,11) plot(t,y,type="l", ylim=c(-4,16)) curve( 0.83*x-0.44*x^2 , add=TRUE, col="red") -- David Winsemius Alameda, CA, USA