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]]

