Затененная область под кривой R

Question

Я пытаюсь построить затененную область под кривой, но, тем не менее, заштрихованная область находится над кривой. Может ли кто-нибудь сказать мне, что случилось с моим кодом?

x=seq(0,30) 
y1=exp(-0.1*x) 
plot(x,y1,type="l",lwd=2,col="chocolate1") 
polygon(x,y1, density = 5, angle = 45,col="chocolate1") 

Answer 1

вы, вероятно, хотите что-то вроде этого:

polygon(c(min(x),x),c(min(y1),y1), density = 5, angle = 45,col="chocolate1")