Description Format Source Examples
Experimento que estudou a produ<c3><a7><c3><a3>o m<c3><a9>dia de gr<c3><a3>os de caf<c3><a9>-cereja, obtidos por Mendes (1994), em fun<c3><a7><c3><a3>o da prog<c3><aa>nie em 3 anos. Foi utilizado o delineamento de blocos casualizados.
Um data.frame
com 120 observa<c3><a7><c3><b5>es e 4 vari<c3><a1>veis, em
que
prog
Fator que distingue as prog<c3><aa>nies do cultivar de caf<c3><a9> Icatu.
ano
Fator de 3 n<c3><ad>veis, colheitas realizadas em anos sucessivos.
bloc
Fator de 4 n<c3><ad>veis que s<c3><a3>o os blocos no experimento, possivelmente os mesmo blocos e unidades experimentais em todos os anos, usado para controle local.
prod
Produ<c3><a7><c3><a3>o m<c3><a9>dia de gr<c3><a3>os de caf<c3><a9>-cereja, em kg/parcela.
RAMALHO et al. (2005), p<c3><a1>g. 128.
Mendes, A. N. G. Avalia<c3><a7><c3><a3>o de Metodologias Empregadas na Sele<c3><a7><c3><a3>o de Prog<c3><aa>nies do Cafeeiro (Coffea arabica L.) no estado de Minas Gerais. Lavras: UFLA, 1994. 167p.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 | library(lattice)
data(RamalhoTb8.12)
str(RamalhoTb8.12)
ftable(with(RamalhoTb8.12,
tapply(prod,
list(ano = ano, prog = prog, bloc = bloc),
FUN = identity)))
xyplot(prod ~ ano | prog, data = RamalhoTb8.12,
jitter.x = TRUE, type = c("p", "a"),
as.table = TRUE, layout = c(NA, 2),
strip = strip.custom(strip.names = TRUE,
var.name = "Prog<c3><aa>nie", sep = " "),
xlab = "Ano de colheita",
ylab = expression("Produ<c3><a7><c3><a3>o"~(kg~parcela^{-1})))
aggregate(prod ~ prog, data = RamalhoTb8.12,
FUN = function(x) { c(mean = mean(x), var = var(x)) })
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.