diff --git a/R/AndradeEx7.15.R b/R/AndradeEx7.15.R new file mode 100644 index 0000000000000000000000000000000000000000..fcaf743d94dc96c69fd0ca646d42c079ec2c8f44 --- /dev/null +++ b/R/AndradeEx7.15.R @@ -0,0 +1,31 @@ +#' @name AndradeEx7.15 +#' @title Diâmetro de Forófitos Possuidores de Bromélias \emph{Vriesea +#' incurvata} +#' @description Estudo sobre os valores de diâmetro à altura do peito +#' (DAP), em centÃmetros, de uma amostra piloto de forófitos, +#' árvores suporte para epÃfitas, possuidores de \emph{Vriesea +#' incurvata} (bromélia, conhecida como espada de Davi), em +#' vegetação primária da Floresta Tropical Atlântica, em Santo Amaro +#' da Imperatriz, SC. +#' @format Um \code{vector} numérico com 30 observações. +#' @keywords AAS +#' @source Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as +#' ciências agrárias e biológicas com noções de experimentação (2nd +#' ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 7, ExercÃcio +#' 15, pág. 346) +#' @examples +#' +#' data(AndradeEx7.15) +#' str(AndradeEx7.15) +#' +#' hist(AndradeEx7.15, +#' prob = TRUE, +#' labels = TRUE, +#' main = NULL, +#' ylim = c(0, 0.07), +#' col = "darkturquoise", +#' xlab = "DAP (cm)", +#' ylab = "Densidade") +#' lines(density(AndradeEx7.15), lwd = 2) +#' +NULL diff --git a/R/AndradeEx8.11.R b/R/AndradeEx8.11.R new file mode 100644 index 0000000000000000000000000000000000000000..e35695d318e0096e2e34f6c4fb67bf1156d173f7 --- /dev/null +++ b/R/AndradeEx8.11.R @@ -0,0 +1,49 @@ +#' @name AndradeEx8.11 +#' @title Comparação entre o Peso Vivo e o Peso Jejum do Gado Crioulo +#' Lageano +#' @description Para comparar o peso vivo e o peso jejum do gado crioulo +#' lageano, um pesquisador selecionou aleatoriamente uma amostra de +#' 15 animais e anotou seus pesos. +#' @format Um \code{data.frame} com 30 observações e 3 variáveis, em que +#' +#' \describe{ +#' +#' \item{\code{animal}}{Fator de 15 nÃveis qualitativos, que são +#' os animais.} +#' +#' \item{\code{estado}}{Fator de 2 nÃveis qualitativos, que indica +#' o estado (vivo ou jejum) em que o animal foi pesado.} +#' +#' \item{\code{peso}}{Peso do animais, em kg.} +#' +#' } +#' @keywords AASP +#' @source Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as +#' ciências agrárias e biológicas com noções de experimentação (2nd +#' ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio +#' 11, pág. 409) +#' @examples +#' +#' data(AndradeEx8.11) +#' str(AndradeEx8.11) +#' +#' # Dados apresentados em formato largo ("wide") +#' library(reshape2) +#' (da <- dcast(AndradeEx8.11, animal ~ estado, value.var = "peso")) +#' +#' # Pares de peso para cada animal +#' library(lattice) +#' dotplot(animal ~ peso, +#' groups = estado, +#' auto.key = list(title = "Estado", +#' cex.title = 1.1, +#' columns = 2), +#' data = AndradeEx8.11, +#' xlab = "Peso (kg)", +#' ylab = "Animal") +#' +#' # Distribuição das diferenças +#' densityplot(~jejum - vivo, data = da) +#' + +NULL diff --git a/R/AndradeEx8.13.R b/R/AndradeEx8.13.R new file mode 100644 index 0000000000000000000000000000000000000000..54009054421a253cd0c30b281c51b74c1b3395ea --- /dev/null +++ b/R/AndradeEx8.13.R @@ -0,0 +1,39 @@ +#' @name AndradeEx8.13 +#' @title Altura de Ãrvores Bracatinga e CanafÃstula +#' @description Estudo realizado por um agrônomo sobre o desenvolvimento +#' de duas espécies de árvores, Bracatinga (\emph{Mimosa scabrella}) +#' e CanafÃstula (\emph{Peltophorum dubium}). O objetivo é +#' verificar diferença entre o desenvolvimento das duas espécies, +#' para tal uma amostra de 30 árvores foi avaliada. O +#' desenvolvimento foi mensurado pela altura das altura das árvores. +#' @format Um \code{data.frame} com 60 observações e 2 variáveis, em que +#' +#' \describe{ +#' +#' \item{\code{arvores}}{Espécie da árvore, Bracatinga ou CanafÃstula.} +#' +#' \item{\code{altura}}{Altura da árvore, em metros.} +#' +#' } +#' @keywords AASI +#' @source Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as +#' ciências agrárias e biológicas com noções de experimentação (2nd +#' ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio +#' 13, pág. 410) +#' @examples +#' +#' data(AndradeEx8.13) +#' str(AndradeEx8.13) +#' +#' with(AndradeEx8.13, by(altura, arvores, summary)) +#' +#' library(lattice) +#' densityplot(~altura, groups = arvores, +#' data = AndradeEx8.13, +#' auto.key = list( +#' title = "Espécies", +#' cex.title = 1, +#' corner = c(0.9, 0.95) +#' )) +#' +NULL diff --git a/R/AndradeEx8.17.R b/R/AndradeEx8.17.R new file mode 100644 index 0000000000000000000000000000000000000000..c29e4f7fb9d30ddbd1055dfae0120fce02b85c89 --- /dev/null +++ b/R/AndradeEx8.17.R @@ -0,0 +1,43 @@ +#' @name AndradeEx8.17 +#' @title Comportamento da espécie \emph{Mandevilla velutina} +#' @description Experimento para avaliar o comportamento \emph{in vitro} +#' da espécie \emph{Mandevilla velutina} (Apocinácea), proveniente +#' de duas regiões: cerrado e restinga. Após isolar os explantes, +#' com um nó com duas gemas axilares, obtidos das plantas matrizes, +#' foi instalado o experimento em delineamento inteiramente +#' casualizado com 20 repetições (20 explantes para o cerrado de 20 +#' para a restinga), totalizando 40 unidades experimentais. A +#' variável mensurada foi a altura em centÃmetros dos explantes de +#' \emph{Mandevilla}, cultivadas \emph{in vitro} durante 45 dias. +#' @format Um \code{data.frame} com 40 observações e 2 variáveis, em que +#' +#' \describe{ +#' +#' \item{\code{regiao}}{Região da plantação (Cerrado ou Restinga).} +#' +#' \item{\code{altura}}{Altura, em centÃmetros, dos explantes de +#' \emph{Mandevilla} cultivadas \emph{in vitro} durante 45 dias.} +#' +#' } +#' @keywords AASI +#' @source Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as +#' ciências agrárias e biológicas com noções de experimentação (2nd +#' ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio +#' 17, pág. 412) +#' @examples +#' +#' data(AndradeEx8.17) +#' str(AndradeEx8.17) +#' +#' with(AndradeEx8.17, by(altura, regiao, summary)) +#' +#' library(lattice) +#' densityplot(~altura, groups = regiao, +#' data = AndradeEx8.17, +#' auto.key = list( +#' title = "Região", +#' cex.title = 1, +#' corner = c(0.9, 0.95) +#' )) +#' +NULL diff --git a/R/AndradeEx8.23.R b/R/AndradeEx8.23.R new file mode 100644 index 0000000000000000000000000000000000000000..0bf6953687dbb19ee2c7f1c3cb2de9740e41f1d3 --- /dev/null +++ b/R/AndradeEx8.23.R @@ -0,0 +1,39 @@ +#' @name AndradeEx8.23 +#' @title Influência da Incidência Solar Sobre a Produção de Espiguetas +#' @description Estudo para verificar a influência da incidência solar +#' sobre a produção de espiguetas nas gramÃneas da espécie +#' \emph{Paspalum notatum} Flügge, conhecida como grama batatais. +#' Realizou-se no estudo a contagem das espiguetas produzidas pelas +#' plantas em dois locais: adjacentes ao sol e à sombra leve. +#' @format Um \code{data.frame} com 40 observações e 2 variáveis, em que +#' +#' \describe{ +#' +#' \item{\code{ambiente}}{Indica se o ambiente é iluminado ou sombrio.} +#' +#' \item{\code{espiguetas}}{Contagem de espiguetas nas gramÃneas da +#' espécie \emph{Paspalum notatum} Flügge.} +#' +#' } +#' @keywords AASI +#' @source Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as +#' ciências agrárias e biológicas com noções de experimentação (2nd +#' ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio +#' 23, pág. 414) +#' @examples +#' +#' data(AndradeEx8.23) +#' str(AndradeEx8.23) +#' +#' with(AndradeEx8.23, by(espiguetas, ambiente, summary)) +#' +#' library(lattice) +#' densityplot(~espiguetas, groups = ambiente, +#' data = AndradeEx8.23, +#' auto.key = list( +#' title = "Ambiente", +#' cex.title = 1, +#' corner = c(0.9, 0.95) +#' )) +#' +NULL diff --git a/R/AndradeEx8.9.R b/R/AndradeEx8.9.R new file mode 100644 index 0000000000000000000000000000000000000000..feacf1676e8e4d54a45d3af10b8f7f49a153a402 --- /dev/null +++ b/R/AndradeEx8.9.R @@ -0,0 +1,52 @@ +#' @name AndradeEx8.9 +#' @title Estudo da Quantidade de ProteÃnas após Operação +#' @description Estudo sobre a influência de uma determinada operação, +#' realizada em portadores de esquistossomose mansônica, na +#' quantidade de proteÃnas totais no plasma. No estudo mensurou-se a +#' quantidade de proteÃnas antes e depois da operação. +#' @format Um \code{data.frame} com 34 observações e 3 variáveis, em que +#' +#' \describe{ +#' +#' \item{\code{paciente}}{Indica os pacientes sujeitos a operação.} +#' +#' \item{\code{periodo}}{PerÃodo em que foi mensurada a quantidade de +#' proteÃnas totais no plasma (antes ou depois da operação).} +#' +#' \item{\code{prot}}{Quantidade de proteÃnas totais no plasma.} +#' +#' } +#' @keywords AASP +#' @source Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as +#' ciências agrárias e biológicas com noções de experimentação (2nd +#' ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio +#' 9, pág. 408) +#' @examples +#' +#' data(AndradeEx8.9) +#' str(AndradeEx8.9) +#' +#' # Dados apresentados em formato largo ("wide") +#' library(reshape2) +#' (da <- dcast(AndradeEx8.9, paciente ~ periodo, value.var = "prot")) +#' +#' # Pares de peso para cada animal +#' library(lattice) +#' dotplot(prot ~ paciente, +#' groups = periodo, +#' auto.key = list(title = "PerÃodo", +#' cex.title = 1.1, +#' columns = 2), +#' type = "p", +#' data = AndradeEx8.9, +#' xlab = "Paciente", +#' ylab = "Quantidade de ProteÃnas Totais no Plasma") +#' +#' # Distribuição das diferenças +#' densityplot(~antes - depois, data = da) +#' +#' # Testes de hipóteses +#' t.test(prot ~ periodo, paired = TRUE, data = AndradeEx8.9) +#' t.test(da$antes - da$depois) +#' +NULL diff --git a/R/AndradeTb8.6.R b/R/AndradeTb8.6.R new file mode 100644 index 0000000000000000000000000000000000000000..b596d721e828bcbda965a24f6043de870e35da4c --- /dev/null +++ b/R/AndradeTb8.6.R @@ -0,0 +1,40 @@ +#' @name AndradeTb8.6 +#' @title Avaliação de Classes FenotÃpicas de Plantas Di-hÃbridas +#' @description Na descendência obtida de cruzamentos entre plantas +#' puras de ervilhas com sementes amarelas lisas e outras com +#' sementes verdes rugosas, obtêm-se na primeira geração (F1), +#' ervilhas amarelas lisas. Essas, por autofecundação, produzem, na +#' segunda geração (F2), ervilhas de quatro tipos: amarelas lisas, +#' verdes lisas, amarelas rugosas e verdes rugosas. Segundo a +#' segunda lei de Mendel (lei da segregação independente), as +#' proporções esperadas para esses tipos de ervilhas são: 9/16, +#' 3/16, 3/16 e 1/16, respectivamente. Assim o objetivo desse +#' experimento é avaliar se o padrão de segregação dos caracteres +#' envolvidos segue o proposto pela segunda lei de Mendel. +#' @format Um \code{data.frame} com 4 observações e 3 variáveis, em que +#' +#' \describe{ +#' +#' \item{\code{textura}}{Textura das ervilhas (Lisa e Rugosa).} +#' +#' \item{\code{cor}}{Cor das ervilhas (Amarela e Verde).} +#' +#' \item{\code{freq}}{Frequência absoluta de cada tipo de ervilha.} +#' +#' } +#' @keywords contingência +#' @source Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as +#' ciências agrárias e biológicas com noções de experimentação (2nd +#' ed.). Florianópolis, SC. Editora da UFSC. (Tabela 8.6, pág. 372) +#' @examples +#' +#' data(AndradeTb8.6) +#' str(AndradeTb8.6) +#' +#' (xt <- xtabs(freq ~ ., data = AndradeTb8.6)) +#' prop.table(xt) +#' +#' plot(xt, cex.axis = 1, main = "") +#' barplot(xt, legend.text = TRUE) +#' +NULL diff --git a/R/AndradeTb8.7.R b/R/AndradeTb8.7.R new file mode 100644 index 0000000000000000000000000000000000000000..a6399013420ad92bc4a001ddd95951a9722b585e --- /dev/null +++ b/R/AndradeTb8.7.R @@ -0,0 +1,32 @@ +#' @name AndradeTb8.7 +#' @title Número de Ãrvores \emph{Guapira opposita} em Restinga +#' @description Estudo sobre o número de árvores da espécie +#' \emph{Guapira opposita} em local de restinga. Estudo realizado +#' com o objetivo de verificar a distribuição das árvores em local +#' de restinga. A área avaliada foi dividida em 94 quadrantes de +#' mesma área e contou-se o número de árvores por quadrante. +#' @format Um \code{data.frame} com 10 observações e 2 variáveis, em que +#' +#' \describe{ +#' +#' \item{\code{arvores}}{Número de árvores por quadrante.} +#' +#' \item{\code{quadr}}{Número de quadrantes com \code{arvores} árvores.} +#' +#' } +#' @keywords contingência* +#' @source Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as +#' ciências agrárias e biológicas com noções de experimentação (2nd +#' ed.). Florianópolis, SC. Editora da UFSC. (Tabela 8.7, pág. 374) +#' @examples +#' +#' data(AndradeTb8.7) +#' str(AndradeTb8.7) +#' +#' barplot(AndradeTb8.7$quadr, +#' col = "darkturquoise", +#' names.arg = AndradeTb8.7$arvores, +#' xlab = "Número de Ãrvores", +#' ylab = "Número de Quadrandres") +#' +NULL diff --git a/data-raw/AndradeEx7.15.txt b/data-raw/AndradeEx7.15.txt new file mode 100644 index 0000000000000000000000000000000000000000..b75e9b659aae56644863572adc2f06d9d19bcce6 --- /dev/null +++ b/data-raw/AndradeEx7.15.txt @@ -0,0 +1,30 @@ +10.02 +11.7 +13.92 +14.63 +4.75 +7.54 +12.3 +7.8 +2.66 +6.13 +9.2 +9.9 +14.2 +2.27 +6.4 +9.93 +4.6 +22.2 +12.65 +33.6 +7.2 +8.9 +16.9 +3.6 +10.75 +18 +6 +4.15 +31.8 +33 diff --git a/data-raw/AndradeEx8.11.txt b/data-raw/AndradeEx8.11.txt new file mode 100644 index 0000000000000000000000000000000000000000..09c384871fbf679b8869c0a167153c2067669991 --- /dev/null +++ b/data-raw/AndradeEx8.11.txt @@ -0,0 +1,31 @@ +animal estado peso +1 vivo 498 +2 vivo 510 +3 vivo 540 +4 vivo 580 +5 vivo 440 +6 vivo 350 +7 vivo 595 +8 vivo 513 +9 vivo 398 +10 vivo 410 +11 vivo 450 +12 vivo 495 +13 vivo 508 +14 vivo 515 +15 vivo 560 +1 jejum 453 +2 jejum 466 +3 jejum 491 +4 jejum 480 +5 jejum 405 +6 jejum 315 +7 jejum 557 +8 jejum 477 +9 jejum 353 +10 jejum 380 +11 jejum 412 +12 jejum 453 +13 jejum 462 +14 jejum 477 +15 jejum 505 diff --git a/data-raw/AndradeEx8.13.txt b/data-raw/AndradeEx8.13.txt new file mode 100644 index 0000000000000000000000000000000000000000..00ce0e205d9c4874b46ff90e3633b1b72297a8a4 --- /dev/null +++ b/data-raw/AndradeEx8.13.txt @@ -0,0 +1,61 @@ +arvores altura +Bracatinga 6.4 +Bracatinga 6.8 +Bracatinga 6.9 +Bracatinga 6.9 +Bracatinga 6.9 +Bracatinga 7 +Bracatinga 8.3 +Bracatinga 8.6 +Bracatinga 8.7 +Bracatinga 8.7 +Bracatinga 9 +Bracatinga 9.1 +Bracatinga 9.3 +Bracatinga 9.9 +Bracatinga 10.1 +Bracatinga 10.2 +Bracatinga 11.4 +Bracatinga 13.7 +Bracatinga 14.8 +Bracatinga 15.2 +Bracatinga 16.1 +Bracatinga 16.3 +Bracatinga 17.2 +Bracatinga 18.4 +Bracatinga 20 +Bracatinga 20.1 +Bracatinga 20.3 +Bracatinga 21.4 +Bracatinga 22.8 +Bracatinga 22.8 +Canafistula 8.2 +Canafistula 9.7 +Canafistula 9.8 +Canafistula 10.1 +Canafistula 10.1 +Canafistula 10.1 +Canafistula 10.3 +Canafistula 11.2 +Canafistula 13.2 +Canafistula 13.4 +Canafistula 14.1 +Canafistula 14.2 +Canafistula 14.4 +Canafistula 14.8 +Canafistula 15.9 +Canafistula 20.2 +Canafistula 20.3 +Canafistula 20.6 +Canafistula 29.9 +Canafistula 23.8 +Canafistula 25.7 +Canafistula 30.9 +Canafistula 35.5 +Canafistula 38.2 +Canafistula 40 +Canafistula 40.1 +Canafistula 40.2 +Canafistula 40.5 +Canafistula 41.8 +Canafistula 42.3 diff --git a/data-raw/AndradeEx8.17.txt b/data-raw/AndradeEx8.17.txt new file mode 100644 index 0000000000000000000000000000000000000000..216943c511f7932e63e18ec90d0ab62745d66a8d --- /dev/null +++ b/data-raw/AndradeEx8.17.txt @@ -0,0 +1,41 @@ +regiao altura +Cerrado 5.3 +Cerrado 2.5 +Cerrado 5.1 +Cerrado 2.6 +Cerrado 1.2 +Cerrado 3.1 +Cerrado 4.1 +Cerrado 3.7 +Cerrado 5 +Cerrado 1.6 +Cerrado 3 +Cerrado 4.7 +Cerrado 2.6 +Cerrado 4.2 +Cerrado 4 +Cerrado 4.7 +Cerrado 6.4 +Cerrado 2.9 +Cerrado 3.2 +Cerrado 2.1 +Restinga 3.6 +Restinga 2.3 +Restinga 6 +Restinga 2.1 +Restinga 5.2 +Restinga 4.3 +Restinga 3.9 +Restinga 2.1 +Restinga 2.4 +Restinga 2 +Restinga 2.7 +Restinga 3.9 +Restinga 5.6 +Restinga 4.7 +Restinga 1.9 +Restinga 5.1 +Restinga 4.7 +Restinga 2.1 +Restinga 6.1 +Restinga 8.1 diff --git a/data-raw/AndradeEx8.23.txt b/data-raw/AndradeEx8.23.txt new file mode 100644 index 0000000000000000000000000000000000000000..3c9f1b95eb37b3f9820eb1c76d5e8ffa6e4bd7e7 --- /dev/null +++ b/data-raw/AndradeEx8.23.txt @@ -0,0 +1,41 @@ +ambiente espiguetas +Iluminado 44 +Iluminado 54 +Iluminado 60 +Iluminado 60 +Iluminado 70 +Iluminado 75 +Iluminado 79 +Iluminado 80 +Iluminado 81 +Iluminado 83 +Iluminado 86 +Iluminado 88 +Iluminado 88 +Iluminado 89 +Iluminado 90 +Iluminado 91 +Iluminado 95 +Iluminado 101 +Iluminado 107 +Iluminado 108 +Sombrio 44 +Sombrio 47 +Sombrio 52 +Sombrio 55 +Sombrio 57 +Sombrio 59 +Sombrio 60 +Sombrio 61 +Sombrio 62 +Sombrio 63 +Sombrio 64 +Sombrio 66 +Sombrio 67 +Sombrio 67 +Sombrio 68 +Sombrio 68 +Sombrio 69 +Sombrio 71 +Sombrio 73 +Sombrio 76 diff --git a/data-raw/AndradeEx8.9.txt b/data-raw/AndradeEx8.9.txt new file mode 100644 index 0000000000000000000000000000000000000000..b65b9289599c6a862617e1b4d51650cfeb298edf --- /dev/null +++ b/data-raw/AndradeEx8.9.txt @@ -0,0 +1,35 @@ +paciente periodo prot +1 antes 6.9 +2 antes 7.8 +3 antes 6.6 +4 antes 5.9 +5 antes 7.8 +6 antes 6.4 +7 antes 8.8 +8 antes 7.3 +9 antes 8 +10 antes 8.6 +11 antes 7.7 +12 antes 7.9 +13 antes 8.7 +14 antes 5.8 +15 antes 9.2 +16 antes 9.3 +17 antes 8.9 +1 depois 6.9 +2 depois 8.6 +3 depois 8.7 +4 depois 7.3 +5 depois 7.8 +6 depois 8.2 +7 depois 9.3 +8 depois 7.3 +9 depois 7.6 +10 depois 7.8 +11 depois 7.6 +12 depois 7.8 +13 depois 8.1 +14 depois 6.8 +15 depois 8.3 +16 depois 10.2 +17 depois 9.1 diff --git a/data-raw/AndradeTb8.6.txt b/data-raw/AndradeTb8.6.txt new file mode 100644 index 0000000000000000000000000000000000000000..ccc446dd7d86cbd803a29fac143d9bcbd190d2e4 --- /dev/null +++ b/data-raw/AndradeTb8.6.txt @@ -0,0 +1,5 @@ +textura cor freq +Lisa Amarela 315 +Lisa Verde 108 +Rugosa Amarela 101 +Rugosa Verde 32 diff --git a/data-raw/AndradeTb8.7.txt b/data-raw/AndradeTb8.7.txt new file mode 100644 index 0000000000000000000000000000000000000000..0ee97667c4a8ebc7395546fd3707bc1239cdb39d --- /dev/null +++ b/data-raw/AndradeTb8.7.txt @@ -0,0 +1,11 @@ +arvores quadr +0 6 +1 18 +2 23 +3 19 +4 11 +5 6 +6 5 +7 4 +8 1 +>8 1 diff --git a/data/AndradeEx7.15.rda b/data/AndradeEx7.15.rda new file mode 100644 index 0000000000000000000000000000000000000000..a6fb47ee7acc60b64f34851d889f90383221ed38 Binary files /dev/null and b/data/AndradeEx7.15.rda differ diff --git a/data/AndradeEx8.11.rda b/data/AndradeEx8.11.rda new file mode 100644 index 0000000000000000000000000000000000000000..4538da2ac449329df083aff150992d3aa644f6d1 Binary files /dev/null and b/data/AndradeEx8.11.rda differ diff --git a/data/AndradeEx8.13.rda b/data/AndradeEx8.13.rda new file mode 100644 index 0000000000000000000000000000000000000000..89742da642132a7a0b28af9cf8fed7b65e17fd42 Binary files /dev/null and b/data/AndradeEx8.13.rda differ diff --git a/data/AndradeEx8.17.rda b/data/AndradeEx8.17.rda new file mode 100644 index 0000000000000000000000000000000000000000..fbebb4b12f4ad996c0bb1b4c3eb5c287d3328f49 Binary files /dev/null and b/data/AndradeEx8.17.rda differ diff --git a/data/AndradeEx8.23.rda b/data/AndradeEx8.23.rda new file mode 100644 index 0000000000000000000000000000000000000000..de6e99892af8298837dd8d43691dc66f17d97de5 Binary files /dev/null and b/data/AndradeEx8.23.rda differ diff --git a/data/AndradeEx8.9.rda b/data/AndradeEx8.9.rda new file mode 100644 index 0000000000000000000000000000000000000000..1204b570f4923c6ce6b5fa90aa3c08dbb351a872 Binary files /dev/null and b/data/AndradeEx8.9.rda differ diff --git a/data/AndradeTb8.6.rda b/data/AndradeTb8.6.rda new file mode 100644 index 0000000000000000000000000000000000000000..0f21ea0a2ebf86d37745024294f71f8ab8a2b1f4 Binary files /dev/null and b/data/AndradeTb8.6.rda differ diff --git a/data/AndradeTb8.7.rda b/data/AndradeTb8.7.rda new file mode 100644 index 0000000000000000000000000000000000000000..b9a9cf56c92852c1b3772cc7c6769c6ca0e455f1 Binary files /dev/null and b/data/AndradeTb8.7.rda differ diff --git a/man/AndradeEx7.15.Rd b/man/AndradeEx7.15.Rd new file mode 100644 index 0000000000000000000000000000000000000000..bdbbef55d6ba7f98312eef15d07e48e36917d10c --- /dev/null +++ b/man/AndradeEx7.15.Rd @@ -0,0 +1,39 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/AndradeEx7.15.R +\name{AndradeEx7.15} +\alias{AndradeEx7.15} +\title{Diâmetro de Forófitos Possuidores de Bromélias \emph{Vriesea + incurvata}} +\format{Um \code{vector} numérico com 30 observações.} +\source{ +Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as + ciências agrárias e biológicas com noções de experimentação (2nd + ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 7, ExercÃcio + 15, pág. 346) +} +\description{ +Estudo sobre os valores de diâmetro à altura do peito + (DAP), em centÃmetros, de uma amostra piloto de forófitos, + árvores suporte para epÃfitas, possuidores de \emph{Vriesea + incurvata} (bromélia, conhecida como espada de Davi), em + vegetação primária da Floresta Tropical Atlântica, em Santo Amaro + da Imperatriz, SC. +} +\examples{ + +data(AndradeEx7.15) +str(AndradeEx7.15) + +hist(AndradeEx7.15, + prob = TRUE, + labels = TRUE, + main = NULL, + ylim = c(0, 0.07), + col = "darkturquoise", + xlab = "DAP (cm)", + ylab = "Densidade") +lines(density(AndradeEx7.15), lwd = 2) + +} +\keyword{AAS} + diff --git a/man/AndradeEx8.11.Rd b/man/AndradeEx8.11.Rd new file mode 100644 index 0000000000000000000000000000000000000000..828100fe9196964c3e7be5b666bb8edb7b206732 --- /dev/null +++ b/man/AndradeEx8.11.Rd @@ -0,0 +1,56 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/AndradeEx8.11.R +\name{AndradeEx8.11} +\alias{AndradeEx8.11} +\title{Comparação entre o Peso Vivo e o Peso Jejum do Gado Crioulo + Lageano} +\format{Um \code{data.frame} com 30 observações e 3 variáveis, em que + +\describe{ + +\item{\code{animal}}{Fator de 15 nÃveis qualitativos, que são + os animais.} + +\item{\code{estado}}{Fator de 2 nÃveis qualitativos, que indica + o estado (vivo ou jejum) em que o animal foi pesado.} + +\item{\code{peso}}{Peso do animais, em kg.} + +}} +\source{ +Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as + ciências agrárias e biológicas com noções de experimentação (2nd + ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio + 11, pág. 409) +} +\description{ +Para comparar o peso vivo e o peso jejum do gado crioulo + lageano, um pesquisador selecionou aleatoriamente uma amostra de + 15 animais e anotou seus pesos. +} +\examples{ + +data(AndradeEx8.11) +str(AndradeEx8.11) + +# Dados apresentados em formato largo ("wide") +library(reshape2) +(da <- dcast(AndradeEx8.11, animal ~ estado, value.var = "peso")) + +# Pares de peso para cada animal +library(lattice) +dotplot(animal ~ peso, + groups = estado, + auto.key = list(title = "Estado", + cex.title = 1.1, + columns = 2), + data = AndradeEx8.11, + xlab = "Peso (kg)", + ylab = "Animal") + +# Distribuição das diferenças +densityplot(~jejum - vivo, data = da) + +} +\keyword{AASP} + diff --git a/man/AndradeEx8.13.Rd b/man/AndradeEx8.13.Rd new file mode 100644 index 0000000000000000000000000000000000000000..dd879dcef3394df2ba97fa6e02ca180d6ffcae6d --- /dev/null +++ b/man/AndradeEx8.13.Rd @@ -0,0 +1,47 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/AndradeEx8.13.R +\name{AndradeEx8.13} +\alias{AndradeEx8.13} +\title{Altura de Ãrvores Bracatinga e CanafÃstula} +\format{Um \code{data.frame} com 60 observações e 2 variáveis, em que + +\describe{ + +\item{\code{arvores}}{Espécie da árvore, Bracatinga ou CanafÃstula.} + +\item{\code{altura}}{Altura da árvore, em metros.} + +}} +\source{ +Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as + ciências agrárias e biológicas com noções de experimentação (2nd + ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio + 13, pág. 410) +} +\description{ +Estudo realizado por um agrônomo sobre o desenvolvimento + de duas espécies de árvores, Bracatinga (\emph{Mimosa scabrella}) + e CanafÃstula (\emph{Peltophorum dubium}). O objetivo é + verificar diferença entre o desenvolvimento das duas espécies, + para tal uma amostra de 30 árvores foi avaliada. O + desenvolvimento foi mensurado pela altura das altura das árvores. +} +\examples{ + +data(AndradeEx8.13) +str(AndradeEx8.13) + +with(AndradeEx8.13, by(altura, arvores, summary)) + +library(lattice) +densityplot(~altura, groups = arvores, + data = AndradeEx8.13, + auto.key = list( + title = "Espécies", + cex.title = 1, + corner = c(0.9, 0.95) + )) + +} +\keyword{AASI} + diff --git a/man/AndradeEx8.17.Rd b/man/AndradeEx8.17.Rd new file mode 100644 index 0000000000000000000000000000000000000000..e09bf2c345e14406710acfec60aa6d97d25b7c1e --- /dev/null +++ b/man/AndradeEx8.17.Rd @@ -0,0 +1,51 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/AndradeEx8.17.R +\name{AndradeEx8.17} +\alias{AndradeEx8.17} +\title{Comportamento da espécie \emph{Mandevilla velutina}} +\format{Um \code{data.frame} com 40 observações e 2 variáveis, em que + +\describe{ + +\item{\code{regiao}}{Região da plantação (Cerrado ou Restinga).} + +\item{\code{altura}}{Altura, em centÃmetros, dos explantes de + \emph{Mandevilla} cultivadas \emph{in vitro} durante 45 dias.} + +}} +\source{ +Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as + ciências agrárias e biológicas com noções de experimentação (2nd + ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio + 17, pág. 412) +} +\description{ +Experimento para avaliar o comportamento \emph{in vitro} + da espécie \emph{Mandevilla velutina} (Apocinácea), proveniente + de duas regiões: cerrado e restinga. Após isolar os explantes, + com um nó com duas gemas axilares, obtidos das plantas matrizes, + foi instalado o experimento em delineamento inteiramente + casualizado com 20 repetições (20 explantes para o cerrado de 20 + para a restinga), totalizando 40 unidades experimentais. A + variável mensurada foi a altura em centÃmetros dos explantes de + \emph{Mandevilla}, cultivadas \emph{in vitro} durante 45 dias. +} +\examples{ + +data(AndradeEx8.17) +str(AndradeEx8.17) + +with(AndradeEx8.17, by(altura, regiao, summary)) + +library(lattice) +densityplot(~altura, groups = regiao, + data = AndradeEx8.17, + auto.key = list( + title = "Região", + cex.title = 1, + corner = c(0.9, 0.95) + )) + +} +\keyword{AASI} + diff --git a/man/AndradeEx8.23.Rd b/man/AndradeEx8.23.Rd new file mode 100644 index 0000000000000000000000000000000000000000..c0105a637563afda76f68a3f94eef534d6eb354c --- /dev/null +++ b/man/AndradeEx8.23.Rd @@ -0,0 +1,47 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/AndradeEx8.23.R +\name{AndradeEx8.23} +\alias{AndradeEx8.23} +\title{Influência da Incidência Solar Sobre a Produção de Espiguetas} +\format{Um \code{data.frame} com 40 observações e 2 variáveis, em que + +\describe{ + +\item{\code{ambiente}}{Indica se o ambiente é iluminado ou sombrio.} + +\item{\code{espiguetas}}{Contagem de espiguetas nas gramÃneas da + espécie \emph{Paspalum notatum} Flügge.} + +}} +\source{ +Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as + ciências agrárias e biológicas com noções de experimentação (2nd + ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio + 23, pág. 414) +} +\description{ +Estudo para verificar a influência da incidência solar + sobre a produção de espiguetas nas gramÃneas da espécie + \emph{Paspalum notatum} Flügge, conhecida como grama batatais. + Realizou-se no estudo a contagem das espiguetas produzidas pelas + plantas em dois locais: adjacentes ao sol e à sombra leve. +} +\examples{ + +data(AndradeEx8.23) +str(AndradeEx8.23) + +with(AndradeEx8.23, by(espiguetas, ambiente, summary)) + +library(lattice) +densityplot(~espiguetas, groups = ambiente, + data = AndradeEx8.23, + auto.key = list( + title = "Ambiente", + cex.title = 1, + corner = c(0.9, 0.95) + )) + +} +\keyword{AASI} + diff --git a/man/AndradeEx8.9.Rd b/man/AndradeEx8.9.Rd new file mode 100644 index 0000000000000000000000000000000000000000..6aeb5bde668dd05e513fc60c7592753535afe048 --- /dev/null +++ b/man/AndradeEx8.9.Rd @@ -0,0 +1,60 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/AndradeEx8.9.R +\name{AndradeEx8.9} +\alias{AndradeEx8.9} +\title{Estudo da Quantidade de ProteÃnas após Operação} +\format{Um \code{data.frame} com 34 observações e 3 variáveis, em que + +\describe{ + +\item{\code{paciente}}{Indica os pacientes sujeitos a operação.} + +\item{\code{periodo}}{PerÃodo em que foi mensurada a quantidade de + proteÃnas totais no plasma (antes ou depois da operação).} + +\item{\code{prot}}{Quantidade de proteÃnas totais no plasma.} + +}} +\source{ +Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as + ciências agrárias e biológicas com noções de experimentação (2nd + ed.). Florianópolis, SC. Editora da UFSC. (CapÃtulo 8, ExercÃcio + 9, pág. 408) +} +\description{ +Estudo sobre a influência de uma determinada operação, + realizada em portadores de esquistossomose mansônica, na + quantidade de proteÃnas totais no plasma. No estudo mensurou-se a + quantidade de proteÃnas antes e depois da operação. +} +\examples{ + +data(AndradeEx8.9) +str(AndradeEx8.9) + +# Dados apresentados em formato largo ("wide") +library(reshape2) +(da <- dcast(AndradeEx8.9, paciente ~ periodo, value.var = "prot")) + +# Pares de peso para cada animal +library(lattice) +dotplot(prot ~ paciente, + groups = periodo, + auto.key = list(title = "PerÃodo", + cex.title = 1.1, + columns = 2), + type = "p", + data = AndradeEx8.9, + xlab = "Paciente", + ylab = "Quantidade de ProteÃnas Totais no Plasma") + +# Distribuição das diferenças +densityplot(~antes - depois, data = da) + +# Testes de hipóteses +t.test(prot ~ periodo, paired = TRUE, data = AndradeEx8.9) +t.test(da$antes - da$depois) + +} +\keyword{AASP} + diff --git a/man/AndradeTb8.6.Rd b/man/AndradeTb8.6.Rd new file mode 100644 index 0000000000000000000000000000000000000000..a03c4accfe9b9e2528a309e63cd3837db1cbdf44 --- /dev/null +++ b/man/AndradeTb8.6.Rd @@ -0,0 +1,48 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/AndradeTb8.6.R +\name{AndradeTb8.6} +\alias{AndradeTb8.6} +\title{Avaliação de Classes FenotÃpicas de Plantas Di-hÃbridas} +\format{Um \code{data.frame} com 4 observações e 3 variáveis, em que + +\describe{ + +\item{\code{textura}}{Textura das ervilhas (Lisa e Rugosa).} + +\item{\code{cor}}{Cor das ervilhas (Amarela e Verde).} + +\item{\code{freq}}{Frequência absoluta de cada tipo de ervilha.} + +}} +\source{ +Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as + ciências agrárias e biológicas com noções de experimentação (2nd + ed.). Florianópolis, SC. Editora da UFSC. (Tabela 8.6, pág. 372) +} +\description{ +Na descendência obtida de cruzamentos entre plantas + puras de ervilhas com sementes amarelas lisas e outras com + sementes verdes rugosas, obtêm-se na primeira geração (F1), + ervilhas amarelas lisas. Essas, por autofecundação, produzem, na + segunda geração (F2), ervilhas de quatro tipos: amarelas lisas, + verdes lisas, amarelas rugosas e verdes rugosas. Segundo a + segunda lei de Mendel (lei da segregação independente), as + proporções esperadas para esses tipos de ervilhas são: 9/16, + 3/16, 3/16 e 1/16, respectivamente. Assim o objetivo desse + experimento é avaliar se o padrão de segregação dos caracteres + envolvidos segue o proposto pela segunda lei de Mendel. +} +\examples{ + +data(AndradeTb8.6) +str(AndradeTb8.6) + +(xt <- xtabs(freq ~ ., data = AndradeTb8.6)) +prop.table(xt) + +plot(xt, cex.axis = 1, main = "") +barplot(xt, legend.text = TRUE) + +} +\keyword{contingência} + diff --git a/man/AndradeTb8.7.Rd b/man/AndradeTb8.7.Rd new file mode 100644 index 0000000000000000000000000000000000000000..a58b4f5fa25ff9613dd4df80600395ce36b45e58 --- /dev/null +++ b/man/AndradeTb8.7.Rd @@ -0,0 +1,40 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/AndradeTb8.7.R +\name{AndradeTb8.7} +\alias{AndradeTb8.7} +\title{Número de Ãrvores \emph{Guapira opposita} em Restinga} +\format{Um \code{data.frame} com 10 observações e 2 variáveis, em que + +\describe{ + +\item{\code{arvores}}{Número de árvores por quadrante.} + +\item{\code{quadr}}{Número de quadrantes com \code{arvores} árvores.} + +}} +\source{ +Andrade, D. F., Ogliari, P. J. (2010). EstatÃstica para as + ciências agrárias e biológicas com noções de experimentação (2nd + ed.). Florianópolis, SC. Editora da UFSC. (Tabela 8.7, pág. 374) +} +\description{ +Estudo sobre o número de árvores da espécie + \emph{Guapira opposita} em local de restinga. Estudo realizado + com o objetivo de verificar a distribuição das árvores em local + de restinga. A área avaliada foi dividida em 94 quadrantes de + mesma área e contou-se o número de árvores por quadrante. +} +\examples{ + +data(AndradeTb8.7) +str(AndradeTb8.7) + +barplot(AndradeTb8.7$quadr, + col = "darkturquoise", + names.arg = AndradeTb8.7$arvores, + xlab = "Número de Ãrvores", + ylab = "Número de Quadrandres") + +} +\keyword{contingência*} +