FerreiraEx8.5.1: Di<c3><a2>metro <c3><a0> Altura do Peito e Altura de...

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

Description

Resultados de um experimento inteiramente casualizado com dez repeti<c3><a7><c3><b5>es, realizado no per<c3><ad>odo de seca, para avaliar o diferen<c3><a7>as entre diferentes transectos na altura e no di<c3><a2>metro <c3><a0> altura do peito (DAP) das <c3><a1>rvores em uma <c3><a1>rea de recupera<c3><a7><c3><a3>o <c3><a0>s margens de um rio na regi<c3><a3>o de Lavras, MG.

Format

Um data.frame com 30 observa<c3><a7><c3><b5>es e 4 vari<c3><a1>veis.

trans

Fator nominal com 3 n<c3><ad>veis que representa o transecto (delimita<c3><a7><c3><a3>o do terreno) avaliado.

rept

Inteiro que identifica as unidades experimentais de cada transecto.

alt

Altura da <c3><a1>rvore.

dap

Di<c3><a2>metro <c3><a0> altura do peito, 1.30 metros do solo.

Source

FERREIRA (2011), (Exerc<c3><ad>cio 8.5.1, p<c3><a1>g. 351)

Examples

data(FerreiraEx8.5.1)
str(FerreiraEx8.5.1)

library(lattice)
library(latticeExtra)

p1 <- xyplot(alt ~ tran,
             data = FerreiraEx8.5.1,
             type = c("p", "smooth"))
p2 <- xyplot(dap ~ tran,
             data = FerreiraEx8.5.1,
             type = c("p", "smooth"))
doubleYScale(p1, p2, add.ylab2 = TRUE)

xyplot(alt ~ dap,
       groups = tran,
       grid = TRUE,
       auto.key = list(title = "Transecto", cex = 0.8),
       data = FerreiraEx8.5.1,
       xlab = "Di<c3><a2>metro <c3><a0> altura do peito",
       ylab = "Altura")

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