maracuja: Cinza de cana em substrato de "terra de barranco" para...
In walmes/EACS: Estatística Aplicada à Ciência do Solo

Description Format Source Examples

Experimento que avaliou a quantidade de cinza na composição de substratos para mudas de maracujazeiro combinado com solo composto de agregados de diferentes tamanhos para duas famílias da espécie de maracujazeiro. O experimento foi feito em blocos (3) e o arranjo experimental de fatorial triplo com duas repetições por bloco. Variáveis de parte aérea e de solo foram observadas ao final do experimento e medidas de altura foram tomadas ao longo do tempo.

Uma lista com dois elementos sendo final os dados obtidos ao final do experimento com a colheita das parcelas e cresc dados sobre o crescimento em altura das plantas.

maracuja$final é um data.frame com 168 observações e 9 variáveis, em que

agreg: Fator categórico de dois níveis que representa a classe de tamanho das particulas ou agregados de solo usado nos vasos.
fam: Fator categórico de dois níveis que representa duas famílias de maracujá.
cinz: Fator métrico de 7 níveis que é a quantidade aplicada de cinza (ton ha^{-1}) aplicada nos vasos.
bloc: Fator categórico de 3 níveis que são os blocos do experimento, considerados para obtenção de controle local.
rept: Variável inteira que distingue entre unidades experimentais de uma mesma cela dentro de cada bloco (repetições dentro de blocos).
mfpa: Variável resposta massa fresca de parte aérea (g).
mspa: Variável resposta massa seca de parte aérea (g).
ds: Variável resposta densidade do solo (mg m^{-3}).
cav: Variável resposta consumo acumulado de água durante o ciclio por vaso (1 planta) (mL).

maracuja$cresc é um data.frame com 1344 observações e 7 variáveis, em que

data: É a data na qual a altura das plantas foi medida (classe Date).
alt: Variável resposta altura das mudas de maracuja (cm).

Milson Evaldo Serafim (http://lattes.cnpq.br/8676820051946774).

data(maracuja)
str(maracuja)

ftable(xtabs(~fam + agreg + cinz, data = maracuja$final))
ftable(xtabs(~fam + agreg + cinz, data = maracuja$cresc))

library(lattice)
library(latticeExtra)

xyplot(mfpa + mspa ~ cinz^(1/3) | fam + agreg,
       data = maracuja$final,
       type = c("p", "a"))

useOuterStrips(
    xyplot(alt ~ data | cinz + fam,
           groups = agreg,
           data = maracuja$cresc,
           type = c("p", "a")))