[R-br] gráficos com bandas de confiança no R - com sombra

Nilson Guiotoku nguiotoku2017 em gmail.com
Qua Set 4 22:17:06 -03 2019


Pessoal, gostaria de fazer um gráfico conforme o anexo, cujo o intervalo de
confiança fique com formato de sombra dentro do gráfico. Conforme figura
anexada:

[image: image.png]

Como tentativa usei o  *polygon*, mas não sei se existe um outro recurso
melhor. Se alguém souber e puder contribuir, a lista do R agradece. Segue o
código:

 x <- seq(1:30)
Y <- x + rnorm(30, 0,3)
model <-  lm(Y ~ x)
pred <- data.frame(x1 = x)
pred$y1 <- predict(model, newdata = pred, interval = "confidence")
plot(consumo, type = "n",
     main = "Consumo médio, kg",
     xlab = "Consumo estimado, kg ",
     ylab = "Consumo observado, kg" )
icfit = pred$y1
yy = c(as.numeric(as.vector(icfit[,2])),
rev(as.numeric(as.vector(icfit[,3]))))
xx = c(x, rev(x))
polygon(xx, yy, col = "lightsteelblue2", border = NA)
points(consumo)
abline(model, col="blue", lwd= 2)
points(seq(2:15), seq(2:15), type = "l", col = "green", lwd = 2)
legend("topright", legend = c("modelo linear base y = x",
                              "modelo ajustado", "Bandas de confiança, 95%"
),
       lty = c(1,1,1), col = c("green", "blue", "lightsteelblue2"),
       lwd = c(2,2,NA), bty = "n", pch = c(NA,NA, 15))
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190904/bfde02f0/attachment.html>
-------------- Próxima Parte ----------
Um anexo não-texto foi limpo...
Nome: image.png
Tipo: image/png
Tamanho: 13743 bytes
Descrição: não disponível
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20190904/bfde02f0/attachment.png>


Mais detalhes sobre a lista de discussão R-br