Hi everyone,

I am given two vectors - for example -
 x= c(0:20)
> x
 [1]  0  1  2  3  4  5  6  7  8  9 10 11 12 13 14 15 16 17 18 19 20

and

> y
 [1] 19.4 17.9  8.1 11.3  7.8  8.0  5.0  1.7  3.9  5.4  7.5  5.4  4.7  5.0
 4.9
[16]  3.5  2.9  2.4  1.4  1.7

> plot(x,y,xlim=range(x),ylim=range(y))

How can I draw a curve that fits the peaks on the plot?
Thank you :)
Best,
Nanami

	[[alternative HTML version deleted]]

