PimentelTb18.2.1: Ensaio Fatorial com Tratamentos Adicionais de...

In pet-estatistica/labestData: Biblioteca de Dados para Aprendizado de Estatística

Description

Ensaio de aduba<c3><a7><c3><a3>o NPK de milho, fatorial de 3^{3}, com confundimento de 2 graus de liberdade da intera<c3><a7><c3><a3>o tripla. A cada tr<c3><aa>s blocos de 9 parcelas juntaram-se mais 5 com tratamentos adicionais combinando calc<c3><a1>rio e micronutrientes.

Format

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

bloc

Fator de 3 n<c3><ad>veis qualitativos, usado para controle local. Os blocos tem 14 parcelas, 9 da por<c3><a7><c3><a3>o fatorial e 5 da por<c3><a7><c3><a3>o adicional.

trat

Fator de 30 n<c3><ad>veis qualitativos, que s<c3><a3>o os tratamentos aplicados em cada parcela, sendo que cada algarismo possui um significado diferente conforme sua posi<c3><a7><c3><a3>o: A posi<c3><a7><c3><a3>o 1 indica os n<c3><ad>veis de nitrog<c3><aa>nio, a posi<c3><a7><c3><a3>o 2 indica os n<c3><ad>veis de f<c3><b3>sforo e a posi<c3><a7><c3><a3>o 3 indica os n<c3><ad>veis de pot<c3><a1>ssio. A letra C indica a adi<c3><a7><c3><a3>o de calc<c3><a1>rio e M a adi<c3><a7><c3><a3>o de micronutrientes.

N

Fator de n<c3><ad>veis codificados que representa a dose de nitrog<c3><aa>nio.

P

Fator de n<c3><ad>veis codificados que representa a dose de f<c3><b3>sforo.

K

Fator de n<c3><ad>veis codificados que representa a dose de pot<c3><a1>ssio.

calc

Fator de n<c3><ad>veis codificados que indica a presen<c3><a7>a (1) ou aus<c3><aa>ncia de calc<c3><a1>rio.

micro

Fator de n<c3><ad>veis codificados que indica a presen<c3><a7>a (1) ou aus<c3><aa>ncia de micronutrientes.

prod

Produ<c3><a7><c3><a3>o de milho, em kg ha^{-1}.

Source

PIMENTEL-GOMES (2009), Tabela 18.2.1, p<c3><a1>g. 330.

Examples

library(lattice)

data(PimentelTb18.2.1)
str(PimentelTb18.2.1)

xtabs(~trat + bloc, data = PimentelTb18.2.1)

xyplot(prod ~ N | factor(P), groups = K, data = PimentelTb18.2.1,
       layout = c(NA, 1), type = c("p", "a"),
       xlab = "Nitrog<c3><aa>nio (codificado)",
       ylab = expression("Produ<c3><a7><c3><a3>o de milho"~(ka~ha^{-1})),
       auto.key = list(title = "Pot<c3><a1>ssio (codificado)",
                       cex.title = 1.1, columns = 3),
       strip = strip.custom(strip.names = TRUE,
                            var.name = "F<c3><b3>sforo"))

pet-estatistica/labestData documentation built on May 25, 2019, 12:47 a.m.