RamalhoTb3.1: N<c3><ba>mero de nemat<c3><b3>ides por vasos

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

Description

Experimento do n<c3><ba>mero de nemat<c3><b3>ides (vermes que est<c3><a3>o presentes no solo) por vasos infectando plantas de figo em diferentes idades de inocula<c3><a7><c3><a3>o, experimento com 4 repeti<c3><a7><c3><b5>es.

Format

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

dias

Idade de inocula<c3><a7><c3><a3>o, tratamento.

rept

N<c3><ba>mero que indica as repeti<c3><a7><c3><b5>es de cada tratamento.

nemat

N<c3><ba>mero de nemat<c3><b3>ides por vaso coletado.

Source

RAMALHO et al. (2005), p<c3><a1>g. 43.

Examples

library(lattice)

data(RamalhoTb3.1)

# Dados originais.

aggregate(nemat ~ dias, data = RamalhoTb3.1,
          FUN = function(x) { c(mean = mean(x), var = var(x)) })

plot(nemat ~ dias, data = RamalhoTb3.1,
     ylab = "N<c3><ba>mero de nemat<c3><b3>ides",
     xlab = "Tempo (dias)")

xyplot(nemat ~ dias, data = RamalhoTb3.1,
       ylab = "N<c3><ba>mero de nemat<c3><b3>ides",
       xlab = "Tempo (dias)")

# Dados aplicando logaritmo.

aggregate(log(nemat) ~ dias, data = RamalhoTb3.1,
          FUN = function(x) { c(mean = mean(x), var = var(x)) })

plot(log10(nemat) ~ dias, data = RamalhoTb3.1,
     ylab = "log do n<c3><ba>mero de nemat<c3><b3>ides",
     xlab = "Tempo (dias)")

plot(nemat ~ dias, data = RamalhoTb3.1,
     log = "y",
     ylab = "log do n<c3><ba>mero de nemat<c3><b3>ides",
     xlab = "Tempo (dias)")

xyplot(nemat ~ dias, data = RamalhoTb3.1,
       scales = list(y = list(log = TRUE)),
       ylab = "N<c3><ba>mero de nemat<c3><b3>ides",
       xlab = "Tempo (dias)")

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