ZimmermannTb4.4: Competi<c3><a7><c3><a3>o de Cultivares de Feij<c3><a3>o

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

Description

Dados de um ensaio de competi<c3><a7><c3><a3>o de cultivares, em blocos completos ao acaso, da produ<c3><a7><c3><a3>o de gr<c3><a3>os de feij<c3><a3>o em kg/ha. O experimento teve quinze tratamentos (cultivares e/ou linhagens) e quatro blocos.

Format

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

cult

Fator de n<c3><ad>veis nominais. Cultivar de feij<c3><a3>o.

bloco

N<c3><ba>mero inteiro que identifica o bloco da observa<c3><a7><c3><a3>o.

prod

Produ<c3><a7><c3><a3>o de gr<c3><a3>os de feij<c3><a3>o (ka ha^{-1}).

Source

ZIMMERMANN (2004), Tabela 4.4, p<c3><a1>g. 72.

Examples

library(lattice)

data(ZimmermannTb4.4)

str(ZimmermannTb4.4)

xyplot(prod ~ cult, data = ZimmermannTb4.4,
       groups = bloco, type = "o", jitter.x = TRUE,
       xlab = "Cultivares",
       ylab = expression("Produ<c3><a7><c3><a3>o de feij<c3><a3>o"~(kg~ha^{-1})),
       main = "Experimento de competi<c3><a7><c3><a3>o de cultivares",
       scales = list(x = list(rot = 90)))

aggregate(prod ~ cult, data = ZimmermannTb4.4,
          FUN = function(x) { c(mean = mean(x), var = var(x)) })

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