labestData: Biblioteca de Dados para Aprendizado de Estatística

Description Format Source Examples

Experimento em delineamento inteiramente casualizado que avaliou o efeito a efici<c3><aa>ncia na utiliza<c3><a7><c3><a3>o de f<c3><b3>sforo por tr<c3><aa>s cultivares de trigo cultivadas em solo com e sem calagem.

Um data.frame com 48 observa<c3><a7><c3><b5>es e 5 vari<c3><a1>veis, em que

cult: Cultivares de trigo usadas no experimento: BR 20 Guat<c3><b3> - tolerante ao alum<c3><ad>nio, BR 36 Ianomami - sens<c3><ad>vel ao alum<c3><ad>nio, BR 40 Tui<c3><ba>ca - moderadamente sens<c3><ad>vel ao alum<c3><ad>nio.
calag: Quantidade aplicada de calc<c3><a1>rio feita para corre<c3><a7><c3><a3>o da acidez do solo (calagem): 0 e 4,4 ton ha^{-1}.
P: Quantidade aplicada de f<c3><b3>sforo: 0 e 87 mg de P por kg de solo.
rept: Identifica a repeti<c3><a7><c3><a3>o de cada cela experimental.
efic: Vari<c3><a1>vel resposta que a efici<c3><aa>ncia na utiliza<c3><a7><c3><a3>o do f<c3><b3>sforo, dado pelo quociente da massa seca da parte a<c3><a9>rea produzida pela quantidade de f<c3><b3>sforo absorvida pelas plantas.

BANZATTO; KRONKA (2013), Quadro 5.3.7, p<c3><a1>g. 120.

library(lattice)

data(BanzattoQd5.3.7)

addmargins(with(BanzattoQd5.3.7,
                tapply(X = efic,
                       INDEX = list(interaction(cult, calag, P),
                                    rept),
                       FUN = sum)))

xyplot(efic ~ factor(P) | cult, data = BanzattoQd5.3.7,
       groups = calag, type = c("p", "a"),
       layout = c(NA, 1), jitter.x = TRUE,
       auto.key = list(title = expression("Calagem"~(ton~ha^{-1})),
                       cex.title = 1, columns = 2),
       xlab = expression("F<c3><b3>sforo"~(mg~kg^{-1}~de~solo)),
       ylab = expression("Efici<c3><aa>ncia no uso do F<c3><b3>sforo"))