ninfas.Rd 2.38 KB
Newer Older
1
% Generated by roxygen2: do not edit by hand
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42
% Please edit documentation in R/ninfas.R
\name{ninfas}
\alias{ninfas}
\title{Ninfas de Mosca-Branca em Lavoura de Soja}
\format{Um \code{data.frame} com 240 observações e 8 variáveis.
    \describe{

\item{\code{data}}{Data em que foram avaliadas as plantas de soja.}

\item{\code{dias}}{Inteiro que indica o número de dias após o
    experimento no ato da avaliação.}

\item{\code{cult}}{Fator com a identificação da cultivar de
    soja. Foram 10 cultivares avaliadas neste experimento.}

\item{\code{bloco}}{Fator com 4 níveis que representam os blocos
    utilizados para controle de variação local.}

\item{\code{nsup}}{Número de ninfas de mosca-branca nos folíolos do
    terço superior.}

\item{\code{nmed}}{Número de ninfas de mosca-branca nos folíolos do
    terço médio.}

\item{\code{ninf}}{Número de ninfas de mosca-branca nos folíolos do
    terço inferior.}

\item{\code{ntot}}{Número de ninfas de mosca-branca considerando
    todos os folíolos (soma de \code{nsup}, \code{nmed},
    \code{ntot}).}

}}
\description{
Experimento conduzido em casa de vegetação sob o
    delineamento de blocos casualizados. No experimento foram
    avaliadas plantas de diferentes cultivares de soja contabilizando
    o número de ninfas de mosca-branca nos folíolos dos terços
    superior, médio e inferior das plantas. As avaliações ocorreram
    em 6 datas dentre os 38 dias do estudo.
}
\examples{
43

44 45 46
data(ninfas)
str(ninfas)

47 48
xtabs(~data + cult, data = ninfas)

49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70
library(lattice)

xyplot(ntot ~ dias | cult,
       data = ninfas,
       type = c("p", "spline"),
       grid = TRUE,
       as.table = TRUE,
       layout = c(NA, 2))

# Somente as cultivares que contém BRS na identificação
da <- droplevels(subset(ninfas, grepl("BRS", x = cult)))

xyplot(ntot ~ dias | cult,
       data = da,
       type = c("p", "spline"),
       grid = TRUE,
       as.table = TRUE,
       layout = c(NA, 2))
}
\references{
Suekane, R., Degrande, P. E., de Lima Junior, I. S., de
    Queiroz, M. V. B. M., & Rigoni, E. R. (2013). Danos da
71 72 73 74
    Mosca-Branca \emph{Bemisia Tabaci} e distribuição vertical das
    ninfas em cultivares de soja em casa de vegetação. Arquivos do
    Instituto Biológico, 80(2), 151-158.
    \href{http://200.129.209.183/arquivos/arquivos/78/MESTRADO-DOUTORADO-AGRONOMIA/Dissertação Renato Suekane.pdf}{Dissertação de Renato Suekane.}
75 76
}