<div dir="ltr"><div class="gmail_default" style="font-family:trebuchet ms,sans-serif;display:inline">​Quando alguém diz que quer o mesmo que o Excel me causa um pouco de estranheza​</div><div class="gmail_default" style="font-family:trebuchet ms,sans-serif;display:inline">
​. Eu sinceramente não sei qual a utilidade de se preencher a área abaixo das séries. Penso que só as séries são suficientes. O mesmo para os gráficos de barras 3D ou até aqueles onde os blocos retangulares são substituídos por cones. Não vejo necessidade. Bem, o código abaixo não faz exatamente o que você precisa porque de fato eu não entendi o que você precisa. Mesmo assim, pode ser um ponto de partida. Pensou em polígonos com cores ou padrões então vá para a polygon().<br>
<br><span style="font-family:courier new,monospace">d1 <- data.frame(X=1:10,<br>                 Y1=c(-1.2,0,0,0,0,-30.3,-1.6,0,0,-2.4),<br>                 Y2=c(0,8.9,62.7,14,7.4,0,0,14.6,9.3,0))<br><br>plot(Y2~Y1, d1)<br>
plot(Y2~X, d1)<br><br>plot(c(Y1,Y2)~c(X,X), d1)<br>with(d1, polygon(x=c(X,rev(X)),<br>                 y=c(Y1, rep(min(Y1), length(Y1))),<br>                 col="blue2"))<br>with(d1, polygon(x=c(X,rev(X)),<br>                 y=c(Y2, rep(min(Y2), length(Y2))),<br>
                 col="green"))</span><br><br>À disposição.<br>Walmes.​</div><br>​</div>