Description Format Source Examples
Experimentos para medir a produ<c3><a7><c3><a3>o de gr<c3><a3>os de cultivares de feij<c3><a3>o, conduzidos em Lavras e Patos de Minas/MG durante o ano de 1990 em delineamento em blocos casualizados.
Um data.frame
com 60 observa<c3><a7><c3><b5>es e 4 vari<c3><a1>veis, em que
cult
Fator de n<c3><ad>veis nominais que representa as cultivares de feij<c3><a3>o.
local
Fator de 2 n<c3><ad>veis nominais, munic<c3><ad>pios onde foram realizados os experimentos.
bloc
Fator de 3 n<c3><ad>veis que identifica os blocos em cada um dos experimentos, usado para fazer controle local.
prod
Produ<c3><a7><c3><a3>o de gr<c3><a3>os de feij<c3><a3>o, medidos em g/parcela nas unidades experimentais.
RAMALHO et al. (2005), Exemplo 8.1, p<c3><a1>g. 115.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | library(lattice)
data(RamalhoEg8.1)
str(RamalhoEg8.1)
xtabs(~cult + local, data = RamalhoEg8.1)
xyplot(prod ~ cult | local, data = RamalhoEg8.1,
jitter.x = TRUE,
xlab = "Cultivar",
ylab = expression("Produ<c3><a7><c3><a3>o"~(g~parcela^{-1})))
ftable(with(RamalhoEg8.1,
tapply(prod,
list(local, cult, bloc = bloc),
FUN = identity)))
aggregate(prod ~ cult + local, data = RamalhoEg8.1,
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.