Description Format Source Examples
Dados referentes a um grupo de 4 ensaios de competi<c3><a7><c3><a3>o de 10 cultivares de batata, realizado por Filgueira (1991) em Gua<c3><ad>ra - SP. Os ensaios foram instalados no delineamento de blocos casualizados com 4 repeti<c3><a7><c3><b5>es. A vari<c3><a1>vel resposta <c3><a9> a produ<c3><a7><c3><a3>o de tub<c3><a9>rculos, em t ha^{-1}.
Um data.frame
com 160 observa<c3><a7><c3><b5>es e 4 vari<c3><a1>veis, em
que
exper
Fator de n<c3><ad>veis categ<c3><b3>ricos que identifica o experimento (ensaio)).
bloco
Fator de n<c3><ad>veis categ<c3><b3>ricos que identifica os blocos dentro de um experimento.
cult
Fator de n<c3><ad>veis categ<c3><b3>ricos que identifica as cultivares de batata.
prod
Produ<c3><a7><c3><a3>o de tub<c3><a9>rculos, em tom ha^{-1}.
BANZATTO; KRONKA (2013), Quadro 8.2.1, p<c3><a1>g. 190.
Filgueira, F. A. R. (1991). Intera<c3><a7><c3><a3>o gen<c3><b3>tipo ambiente em batata (Solanum tuberosum L. spp tuberosum). Tese (Doutorado em Produ<c3><a7><c3><a3>o Vegetal). Faculdade de Ci<c3><aa>ncias Agr<c3><a1>rias e Veterin<c3><a1>rias, Universidade Estadual Paulista, Jaboticabal: SP.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | library(lattice)
data(BanzattoQd8.2.1)
str(BanzattoQd8.2.1)
ftable(xtabs(~exper + bloco + cult, data = BanzattoQd8.2.1))
with(BanzattoQd8.2.1,
addmargins(tapply(prod, list(cult, exper), FUN = mean)))
xyplot(prod ~ cult | exper, data = BanzattoQd8.2.1,
groups = bloco, type = c("p", "a", "g"), as.table = TRUE,
auto.key = list(space = "right", title = "Bloco",
cex.title = 1, columns = 1),
scales = list(x = list(rot = 90)),
xlab = "Cultivares",
ylab = expression("Produ<c3><a7><c3><a3>o de tub<c3><a9>rculos"~(t~ha^{-1})))
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.