Skip to content
Snippets Groups Projects
Select Git revision
  • altamiro74
  • devel default
  • daniel66
  • bruna16
  • walmes10
  • alcides51
  • jhenifer61
  • bruna17
  • alessandra36
  • gabriel55
  • bruno41
  • angela25
  • angela26
  • bruno40
  • walmes9
  • eduardo28
  • jhenifer39
  • alessandra35
  • bruna15
  • bruna14
20 results

ZimmermannTb12.13.R

Blame
  • Forked from pet-estatistica / labestData
    1316 commits behind the upstream repository.
    ZimmermannTb12.13.R 1.51 KiB
    #' @name ZimmermannTb12.13
    #' @title Dados da proporção de insetos infectados
    #' @description Dados do ensaio 1 de um experimento em DBC que estudou a
    #'     patogenicidade de fungos ao percevejo do grão de arroz. A
    #'     testemunha sem infecção (1) era o tratamento comum entre os dois
    #'     experimentos. Os dados se referem à proporção de percevejos
    #'     infectados e transformados por arco seno da raiz quadrada da
    #'     proporção.
    #' @format Um \code{data.frame} com 35 observações e 3 variáveis
    #'
    #'
    #' \describe{
    #'
    #' \item{\code{trat}}{Fator de níveis nominais. Tratamento aplicado em
    #'     arroz.}
    #'
    #' \item{\code{bloco}}{Número inteiro que identifica o bloco da
    #'     observação.}
    #'
    #' \item{\code{asinprop}}{Arco seno da raíz quadrada
    #'     (\eqn{\arcsin(\sqrt{p})}) da proporção (em radianos) de insetos
    #'     infectados.}
    #'
    #' }
    #' @keywords DBC proporção
    #' @source Zimmermann, F. J. (2004). Estatística aplicada à pesquisa
    #'     agrícola (1st ed.). Santo Antônio de Goiás, GO: Embrapa Arroz e
    #'     Feijão. (Tab 12.13, pág 255)
    #' @examples
    #'
    #' library(lattice)
    #'
    #' data(ZimmermannTb12.13)
    #'
    #' str(ZimmermannTb12.13)
    #'
    #' xyplot(asinprop ~ trat , groups = bloco, data = ZimmermannTb12.13,
    #'        type = c("p", "a"), jitter.x = TRUE,
    #'        xlab = "Tratamentos",
    #'        ylab = "Arco seno da raíz da proporção de insetos infectados")
    #'
    #' aggregate(asinprop ~ trat, data = ZimmermannTb12.13,
    #'           FUN = function(x) { c(mean = mean(x), var = var(x)) })
    #'
    NULL