library(latticeExtra)
xyplot(totparcelas$renmaiz
~ totparcelas$Nextmaiz + totparcelas$Pextmaiz + totparcelas$Kextmaiz, col=c("blue", "red",
"green"), lwd=2, strip = TRUE,
xlab = "Extraccion de N, P y K del maiz (kg/ha)", ylab =
"Rendimiento del maíz (kg/ha)",
main = "Rendimiento y extraccion de N, P y K del maiz. Adj R2=0.9332",
panel =
function(x, y, ...) {
panel.xyplot(x, y, ...)
panel.lmline(x, y, ...)
panel.grid()
})
No hay comentarios.:
Publicar un comentario