From c3bdf53d21a9dd012b8ec945c098fdf4d908c292 Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Mon, 22 Aug 2016 00:04:21 -0300 Subject: [PATCH 01/10] =?UTF-8?q?Revis=C3=A3o=20das=20tags,=20t=C3=ADtulo?= =?UTF-8?q?=20e=20refer=C3=AAncia:?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit - Elimina ou substituí tags reduntantes; - Quebra linha do título quando passa de 72; - Substituí referência completa por chamada curta. --- R/Banzatto.R | 204 ++++--- R/Barbin.R | 132 ++--- R/Costa.R | 33 +- R/Dias.R | 115 ++-- R/Faria.R | 43 +- R/Ferreira.R | 23 +- R/Manly.R | 541 ++++++++++--------- R/Mingoti.R | 14 +- R/Paula.R | 1443 +++++++++++++++++++++++++------------------------- R/Pimentel.R | 188 +++---- R/Ramalho.R | 193 +++---- R/Storck.R | 43 +- R/Vieira.R | 56 +- 13 files changed, 1420 insertions(+), 1608 deletions(-) diff --git a/R/Banzatto.R b/R/Banzatto.R index 691c75b4..dcadb17e 100644 --- a/R/Banzatto.R +++ b/R/Banzatto.R @@ -1,13 +1,14 @@ #' @name BanzattoQd1.2.3 -#' @title Di\enc{â}{a}metro \enc{à}{a} Altura do Peito de \emph{Eucalyptus saligna} +#' @title Di\enc{â}{a}metro \enc{à}{a} Altura do Peito de +#' \emph{Eucalyptus saligna} #' @description Valores de diâmetro à altura do peito (DAP, cm) de uma #' amostra aleatória de árvores de \emph{Eucalyptus saligna} de um #' povoamento com 15 anos de idade. #' @format Um vetor numérico com 20 elementos. -#' @keywords amostra -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 1.2.3 pág. 3) +#' @keywords AAS +#' @source BANZATTO; KRONKA (2013), Quadro 1.2.3, pág. 3. #' @examples +#' #' data(BanzattoQd1.2.3) #' #' hist(BanzattoQd1.2.3, prob = TRUE, @@ -26,7 +27,7 @@ NULL #' @name BanzattoQd3.2.1 -#' @title Controle de pulg\enc{ã}{a}o na cultura de pepino +#' @title Controle de Pulg\enc{ã}{a}o na Cultura de Pepino #' @description Dados de um experimento visando controle de pulgão #' (\emph{Aphis gossypii} Glover) em cultura de pepino, instalado em #' delineamento inteiramente casualizado com 6 repetições. A @@ -47,9 +48,7 @@ NULL #' #' } #' @keywords DIC contagem -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.2.1 pág. -#' 44) +#' @source BANZATTO; KRONKA (2013), Quadro 3.2.1, pág. 44. #' @examples #' #' library(lattice) @@ -70,7 +69,7 @@ NULL #' cultivares de mandioca. O experimento foi instalado em #' delineamento inteiramente casualizado devido a área ser homogênea #' quanto às condições experimentais. -#' @format Um \code{data.frame} com 25 observações e 3 variáveis. +#' @format Um \code{data.frame} com 25 observações e 3 variáveis, em que #' #' \describe{ #' @@ -85,9 +84,7 @@ NULL #' #' } #' @keywords DIC -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.4.1 pág. -#' 50) +#' @source BANZATTO; KRONKA (2013), Quadro 3.4.1, pág. 50. #' @examples #' #' library(lattice) @@ -104,12 +101,13 @@ NULL NULL #' @name BanzattoQd3.6.1 -#' @title Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca em Cultivares de Sorgo +#' @title Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca em Cultivares de +#' Sorgo #' @description Experimento em delineamento inteiramente casualizado #' avaliando a produção de matéria de cultivares de sorgo. O #' experimento é desbalanceado no número de repetições das #' cultivares. -#' @format Um \code{data.frame} com 30 observações e 3 variáveis. +#' @format Um \code{data.frame} com 30 observações e 3 variáveis, em que #' #' \describe{ #' @@ -123,9 +121,7 @@ NULL #' #' } #' @keywords DIC desbalanceado -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.6.1 pág. -#' 57) +#' @source BANZATTO; KRONKA (2013), Quadro 3.6.1, pág. 57. #' @examples #' library(lattice) #' @@ -141,12 +137,13 @@ NULL NULL #' @name BanzattoQd3.7.1 -#' @title Composi\enc{çã}{ca}o do Substrato na Altura de \emph{Pinus oocarpa} +#' @title Composi\enc{çã}{ca}o do Substrato na Altura de \emph{Pinus +#' oocarpa} #' @description Dados de experimento para estudo do efeito de 5 #' composições de substrato para o desenvolvimento de \emph{Pinus #' oocarpa}. Experimento realizado em delineamento inteiramente #' casualizado. -#' @format Um \code{data.frame} com 20 observações e 3 variáveis. +#' @format Um \code{data.frame} com 20 observações e 3 variáveis, em que #' #' \describe{ #' @@ -163,9 +160,7 @@ NULL #' #' } #' @keywords DIC contrastes -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.7.1 pág. -#' 64) +#' @source BANZATTO; KRONKA (2013), Quadro 3.7.1, pág. 64. #' @examples #' #' library(lattice) @@ -183,13 +178,13 @@ NULL NULL #' @name BanzattoQd4.5.2 -#' @title Efeito do Promalin sobre Furtos de Macieira +#' @title Efeito do Promalin sobre a Produçaõ de Frutos de Macieira #' @description Resultados de um experimento instalado na Fazenda #' Chapadão, no município de Angatuba - SP. O delineamento #' experimental foi o de blocos casualizados, sendo as parcelas #' constituídas de 4 plantas espaçadas de 6 x 7 metros, com 12 anos #' de idade na época da instalação do experimento. -#' @format Um \code{data.frame} com 20 observações e 3 variáveis. +#' @format Um \code{data.frame} com 20 observações e 3 variáveis, em que #' #' \describe{ #' @@ -206,9 +201,7 @@ NULL #' #' } #' @keywords DBC -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.5.2 -#' pág. 84) +#' @source BANZATTO; KRONKA (2013), Quadro 4.5.2, pág. 84. #' #' Mestriner, J. C. (1980). Estudos dos efeitos do promalin sobre #' frutos de macieiras (\emph{Malus} ssp) cultivares Brasil e @@ -235,13 +228,14 @@ NULL NULL #' @name BanzattoQd4.7.1 -#' @title Compara\enc{çã}{ca}o de M\enc{é}{e}todos de Semeadura do Mamoeiro +#' @title Compara\enc{çã}{ca}o de M\enc{é}{e}todos de Semeadura do +#' Mamoeiro #' @description Estudo realizado em Jaboticabal - SP por Ruiz (1977) #' que comparou métodos de semeadura no mamoeiro. O experimento foi #' instalado em delineamento de blocos casualizados, com 4 #' repetições, avaliando 3 métodos de semeadura. Foram avaliadas #' duas unidades experimentais por método em cada bloco. -#' @format Um \code{data.frame} com 24 observações e 3 variáveis. +#' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que #' #' \describe{ #' @@ -256,9 +250,7 @@ NULL #' #' } #' @keywords DBC -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.7.1 -#' pág. 93) +#' @source BANZATTO; KRONKA (2013), Quadro 4.7.1, pág. 93. #' #' Ruiz, P. R. N. (1977). Estudo comparativo entre diferentes métodos de #' semeadura na cultura do mamoeiro (\emph{Carica papaya} @@ -285,7 +277,8 @@ NULL NULL #' @name BanzattoQd5.2.1 -#' @title Peneira e Densidade de Plantio na Produ\enc{çã}{ca}o de Amendoim +#' @title Peneira e Densidade de Plantio na Produ\enc{çã}{ca}o de +#' Amendoim #' @description Dados de um experimento fatorial que estudou o efeito de #' densidade de plantio e tamanho da peneiras comerciais, de crivos #' circulares, para classificação das sementes da produção de @@ -315,9 +308,7 @@ NULL #' avaliações apenas no comprimento restante das duas linhas centrais, o #' que resultou em uma área útil de 6 m\eqn{^2}. #' @keywords DBC FAT2 -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.2.1, -#' pág. 102) +#' @source BANZATTO; KRONKA (2013), Quadro 5.2.1, pág. 102. #' @examples #' #' library(lattice) @@ -363,9 +354,7 @@ NULL #' #' } #' @keywords DIC FAT2 -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.2.4, -#' pág. 107) +#' @source BANZATTO; KRONKA (2013), Quadro 5.2.4, pág. 107. #' @examples #' #' library(lattice) @@ -382,12 +371,14 @@ NULL NULL #' @name BanzattoQd5.3.1 -#' @title Produ\enc{çã}{ca}o de Caf\enc{é}{e} em Fun\enc{çã}{ca}o de Aduba\enc{çã}{ca}o NPK +#' @title Produ\enc{çã}{ca}o de Caf\enc{é}{e} em Fun\enc{çã}{ca}o de +#' Aduba\enc{çã}{ca}o NPK #' @description Resultados de um experimento em arranjo fatorial triplo #' 2 \eqn{\times} 2 \eqn{\times} 2, instalado em delineamento de #' blocos casualizados, para estudar o efeito da combinação de #' nitrogênio, fósforo e potássio na produção de café coco. -#' @format Um \code{data.frame} com 48 observações e 5 variáveis. +#' @format Um \code{data.frame} com 48 observações e 5 variáveis, em que +#' #' \describe{ #' #' \item{\code{N}}{Variável numérica que indica ausência (0) ou @@ -408,9 +399,7 @@ NULL #' #' } #' @keywords DBC FAT3 -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.3.1, -#' pág. 113) +#' @source BANZATTO; KRONKA (2013), Quadro 5.3.1, pág. 113. #' @examples #' #' library(lattice) @@ -437,11 +426,13 @@ NULL NULL #' @name BanzattoQd5.3.7 -#' @title Efici\enc{ê}{e}ncia na Utiliza\enc{çã}{ca}o de P por Cultivares de trigo +#' @title Efici\enc{ê}{e}ncia na Utiliza\enc{çã}{ca}o de P por +#' Cultivares de Trigo #' @description Experimento em delineamento inteiramente casualizado que #' avaliou o efeito a eficiência na utilização de fósforo por três #' cultivares de trigo cultivadas em solo com e sem calagem. -#' @format Um \code{data.frame} com 48 observações e 5 variáveis. +#' @format Um \code{data.frame} com 48 observações e 5 variáveis, em que +#' #' \describe{ #' #' \item{\code{cult}}{Cultivares de trigo usadas no experimento: BR 20 @@ -462,9 +453,7 @@ NULL #' #' } #' @keywords DIC FAT3 -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.3.7, -#' pág. 120) +#' @source BANZATTO; KRONKA (2013), Quadro 5.3.7, pág. 120. #' @examples #' #' library(lattice) @@ -500,7 +489,8 @@ NULL #' graus de liberdade da interação tripla com o efeito dos blocos. O #' grupo de confundimento adotado foi o W. #' @format Um \code{data.frame} com 27 observações e 4 variáveis, em que -#' \describe{ +#' +#' \describe{ #' #' \item{\code{N}}{Níveis codificados de nitrogênio (N) que representam #' 0, 30 e 60 kg ha\eqn{^{-1}}. A fonte do N é o sulfato de amônio @@ -529,9 +519,7 @@ NULL #' híbrido de milho utilizado foi o HMD-7974. #' #' @keywords DBC FAT3 confundimento -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.5.1, -#' pág. 131) +#' @source BANZATTO; KRONKA (2013), Quadro 5.5.1, pág. 131. #' #' Vilalta, O. A. (1972). Avaliação da produção de milho (\emph{Zea #' mays} L.) em função da adubação NPK em um latossolo @@ -563,14 +551,15 @@ NULL NULL #' @name BanzattoQd6.2.2 -#' @title Espa\enc{ç}{c}amento de Plantio na Produ\enc{çã}{ca}o de Cana-de-a\enc{çú}{cu}car +#' @title Espa\enc{ç}{c}amento de Plantio na Produ\enc{çã}{ca}o de +#' Cana-de-a\enc{çú}{cu}car #' @description O experimento avaliou o efeito do espaçamento de plantio #' na produção de variedades de cana-de-açúcar. Para estudar os dois #' fatores, espaçamento e variedades, considerou-se o delineamento #' de blocos casualizados com arranjo de tratamentos de parcelas #' subdivididas com o espaçamento sendo casualizado dentro dos #' níveis de variedade. -#' @format Um \code{data.frame} com 40 observações e 4 variáveis. +#' @format Um \code{data.frame} com 40 observações e 4 variáveis, em que #' #' \describe{ #' @@ -587,9 +576,7 @@ NULL #' #' } #' @keywords DBC PS -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.2.2, -#' pág. 138) +#' @source BANZATTO; KRONKA (2013), Quadro 6.2.2, pág. 138. #' @examples #' #' library(lattice) @@ -622,7 +609,7 @@ NULL #' instalado em delineamento de blocos casualizados com arranjo de #' tratamento em parcela subdividida, sendo as doses casualizadas #' dentro dos níveis de adubo. -#' @format Um \code{data.frame} com 48 observações e 4 variáveis. +#' @format Um \code{data.frame} com 48 observações e 4 variáveis, em que #' #' \describe{ #' @@ -639,9 +626,7 @@ NULL #' #' } #' @keywords DBC PS -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.2.5, -#' pág. 144) +#' @source BANZATTO; KRONKA (2013), Quadro 6.2.5, pág. 144. #' @examples #' #' library(lattice) @@ -679,13 +664,15 @@ NULL NULL #' @name BanzattoQd6.3.4 -#' @title \enc{É}{E}pocas de Plantio e Colheita na Produ\enc{çã}{ca}o de Beterraba +#' @title \enc{É}{E}pocas de Plantio e Colheita na Produ\enc{çã}{ca}o de +#' Beterraba #' @description Experimento estudar o efeito de datas de plantio, épocas #' de colheita e aplicação de inseticidas na produção de #' beterraba. Os tratamentos foi arranjados em parcelas #' sub-subdivididas no delineamento de blocos casualizados. -#' @format Um \code{data.frame} com 72 observações e 5 variáveis. -#' \describe{ +#' @format Um \code{data.frame} com 72 observações e 5 variáveis, em que +#' +#' \describe{ #' #' \item{\code{data}}{Fator de níveis ordinais que representa as datas #' de plantio de beterraba. Os níveis do fator data foram @@ -707,9 +694,7 @@ NULL #' #' } #' @keywords DBC PSS -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.3.4, -#' pág. 156) +#' @source BANZATTO; KRONKA (2013), Quadro 6.3.4, pág. 156. #' @examples #' #' library(lattice) @@ -738,13 +723,15 @@ NULL NULL #' @name BanzattoQd6.4.2 -#' @title \enc{É}{E}poca de Plantio e Aduba\enc{çã}{ca}o Nitrogenada em Beterraba +#' @title \enc{É}{E}poca de Plantio e Aduba\enc{çã}{ca}o Nitrogenada em +#' Beterraba #' @description Experimento em delineamento de blocos casualizados cujos #' níveis dos fatores, época de plantio e nitrogênio, foram #' casualizados em faixas. A variável reposta observada foi a #' produção de beterraba. -#' @format Um \code{data.frame} com 80 observações e 4 variáveis. -#' \describe{ +#' @format Um \code{data.frame} com 80 observações e 4 variáveis, em que +#' +#' \describe{ #' #' \item{\code{nitro}}{Fator de níveis métricos que correspondem à #' quantidade de nitrogênio aplicada, em libras por acre.} @@ -771,9 +758,7 @@ NULL #' \if{latex}{\figure{BanzattoQd6-4-2.png}{options: width=1.75in}} #' #' @keywords DBC EF -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.4.2, -#' pág. 163) +#' @source BANZATTO; KRONKA (2013), Quadro 6.4.2, pág. 163. #' @examples #' #' library(lattice) @@ -807,7 +792,7 @@ NULL #' experimento foi instalado em delineamento inteiramente #' casualizado e foram estudados 7 níveis de gesso, de 0 a 300, #' igualmente espaçados em 50 kg ha\eqn{^{-1}}. -#' @format Um \code{data.frame} com 28 observações e 3 variáveis. +#' @format Um \code{data.frame} com 28 observações e 3 variáveis, em que #' #' \describe{ #' @@ -818,10 +803,8 @@ NULL #' \item{\code{peso}}{Peso de 1000 sementes de feijão, em gramas.} #' #' } -#' @keywords DIC -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.2.1, -#' pág. 170) +#' @keywords DIC REG +#' @source BANZATTO; KRONKA (2013), Quadro 7.2.1, pág. 170. #' #' Ragazzi, D. (1979). Efeito de doses de gesso na cultura do feijoeiro #' (\emph{Phaseolus vulgaris} L.). Trabalho de Conclusão de Curso @@ -843,13 +826,14 @@ NULL NULL #' @name BanzattoQd7.3.1 -#' @title Di\enc{â}{a}metro e Altura de Tubetes na Forma\enc{çã}{ca}o de Mudas de Eucalipto +#' @title Di\enc{â}{a}metro e Altura de Tubetes na Forma\enc{çã}{ca}o de +#' Mudas de Eucalipto #' @description Experimento fatorial 3 \eqn{\times} 3 que avaliou o #' efeito das dimensões do tubete (diâmetro e altura, 3 níveis cada) #' na produção de mudas de eucalipto. O experimento foi instalado em #' delineamento de blocos casualizados e a resposta medida foi a #' altura das mudas 75 dias após a semeadura. -#' @format Um \code{data.frame} com 27 observações e 4 variáveis. +#' @format Um \code{data.frame} com 27 observações e 4 variáveis, em que #' #' \describe{ #' @@ -864,9 +848,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.3.1, -#' pág. 177) +#' @source BANZATTO; KRONKA (2013), Quadro 7.3.1, pág. 177. #' @examples #' #' library(lattice) @@ -877,7 +859,8 @@ NULL #' #' xtabs(~at + dt, data = BanzattoQd7.3.1) #' -#' with(BanzattoQd7.3.1, addmargins(tapply(alt, list(at, dt), FUN = mean))) +#' with(BanzattoQd7.3.1, +#' addmargins(tapply(alt, list(at, dt), FUN = mean))) #' #' xyplot(alt ~ at, data = BanzattoQd7.3.1, #' groups = dt, type = c("p", "a", "g"), @@ -894,7 +877,7 @@ NULL #' fator qualitativo e outro quantitativo. O experimento está em #' delineamento de blocos casualizados e a resposta é a produção da #' cultura. -#' @format Um \code{data.frame} com 32 observações e 4 variáveis. +#' @format Um \code{data.frame} com 32 observações e 4 variáveis, em que #' #' \describe{ #' @@ -909,9 +892,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.3.3, -#' pág. 182) +#' @source BANZATTO; KRONKA (2013), Quadro 7.3.3, pág. 182. #' @examples #' #' library(lattice) @@ -941,7 +922,8 @@ NULL #' Guaíra - SP. Os ensaios foram instalados no delineamento de #' blocos casualizados com 4 repetições. A variável resposta é a #' produção de tubérculos, em t ha\eqn{^{-1}}. -#' @format Um \code{data.frame} com 160 observações e 4 variáveis. +#' @format Um \code{data.frame} com 160 observações e 4 variáveis, em +#' que #' #' \describe{ #' @@ -957,10 +939,8 @@ NULL #' \item{\code{prod}}{Produção de tubérculos, em tom ha\eqn{^{-1}}.} #' #' } -#' @keywords DBC GE -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.2.1, -#' pág. 190) +#' @keywords GE +#' @source BANZATTO; KRONKA (2013), Quadro 8.2.1, pág. 190. #' #' Filgueira, F. A. R. (1991). Interação genótipo ambiente em batata #' (\emph{Solanum tuberosum} L. spp \emph{tuberosum}). Tese @@ -990,13 +970,14 @@ NULL NULL #' @name BanzattoQd8.3.1 -#' @title Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos de Batata +#' @title Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos +#' de Batata #' @description Grupo de ensaios de competição de genótipos de batata #' realizado por Filgueira (1991) em Anápolis - GO. Cada experimento #' foi instalado em delineamento de blocos casualizados com 4 #' repetições. A variável resposta foi a produção, em t #' ha\eqn{^{-1}}, de batata. -#' @format Um \code{data.frame} com 40 observações e 3 variáveis. +#' @format Um \code{data.frame} com 40 observações e 3 variáveis, em que #' #' \describe{ #' @@ -1017,10 +998,8 @@ NULL #' em cada um dos experimentos. As estimativas dos quadrados médios #' residuais em cada experimento estão disponíveis no atributo #' \code{"qmr"} do objeto. -#' @keywords GE DBC -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.3.1, -#' pág. 196) +#' @keywords GE +#' @source BANZATTO; KRONKA (2013), Quadro 8.3.1, pág. 196. #' #' Filgueira, F. A. R. (1991). Interação genótipo ambiente em batata #' (\emph{Solanum tuberosum} L. spp \emph{tuberosum}). Tese @@ -1051,11 +1030,12 @@ NULL NULL #' @name BanzattoQd8.4.1 -#' @title Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos de Cebola +#' @title Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos +#' de Cebola #' @description Grupo de experimentos de competição de genótipos de #' cebola realizado por Santos (2003). O delineamento considerado em #' cada ensaio não foi informado. -#' @format Um \code{data.frame} com 60 observações e 3 variáveis. +#' @format Um \code{data.frame} com 60 observações e 3 variáveis, em que #' #' \describe{ #' @@ -1070,9 +1050,7 @@ NULL #' #' } #' @keywords GE -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.4.1, -#' pág. 200) +#' @source BANZATTO; KRONKA (2013), Quadro 8.4.1, pág. 200. #' #' Santos, G. M. (2003). Adaptabilidade e estabilidade de genótipos de #' cebola. Tese (Doutorado em Genética e Melhoramento de @@ -1101,12 +1079,13 @@ NULL NULL #' @name BanzattoQd8.4.3 -#' @title Grupo de Experimentos de Aduba\enc{çã}{ca}o Nitrogenada em Milho +#' @title Grupo de Experimentos de Aduba\enc{çã}{ca}o Nitrogenada em +#' Milho #' @description Dados referentes à produção de milho em grãos de ensaios #' fatoriais \eqn{3^3} de adubação NPK na cultura do milho. Os #' experimentos foram realizados em 8 locais. O delineamento #' experimental não foi informado. -#' @format Um \code{data.frame} com 24 observações e 3 variáveis. +#' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que #' #' \describe{ #' @@ -1126,9 +1105,7 @@ NULL #' O \code{data.frame} possui um atributo com os quadrados médios #' residuais em cada experimento. #' @keywords GE -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.4.3, -#' pág. 202) +#' @source BANZATTO; KRONKA (2013), Quadro 8.4.3, pág. 202. #' @examples #' #' library(lattice) @@ -1156,7 +1133,7 @@ NULL #' de cultivares de milho. O experimento foi instalado em #' delineamento de blocos casualizados. Além da produção em cada #' parcela, contou-se o número de plantas por parcela (stand) -#' @format Um \code{data.frame} com 24 observações e 6 variáveis. +#' @format Um \code{data.frame} com 24 observações e 6 variáveis, em que #' #' \describe{ #' @@ -1184,9 +1161,7 @@ NULL #' níveis. #' #' @keywords DBC COV -#' @source Banzatto, D. A., Kronka, S. D. (2013). Experimentação -#' Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 9.2.1, -#' pág. 206) +#' @source BANZATTO; KRONKA (2013), Quadro 9.2.1, pág. 206. #' @examples #' #' library(lattice) @@ -1205,4 +1180,3 @@ NULL #' ylab = expression("Produção"~(g~parcela^{-1}))) #' NULL - diff --git a/R/Barbin.R b/R/Barbin.R index 1dd3be55..f66c20b5 100644 --- a/R/Barbin.R +++ b/R/Barbin.R @@ -5,9 +5,7 @@ #' no espaçamento 2\eqn{\times}2,5 metros. #' @format Um vetor com 50 elementos de valor numérico. #' @keywords AAS -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 1, pág. 199) +#' @source BARBIN (2013), Exercício 1, pág. 199. #' @examples #' #' library(latticeExtra) @@ -56,12 +54,13 @@ NULL #' @name BarbinEx13 -#' @title Di\enc{â}{a}metro M\enc{é}{e}dio do Tronco de Esp\enc{é}{e}cies de Eucalipto +#' @title Di\enc{â}{a}metro M\enc{é}{e}dio do Tronco de +#' Esp\enc{é}{e}cies de Eucalipto #' @description Diâmetro médio (cm), aos 5 anos de idade, de plantas #' úteis da parcela de um ensaio fatorial 2 \eqn{\times} 4, em #' blocos casualizados com 3 repetições, conduzido por H. A. Mello e #' outros, Mogi-Guaçu (1966-1971). -#' @format Um \code{data.frame} com 24 observações e 4 variáveis. +#' @format Um \code{data.frame} com 24 observações e 4 variáveis, em que #' #' \describe{ #' @@ -77,9 +76,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 13, pág. 206) +#' @source BARBIN (2013), Exercício 13, pág. 206. #' @examples #' #' library(lattice) @@ -103,7 +100,7 @@ NULL #' @description Ensaio fatorial de adubação NPK, fatorial \eqn{2^3}, com #' resultados referentes à produção de milho (kg ha\eqn{^{-1}}), #' conduzido em delineamento de blocos casualizados em Limoeiro, PE. -#' @format Um \code{data.frame} com 24 observações e 5 variáveis. +#' @format Um \code{data.frame} com 24 observações e 5 variáveis, em que #' #' \describe{ #' @@ -122,9 +119,7 @@ NULL #' #' } #' @keywords DBC FAT3 -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 14, pág. 206) +#' @source BARBIN (2013), Exercício 14, pág. 206. #' @examples #' #' library(lattice) @@ -154,7 +149,7 @@ NULL #' delineamento inteiramente casualizado, portanto este é o fator da #' parcela. O corte é o fator da subparcela porque são medidas #' repetidas (no tempo, inclusive) na mesma unidade experimental. -#' @format Um \code{data.frame} com 40 observações e 4 variáveis. +#' @format Um \code{data.frame} com 40 observações e 4 variáveis, em que #' #' \describe{ #' @@ -174,9 +169,7 @@ NULL #' #' } #' @keywords PS FAT2 -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 16, pág. 208) +#' @source BARBIN (2013), Exercício 16, pág. 208. #' @examples #' #' library(lattice) @@ -200,7 +193,8 @@ NULL NULL #' @name BarbinEx17 -#' @title Efeito do Espa\enc{ç}{c}amento na Produtividade de Laranjeira Val\enc{ê}{e}ncia +#' @title Efeito do Espa\enc{ç}{c}amento na Produtividade de Laranjeira +#' Val\enc{ê}{e}ncia #' @description Dados de produtividade de laranja, em kg por planta, de #' um ensaio em blocos casualizados estudando o efeito do #' espaçamento de plantio de laranjeira Valência (clone novo) sobre @@ -225,9 +219,7 @@ NULL #' #' } #' @keywords DBC PS FAT2 -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 17, pág. 209) +#' @source BARBIN (2013), Exercício 17, pág. 209. #' @examples #' #' library(lattice) @@ -257,7 +249,8 @@ NULL NULL #' @name BarbinEx18 -#' @title Altura de Plantas de Esp\enc{é}{e}cies de Eucalipto em V\enc{á}{a}rios Locais +#' @title Altura de Plantas de Esp\enc{é}{e}cies de Eucalipto em +#' V\enc{á}{a}rios Locais #' @description Dados referentes à altura de plantas de eucalipto, com 3 #' anos de idade, em ensaios inteiramente casualizados estudando o #' efeito da espécie de eucalipto em vários municípios (grupo de @@ -283,9 +276,7 @@ NULL #' #' } #' @keywords GE DIC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 18, pág. 210) +#' @source BARBIN (2013), Exercício 18, pág. 210. #' @examples #' #' library(lattice) @@ -304,25 +295,25 @@ NULL NULL #' @name BarbinEx3 -#' @title Podrid\enc{ã}{a}o Mole de Manga em Fun\enc{çã}{ca}o do Tratamento T\enc{é}{e}rmico +#' @title Podrid\enc{ã}{a}o Mole de Manga em Fun\enc{çã}{ca}o do +#' Tratamento T\enc{é}{e}rmico #' @description Os dados referem-se as notas (médias de 6 frutos) #' atribuídas a podridão mole de manga (fruto) sob diferentes #' tratamentos térmicos, de um experimento inteiramente ao acaso #' realizado pelo Prof. Vladimir R. Sampaio, do Departamento de #' Horticultura, ESALQ-USP. -#' @format Um \code{data.frame} com 28 observações e 2 variáveis. +#' @format Um \code{data.frame} com 28 observações e 2 variáveis, em que #' \describe{ #' -#' \item{\code{tterm}}{Fator categórico que indica o tratamento térmico.} +#' \item{\code{tterm}}{Fator categórico que indica o tratamento +#' térmico.} #' #' \item{\code{nota}}{Nota atribuída a podridão mole de manga, valor #' resultante da média de 6 frutos avaliados.} #' #' } #' @keywords DIC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 3, pág. 119) +#' @source BARBIN (2013), Exercício 3, pág. 119. #' @examples #' #' library(lattice) @@ -344,7 +335,7 @@ NULL #' \emph{E. saligna} Sm., de um ensaio inteiramente casualizado, de #' controle químico de "Damping-off" conduzido por Krugner (1971). #' -#' @format Um \code{data.frame} com 45 observações e 3 variáveis. +#' @format Um \code{data.frame} com 45 observações e 3 variáveis, em que #' #' \describe{ #' @@ -360,9 +351,7 @@ NULL #' #' } #' @keywords DBC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 8, pág. 202) +#' @source BARBIN (2013), Exercício 8, pág. 202. #' #' Krugner, T. L. Controle químico do "damping-off" em #' eucalipto. Piracicaba, 1971. 60p. Dissertação (Mestrado) - Escola @@ -387,14 +376,15 @@ NULL #' @name BarbinEx9 #' @aliases BarbinEx10 -#' @title Ensaio de Competi\enc{çã}{ca}o de Clones de Laranja Pera-do-Rio +#' @title Ensaio de Competi\enc{çã}{ca}o de Clones de Laranja +#' Pera-do-Rio #' @description Ensaio de competição de 13 clones de laranja Pera-do-Rio #' onde foram obtidos os resultados de produção, em kg de frutos #' planta, para o ano de 1987, em que as plantas estavam com 16 anos #' de idade. O ensaio foi conduzido pelo Dr. Joaquim Teófilo Sobrino #' em delineamento de blocos ao acaso na Estação Experimental de #' Limeira, do IAC. -#' @format Um \code{data.frame} com 78 observações e 4 variáveis. +#' @format Um \code{data.frame} com 78 observações e 4 variáveis, em que #' #' \describe{ #' @@ -413,9 +403,7 @@ NULL #' @details O dataset \code{BarbinEx10} resulta de uma agregação dos #' dados do \code{BarbinEx9} que está disponível na seção Examples. #' @keywords DBC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (Exercício 9, pág. 203) +#' @source BARBIN (2013), Exercício 9, pág. 203. #' @examples #' #' library(latticeExtra) @@ -469,9 +457,7 @@ NULL #' #' } #' @keywords DQL -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 104) +#' @source BARBIN (2013), pág. 104. #' @examples #' #' library(lattice) @@ -503,7 +489,8 @@ NULL NULL #' @name BarbinPg114 -#' @title Influ\enc{ê}{e}ncia do Aparelho e Operador na Medi\enc{çã}{ca}o de \enc{Á}{A}rvores +#' @title Influ\enc{ê}{e}ncia do Aparelho e Operador na +#' Medi\enc{çã}{ca}o de \enc{Á}{A}rvores #' @description Dados de um experimento fatorial 5 \eqn{\times} 4, em #' delineamento de blocos casualizados, sobre e influência do #' aparelho e do operador na determinação de altura de árvores, aos @@ -520,7 +507,8 @@ NULL #' sorteio continuava até as combinações fossem realizadas na #' árvore, então passava-se para a próxima árvore. Evidentemente, a #' medida feita com o trena ficava sempre para o final (testemunha). -#' @format Um \code{data.frame} com 200 observações e 4 variáveis. +#' @format Um \code{data.frame} com 200 observações e 4 variáveis, em +#' que #' #' \describe{ #' @@ -541,9 +529,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 114) +#' @source BARBIN (2013), pág. 114. #' #' Simões, J. W., Mello, H. A., Barbin, D. (1967). Eficiência dos #' aparelhos e e influência do operador na medição de altura total @@ -584,7 +570,7 @@ NULL #' com dois níveis (fatorial \eqn{2^3}), na produção de café #' coco. Os níveis dos fertilizantes foram codificados para 0 e 1 e #' não foi informada as doses reais de cada um deles. -#' @format Um \code{data.frame} com 48 observações e 5 variáveis. +#' @format Um \code{data.frame} com 48 observações e 5 variáveis, em que #' #' \describe{ #' @@ -593,7 +579,8 @@ NULL #' #' \item{\code{P}}{Inteiro que codifica dois níveis de fósforo (0 e 1).} #' -#' \item{\code{K}}{Inteiro que codifica dois níveis de potássio (0 e 1).} +#' \item{\code{K}}{Inteiro que codifica dois níveis de potássio (0 e +#' 1).} #' #' \item{\code{bloc}}{Fator de níveis categóricos considerado para #' controle local.} @@ -604,9 +591,7 @@ NULL #' #' } #' @keywords DBC FAT3 -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 125) +#' @source BARBIN (2013), pág. 125). #' @examples #' #' library(lattice) @@ -627,13 +612,14 @@ NULL NULL #' @name BarbinPg137 -#' @title Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Algod\enc{ã}{a}o Herb\enc{á}{a}ceo +#' @title Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de +#' Algod\enc{ã}{a}o Herb\enc{á}{a}ceo #' @description Produção de algodão herbáceo de um ensaio de adubação #' NPK \eqn{3^3} com confundimento (grupo W) de dois graus de #' liberdade da interação tripla. Cada combinação NPK teve duas #' repetições por bloco e o ensaio foi conduzido por Cavalcanti #' (1977) em Pernambuco. -#' @format Um \code{data.frame} com 54 observações e 6 variáveis. +#' @format Um \code{data.frame} com 54 observações e 6 variáveis, em que #' \describe{ #' #' \item{\code{N}}{Dose de nitrogênio (kg ha\eqn{^{-1}}) usada na @@ -656,9 +642,7 @@ NULL #' #' } #' @keywords DBC FAT3 confundimento -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 137) +#' @source BARBIN (2013), pág. 137. #' #' Cavalcanti, F. B. (1977). A adubação mineral na cultura do algodão #' (\emph{Gossypium hirsutum} L.) no Estado de @@ -703,7 +687,8 @@ NULL NULL #' @name BarbinPg156 -#' @title Aplica\enc{çã}{ca}o de Aduba\enc{çã}{ca}o Fosfatada na Produ\enc{çã}{ca}o de Milho +#' @title Aplica\enc{çã}{ca}o de Aduba\enc{çã}{ca}o Fosfatada na +#' Produ\enc{çã}{ca}o de Milho #' @description Dados de um ensaio de adubação fosfatada em milho, #' realizado no esquema de parcelas subdivididas em delineamento de #' blocos ao acaso, que avaliou o efeito da forma de aplicação da @@ -727,9 +712,7 @@ NULL #' #' } #' @keywords PS DBC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 156) +#' @source BARBIN (2013), pág. 156. #' @examples #' #' library(lattice) @@ -748,7 +731,8 @@ NULL NULL #' @name BarbinPg167 -#' @title Produ\enc{çã}{ca}o de Porta-enxertos para Laranjeira em V\enc{á}{a}rias Safras +#' @title Produ\enc{çã}{ca}o de Porta-enxertos para Laranjeira em +#' V\enc{á}{a}rias Safras #' @description Dados de produção de laranja de um ensaio de competição #' de porta-enxertos para laranjeira Valência realizado na Estação #' Experimental de Limeira, em delineamento de blocos casualizados. @@ -770,9 +754,7 @@ NULL #' #' } #' @keywords PS DBC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 167) +#' @source BARBIN (2013), pág. 167. #' @examples #' #' library(latticeExtra) @@ -796,7 +778,8 @@ NULL NULL #' @name BarbinPg177 -#' @title Altura de Prog\enc{ê}{e}nies de \emph{E. grandis} em Tr\enc{ê}{e}s Locais +#' @title Altura de Prog\enc{ê}{e}nies de \emph{E. grandis} em +#' Tr\enc{ê}{e}s Locais #' @description Dados de experimento que mediu a altura (m) de árvores #' seis progênies de \emph{Eucaliptus grandis} em experimentos #' instalados em 3 locais sob o delineamento de blocos casualizados. @@ -818,9 +801,7 @@ NULL #' #' } #' @keywords GE DBC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 177) +#' @source BARBIN (2013), pág. 177. #' @examples #' #' library(latticeExtra) @@ -843,7 +824,7 @@ NULL #' foram comparadas quatro cultivares de pêssego quando ao #' enraizamento de estacas. Experimento foi instalado em #' delineamento inteiramente casualizado. -#' @format Um \code{data.frame} com 20 observações e 2 variáveis. +#' @format Um \code{data.frame} com 20 observações e 2 variáveis, em que #' #' \describe{ #' @@ -859,9 +840,7 @@ NULL #' posição das observações consideradas perdidas para se ilustrar a #' análise do experimento com número não igual de repetições. #' @keywords DIC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 25) +#' @source BARBIN (2013), pág. 25. #' #' Sambão, J. C., Sampaio, V. R., Barbin, D. (1982). Enraizamento de #' estacas herbáceas de pessegueiro (\emph{Prunus persica} @@ -886,7 +865,7 @@ NULL #' @description Dados de produção de laranjeira aos 12 anos de idade sob #' diferentes porta-enxertos. O experimento foi instalado em #' delineamento de blocos casualizados. -#' @format Um \code{data.frame} com 27 observações e 3 variáveis. +#' @format Um \code{data.frame} com 27 observações e 3 variáveis, em que #' #' \describe{ #' @@ -904,9 +883,7 @@ NULL #' consideradas como perdidas para ilustrar como fazer a análise do #' experimento desbalanceado. #' @keywords DBC -#' @source Barbin, D. (2013). Planejamento e Análise Estatística de -#' Experimentos Agronômicos (2nd ed.). Londrina, PR: -#' Mecenas. (pág. 72) +#' @source BARBIN (2013), pág. 72. #' #' Teófilo Sobrinho, J. (1972). Comportamento da laranjeira valência #' (\emph{Citrus sinensis} L., Osbeck) sob diferentes @@ -926,4 +903,3 @@ NULL #' ylab = "Número médio de frutos por planta") #' NULL - diff --git a/R/Costa.R b/R/Costa.R index 26153fe2..1c9e6ff2 100644 --- a/R/Costa.R +++ b/R/Costa.R @@ -1,5 +1,6 @@ #' @name CostaEx5.7.2 -#' @title Densidade do Solo ao Longo do Perfil em Zonas de Compacta\enc{çã}{ca}o +#' @title Densidade do Solo ao Longo do Perfil em Zonas de +#' Compacta\enc{çã}{ca}o #' @description Os dados são resultados de um estudo feito em zonas de #' compactação e referem-se a valores de densidade do solo em #' amostras retiradas de diferentes profundidades no perfil do solo. @@ -14,10 +15,8 @@ #' amostra retirada do perfil do solo.} #' #' } -#' @keywords TODO -#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às -#' ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa -#' Agrobiologia. (Exemplo 5.7.2.1, pág. 90) +#' @keywords RL +#' @source Costa (2013), Exemplo 5.7.2.1, pág. 90. #' @examples #' #' library(lattice) @@ -51,9 +50,7 @@ NULL #' #' } #' @keywords DIC RegSeg -#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às -#' ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa -#' Agrobiologia. (Exemplo 5.7.3.1, pág. 95) +#' @source Costa (2013), Exemplo 5.7.3.1, pág. 95. #' @examples #' #' library(lattice) @@ -90,9 +87,7 @@ NULL #' #' } #' @keywords DIC -#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às -#' ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa -#' Agrobiologia. (Tabela 4, pág. 58) +#' @source Costa (2013), Tabela 4, pág. 58. #' @examples #' #' library(lattice) @@ -130,9 +125,7 @@ NULL #' #' } #' @keywords DBC -#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às -#' ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa -#' Agrobiologia. (Tabela 6 pág. 63) +#' @source Costa (2013), Tabela 6 pág. 63. #' @examples #' #' library(lattice) @@ -176,9 +169,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às -#' ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa -#' Agrobiologia. (Tabela 7, pág. 68) +#' @source Costa (2013), Tabela 7, pág. 68. #' @examples #' #' library(lattice) @@ -205,7 +196,8 @@ NULL NULL #' @name CostaTb8 -#' @title Irriga\enc{çã}{ca}o no Tamanho de Frutos de Variedades de Banana +#' @title Irriga\enc{çã}{ca}o no Tamanho de Frutos de Variedades de +#' Banana #' @description Experimento em parcelas subdivididas que estudou o #' comprimento de frutos de variedades de banana em função do nível #' de irrigação fornecido. @@ -231,9 +223,7 @@ NULL #' #' } #' @keywords DBC PS -#' @source Costa, J. R. (2003). Técnicas experimentais aplicadas às -#' ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa -#' Agrobiologia. (Tabela 8, pág. 76) +#' @source Costa (2013), Tabela 8, pág. 76. #' @examples #' #' library(lattice) @@ -258,4 +248,3 @@ NULL #' ylab = expression("Comprimento do fruto"~(cm))) #' NULL - diff --git a/R/Dias.R b/R/Dias.R index a85fdb7a..3a630036 100644 --- a/R/Dias.R +++ b/R/Dias.R @@ -1,6 +1,6 @@ #' @name DiasEg10.1 -#' @title Subst\enc{â}{a}ncias Alelo\enc{á}{a}ticas no Percentual de Germina\enc{çã}{ca}o de -#' Sementes +#' @title Subst\enc{â}{a}ncias Alelo\enc{á}{a}ticas no Percentual de +#' Germina\enc{çã}{ca}o de Sementes #' @description Experimento em delineamento inteiramente casualizado #' onde foram avaliados os percentuais de germinação de sementes de #' 2 cultivares, submetidas a 5 tratamentos com substâncias @@ -22,8 +22,7 @@ #' #' } #' @keywords DIC FAT2 -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 10.1, pág. 269) +#' @source BARROS; DIAS (2009), Exemplo 10.1, pág. 269. #' @examples #' #' library(lattice) @@ -65,8 +64,7 @@ NULL #' #' } #' @keywords DIC PS -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 10.2, pág. 286) +#' @source BARROS; DIAS (2009), Exemplo 10.2, pág. 286. #' @examples #' #' library(lattice) @@ -108,8 +106,7 @@ NULL #' } #' #' @keywords DBC GE -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 11.1, pág. 305) +#' @source BARROS; DIAS (2009), Exemplo 11.1, pág. 305. #' @examples #' #' library(lattice) @@ -138,8 +135,7 @@ NULL #' @format Vetor com 43 observações que são o número de frutos #' produzidos por plantas de cacaueiro. #' @keywords AAS -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. +#' @source BARROS; DIAS (2009), Exemplo 3.2. #' @examples #' #' stem(DiasEg3.2) @@ -160,8 +156,7 @@ NULL #' @description Amostras aleatória da alturas de plantas de milho. #' @format Vetor com 100 observações da altura (cm). #' @keywords AAS -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. +#' @source BARROS; DIAS (2009), Exemplo 3.6. #' @examples #' #' stem(DiasEg3.6) @@ -180,8 +175,8 @@ NULL NULL #' @name DiasEg5.1 -#' @title N\enc{ú}{u}mero de Ovos Eclodidos de Nemat\enc{ó}{o}ides Ap\enc{ó}{o}s Aplica\enc{çã}{ca}o de -#' Nematicidas Naturais +#' @title N\enc{ú}{u}mero de Ovos Eclodidos de Nemat\enc{ó}{o}ides +#' Ap\enc{ó}{o}s Aplica\enc{çã}{ca}o de Nematicidas Naturais #' @description Resultados de um experimento em delineamento #' inteiramente casualizado que avaliou o efeito de 5 nematicidas #' naturais na eclosão de ovos de nematoides. @@ -197,8 +192,7 @@ NULL #' #' } #' @keywords DIC contagem -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 5.1, pág. 130) +#' @source BARROS; DIAS (2009), Exemplo 5.1, pág. 130. #' @examples #' #' library(lattice) @@ -233,8 +227,7 @@ NULL #' #' } #' @keywords DIC -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 11, pág. 321) +#' @source BARROS; DIAS (2009), Exercício 9, Cap. 11, pág. 321. #' @examples #' #' library(lattice) @@ -252,7 +245,8 @@ NULL NULL #' @name DiasEg6.1 -#' @title Ganhos de Produ\enc{çã}{ca}o de Arroz nos Ciclos de Sele\enc{çã}{ca}o +#' @title Ganhos de Produ\enc{çã}{ca}o de Arroz nos Ciclos de +#' Sele\enc{çã}{ca}o #' @description Amostra com 6 pares de observações representanto os #' ciclos de seleção e ganhos percentuais de produção #' correspondentes em arroz. @@ -267,8 +261,7 @@ NULL #' #' } #' @keywords DIC -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 6.1, pág. 157) +#' @source BARROS; DIAS (2009), Exemplo 6.1, pág. 157. #' @examples #' #' library(lattice) @@ -283,7 +276,8 @@ NULL NULL #' @name DiasEg6.2 -#' @title Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Feij\enc{ã}{a}o +#' @title Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de +#' Feij\enc{ã}{a}o #' @description Experimento instalado em delineamento de blocos #' casualizados para estudar o efeito da adubação NPK na #' produtividade do feijoeiro. @@ -302,8 +296,7 @@ NULL #' #' } #' @keywords DBC RP -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 6.2, pág. 164) +#' @source BARROS; DIAS (2009), Exemplo 6.2, pág. 164. #' @examples #' #' library(lattice) @@ -340,8 +333,7 @@ NULL #' #' } #' @keywords AAS -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 6.3, pág. 173) +#' @source BARROS; DIAS (2009), Exemplo 6.3, pág. 173. #' @examples #' #' library(lattice) @@ -366,15 +358,14 @@ NULL #' \item{\code{luz}}{Fator métrico que identifica, em escala codificada, #' a quantidade de luz aplicada.} #' -#' \item{\code{agua}}{Fator métrico que identifica, em escala codificada, -#' a quantidade de água aplicada.} +#' \item{\code{agua}}{Fator métrico que identifica, em escala +#' codificada, a quantidade de água aplicada.} #' #' \item{\code{prod}}{Produção de tomateiros.} #' #' } #' @keywords DIC RM -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 7.1, pág. 187) +#' @source BARROS; DIAS (2009), Exemplo 7.1, pág. 187. #' @examples #' #' library(lattice) @@ -411,8 +402,7 @@ NULL #' #' } #' @keywords DIC -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 9.1, pág. 222) +#' @source BARROS; DIAS (2009), Exemplo 9.1, pág. 222. #' @examples #' #' library(lattice) @@ -450,8 +440,7 @@ NULL #' #' } #' @keywords ClaHier -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 9.2, pág. 231) +#' @source BARROS; DIAS (2009), Exemplo 9.2, pág. 231. #' @examples #' #' library(lattice) @@ -490,8 +479,7 @@ NULL #' #' } #' @keywords DQL -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exemplo 9.4, pág.247) +#' @source BARROS; DIAS (2009), Exemplo 9.4, pág. 247. #' @examples #' #' library(lattice) @@ -538,8 +526,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 10, pág. 296) +#' @source BARROS; DIAS (2009), Exercício 10, Cap. 10, pág. 296. #' @examples #' #' library(lattice) @@ -580,9 +567,7 @@ NULL #' } #' #' @keywords DBC -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 10.4, Cap. 10, -#' pág. 294) +#' @source BARROS; DIAS (2009), Exercício 10.4, Cap. 10, pág. 294. #' @examples #' #' library(lattice) @@ -629,8 +614,7 @@ NULL #' #' } #' @keywords DIC FAT3 -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 10, pág. 295) +#' @source BARROS; DIAS (2009), Exercício 7, Cap. 10, pág. 295. #' @examples #' #' library(lattice) @@ -651,7 +635,8 @@ NULL NULL #' @name DiasEx10.4.8 -#' @title Teores de Mat\enc{é}{e}ria Seca de Gramineas em Fun\enc{çã}{ca}o da Calagem +#' @title Teores de Mat\enc{é}{e}ria Seca de Gramineas em +#' Fun\enc{çã}{ca}o da Calagem #' @description Em um ensaio em delineamento de blocos casualizados foi #' analisado o efeito de doses de calcário no teor de matéria seca #' de gramíneas forrageiras. Foi utilizado esquema fatorial 3 @@ -674,8 +659,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 8, Cap. 10, pág. 295) +#' @source BARROS; DIAS (2009), Exercício 8, Cap. 10, pág. 295. #' @examples #' #' library(lattice) @@ -712,8 +696,7 @@ NULL #' #' } #' @keywords DBC -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 8, Cap. 11, pág. 321 +#' @source BARROS; DIAS (2009), Exercício 8, Cap. 11, pág. 321. #' @examples #' #' library(lattice) @@ -760,8 +743,7 @@ NULL #' #' } #' @keywords GE DIC -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 11, pág. 321) +#' @source BARROS; DIAS (2009), Exercício 9, Cap. 11, pág. 321. #' @examples #' #' library(lattice) @@ -782,7 +764,8 @@ NULL NULL #' @name DiasEx3.6.7 -#' @title Percentual de Germina\enc{çã}{ca}o de Lotes de Sementes de Tomate +#' @title Percentual de Germina\enc{çã}{ca}o de Lotes de Sementes de +#' Tomate #' @description Percentuais de germinação de 2 lotes de sementes de #' tomate com 5 repetições com 100 sementes em cada repetição. #' @format Um \code{data.frame} com 2 observações e 1 variável, em que @@ -796,8 +779,7 @@ NULL #' #' } #' @keywords AAS -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 7.6, pág.102) +#' @source BARROS; DIAS (2009), (Exercício 7, Cap. 7.6, pág. 102. #' @examples #' #' library(lattice) @@ -825,8 +807,7 @@ NULL #' #' } #' @keywords RL -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 1, Cap. 6, pág. 179) +#' @source BARROS; DIAS (2009), Exercício 1, Cap. 6, pág. 179. #' @examples #' #' library(lattice) @@ -852,9 +833,8 @@ NULL #' \item{\code{diam}}{Diãmetro em centimetros.} #' #' } -#' @keywords ASS RL -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 7, pág. 181) +#' @keywords AAS RL +#' @source BARROS; DIAS (2009), Exercício 10, Cap. 7, pág. 181. #' @examples #' #' library(lattice) @@ -880,8 +860,7 @@ NULL #' #' } #' @keywords AAS RL -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 6, pág. 181) +#' @source BARROS; DIAS (2009), Exercício 9, Cap. 6, pág. 181. #' #' library(lattice) #' @@ -913,8 +892,7 @@ NULL #' } #' #' @keywords DQL -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 9, pág. 261) +#' @source BARROS; DIAS (2009), Exercício 10, Cap. 9, pág. 261. #' @examples #' #' library(lattice) @@ -954,8 +932,7 @@ NULL #' #' } #' @keywords DIC contagem -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 4, Cap. 9, pág. 260) +#' @source BARROS; DIAS (2009), Exercício 4, Cap. 9, pág. 260. #' @examples #' #' library(lattice) @@ -973,7 +950,8 @@ NULL NULL #' @name DiasEx9.6.6 -#' @title Teores de S\enc{ó}{o}lidos Sol\enc{ú}{u}veis Totais da Poupa de Frutos +#' @title Teores de S\enc{ó}{o}lidos Sol\enc{ú}{u}veis Totais da Poupa +#' de Frutos #' @description Experimento em delineamento inteiramente casualizado, #' com 5 repetições e 4 cultivares de tomateiro onde os totais de #' sólidos solúveis na poupa dos frutos foram avaliados. @@ -990,8 +968,7 @@ NULL #' #' } #' @keywords DIC -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 6, Cap. 9, pág. 260) +#' @source BARROS; DIAS (2009), Exercício 6, Cap. 9, pág. 260. #' @examples #' #' library(lattice) @@ -1031,8 +1008,7 @@ NULL #' #' } #' @keywords DBC -#' @source Dias, L. A. S., Barros, W. S. (2009). Biometria -#' Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 9, pág. 261) +#' @source BARROS; DIAS (2009), Exercício 7, Cap. 9, pág. 261. #' @examples #' #' library(lattice) @@ -1048,4 +1024,3 @@ NULL #' ylab = "Número de frutos na primeira colheita") #' NULL - diff --git a/R/Faria.R b/R/Faria.R index 33dec29e..c3785fb0 100644 --- a/R/Faria.R +++ b/R/Faria.R @@ -1,5 +1,6 @@ #' @name FariaEg2.9.5 -#' @title Varia\enc{çã}{ca}o de M\enc{é}{e}todos para a Determina\enc{çã}{ca}o da CTC do Solo +#' @title Varia\enc{çã}{ca}o de M\enc{é}{e}todos para a +#' Determina\enc{çã}{ca}o da CTC do Solo #' @description Dois métodos de CTC do solo são usados em uma amostra de #' controle e fornecem os resultados em cmol kg\eqn{^{-1}}. #' @format Um \code{data.frame} com 20 observações e 3 variáveis, em que @@ -12,9 +13,8 @@ #' \item{\code{ctc}}{CTC da amostra de solo, em cmol kg\eqn{^{-1}}.} #' #' } -#' @keywords ASS -#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) -#' Ilhéus - BA: UESC. (Exemplo 2.9.5, pág 39) +#' @keywords AAS +#' @source FARIA (2009), Exemplo 2.9.5, pág 39. #' @examples #' #' library(lattice) @@ -49,8 +49,7 @@ NULL #' #' } #' @keywords DIC -#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) -#' Ilhéus, BA: UESC. (Tabela 3.2.4, pág 46) +#' @source FARIA (2009), Tabela 3.2.4, pág 46. #' @examples #' #' library(lattice) @@ -68,12 +67,12 @@ NULL NULL #' @name FariaQd11.4 -#' @title Produ\enc{çã}{ca}o de Batatas em Fun\enc{çã}{ca}o da Calagem e Aduba\enc{çã}{ca}o +#' @title Produ\enc{çã}{ca}o de Batatas em Fun\enc{çã}{ca}o da Calagem e +#' Aduba\enc{çã}{ca}o #' @description Experimento montado em delineamento inteiramente #' casualizado para estudar o efeito da combibação dos fatores #' irrigação e calagem da produção de batata. -#' @format Um \code{data.frame} com 16 observações e 4 variáveis, em -#' que +#' @format Um \code{data.frame} com 16 observações e 4 variáveis, em que #' #' \describe{ #' @@ -90,8 +89,7 @@ NULL #' #' } #' @keywords DIC FAT2 -#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) -#' Ilhéus - BA: UESC. (Quadro 11.4, pág. 134) +#' @source FARIA (2009), Quadro 11.4, pág. 134. #' @examples #' #' library(lattice) @@ -111,7 +109,8 @@ NULL NULL #' @name FariaQd11.9 -#' @title Qualidade de Mudas em Fun\enc{çã}{ca}o do Recipiente da Esp\enc{é}{e}cie +#' @title Qualidade de Mudas em Fun\enc{çã}{ca}o do Recipiente da +#' Esp\enc{é}{e}cie #' @description Experimento montado no delineamento inteiramente #' casualizado cujo resultado é a qualidade de mudas em função do #' recipiente utilizado e para cada espécie cultiavda. @@ -132,8 +131,7 @@ NULL #' #' } #' @keywords DIC FAT2 -#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) -#' Ilhéus - BA: UESC. (Quadro 11.9, pág 145) +#' @source FARIA (2009), Quadro 11.9, pág 145. #' @examples #' #' library(lattice) @@ -182,8 +180,7 @@ NULL #' As parcelas da testemunha, que não receberam aplicação de TVC, #' exibiram um valor 0 para a colonização das vassouras-de-bruxa. #' @keywords DBC PS -#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) -#' Ilhéus - BA: UESC. ( Quadro 12.5, pág. 159) +#' @source FARIA (2009), Quadro 12.5, pág. 159. #' @examples #' #' library(lattice) @@ -221,8 +218,7 @@ NULL #' #' } #' @keywords DIC RL -#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) -#' Ilhéus - BA: UESC. (Quadro 14.2 pág. 198) +#' @source FARIA (2009), Quadro 14.2 pág. 198. #' @examples #' #' library(lattice) @@ -238,8 +234,8 @@ NULL NULL #' @name FariaQd14.3 -#' @title Aduba\enc{çã}{ca}o com F\enc{ó}{o}sforo na Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca de Parte -#' A\enc{é}{e}rea de Milho +#' @title Aduba\enc{çã}{ca}o com F\enc{ó}{o}sforo na Produ\enc{çã}{ca}o +#' de Mat\enc{é}{e}ria Seca de Parte A\enc{é}{e}rea de Milho #' @description Os dados abaixo são provenientes de um ensaio #' experimental realizado em casa de vegetação, montado no #' delineamento em blocos casualizados, com 5 repetições, para @@ -260,8 +256,7 @@ NULL #' #' } #' @keywords DBC -#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) -#' Ilhéus - BA: UESC. (Quadro 14.3 pág. 200) +#' @source FARIA (2009), Quadro 14.3 pág. 200. #' @examples #' #' library(lattice) @@ -295,8 +290,7 @@ NULL #' #' } #' @keywords DIC -#' @source Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) -#' Ilhéus, BA: UESC. (Tabela 6.1 pág 76) +#' @source FARIA (2009), Tabela 6.1 pág 76. #' @examples #' #' library(lattice) @@ -307,4 +301,3 @@ NULL #' xyplot(prod ~ varied, data = FariaQd6.1) #' NULL - diff --git a/R/Ferreira.R b/R/Ferreira.R index 49dff9f9..13cf31c9 100644 --- a/R/Ferreira.R +++ b/R/Ferreira.R @@ -256,7 +256,7 @@ NULL #' #' aggregate(peroxido ~ amostra, data = FerreiraEg7.1, summary) #' aggregate(proteina ~ amostra, data = FerreiraEg7.1, summary) -#' +#' #' par(mar = c(4, 5, 4, 5)) #' boxplot(proteina ~ amostra, data = FerreiraEg7.1, #' xlim = c(0.5, 2.5), border = 4, @@ -264,7 +264,7 @@ NULL #' axes = FALSE) #' box() #' axis(side = 2, col.axis = 4) -#' mtext(side = 2, text = "Proteínas em g/dl", line = 3, col = 4) +#' mtext(side = 2, text = "Proteínas em g/dl", line = 3, col = 4) #' par(new = TRUE, mar = c(4, 5, 4, 5)) #' boxplot(peroxido ~ amostra, data = FerreiraEg7.1, #' xlim = c(0.5, 2.5), border = 2, @@ -274,7 +274,7 @@ NULL #' axis(side = 1, at = 1:2, labels = c("antes", "depois")) #' mtext(side = 4, text = "Peróxidos em nmol/g de proteína", #' line = 3, col = 2) -#' +#' NULL #' @name FerreiraEg7.4 @@ -282,7 +282,7 @@ NULL #' @description Com o interesse de testar a hipótese de igualdade entre #' duas variedades de milho, foram mensuradas as variáveis aleatórias #' produtividade e altura das plantas em cada uma das variedades. -#' +#' #' @format Um \code{data.frame} com 11 observações e 3 variáveis. #' #' \describe{ @@ -306,7 +306,7 @@ NULL #' aggregate(prod ~ varie, data = FerreiraEg7.4, summary) #' aggregate(altura ~ varie, data = FerreiraEg7.4, summary) #' by(FerreiraEg7.4[2:3], FerreiraEg7.4[1], cov) -#' +#' #' with(FerreiraEg7.4, { #' par(mar = c(4, 5, 4, 5)) #' plot.default(y = prod, xlab = "", ylab = "", @@ -317,7 +317,7 @@ NULL #' box() #' axis(side = 2, col.axis = 4) #' mtext(side = 2, text = "Produtividade em t/ha", -#' line = 3, col = 4) +#' line = 3, col = 4) #' par(new = TRUE, mar = c(4, 5, 4, 5)) #' plot.default(y = altura, xlab = "", ylab = "", #' x = jitter(as.numeric(varie), factor = 0.5) + 0.1, @@ -533,7 +533,7 @@ NULL #' e depois de terem sido submetidos a uma dieta balanceada. O #' interesse do estudo é avaliar se houve efeito significativo da #' dieta nas variáveis peso e teor de proteína. -#' +#' #' @format Um \code{data.frame} com 12 observações e 3 variáveis. #' #' \describe{ @@ -555,9 +555,9 @@ NULL #' #' aggregate(peso ~ fase, data = FerreiraEx7.4.1, summary) #' aggregate(teor ~ fase, data = FerreiraEx7.4.1, summary) -#' +#' #' by(FerreiraEx7.4.1[2:3], FerreiraEx7.4.1[1], cov) -#' +#' #' with(FerreiraEx7.4.1, { #' par(mar = c(4, 5, 4, 5)) #' plot.default(y = peso, xlab = "", ylab = "", @@ -567,7 +567,7 @@ NULL #' axes = FALSE) #' box() #' axis(side = 2, col.axis = 4) -#' mtext(side = 2, text = "Peso", line = 3, col = 4) +#' mtext(side = 2, text = "Peso", line = 3, col = 4) #' par(new = TRUE, mar = c(4, 5, 4, 5)) #' plot.default(y = teor, xlab = "", ylab = "", #' x = jitter(as.numeric(fase), factor = 0.5) + 0.15, @@ -661,7 +661,7 @@ NULL #' O tipo de carne é indicado conforme nomenclatura das linhas do #' \code{data.frame}. Os tipos de carne marisco, siri e camarão são #' todos enlatados. -#' @keywords agrupamento +#' @keywords AnaAgrup #' @source Ferreira, D. F. (2011). Estatística Multivariada (2nd #' ed.). Lavras, MG: Editora UFLA. (Exercício 9.7.2, pág. 409) #' @references Bussab, W. O., Miazaki, É. S., Andrade, @@ -685,4 +685,3 @@ NULL #' legend = c("2 grupos (k=2)", "3 grupos (k=3)")) #' NULL - diff --git a/R/Manly.R b/R/Manly.R index c0712a15..090d74f0 100644 --- a/R/Manly.R +++ b/R/Manly.R @@ -1,44 +1,44 @@ #' @name ManlyTb6.7 -#' @title Consumo de prote\enc{í}{i}na +#' @title Consumo de prote\enc{í}{i}na #' #' @description Estimativas do consumo médio de proteínas de diferentes fontes de alimentos para os habitantes de 25 países europeus. Medida em gramas por pessoa por dia #' #' @format Um \code{data.frame} com 25 países em 9 variáveis. -#' +#' #' \describe{ #' #' \item{\code{pais}}{Identificação do país.} -#' +#' #' \item{\code{cv}}{Consumo de carne vermelha medida em gramas por pessoa por dia.} -#' +#' #' \item{\code{cb}}{Consumo de carne branca.} #' #' \item{\code{ovo}}{Consumo de ovos.} -#' +#' #' \item{\code{leite}}{Consumo de leite.} -#' +#' #' \item{\code{peixe}}{Consumo de peixe.} -#' +#' #' \item{\code{cere}}{Consumo por cereais.} -#' +#' #' \item{\code{carb}}{Consumo de carboidratos.} -#' +#' #' \item{\code{gnso}}{Consumo de grãos, nozes e sementes oleaginosas.} -#' +#' #' \item{\code{fv}}{Consumo de frutas e vegetais.} -#' +#' #' \item{\code{total}}{Total de consumo do país.} -#' +#' #' } -#' @keywords CP +#' @keywords AnaComPrin #' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução. #' Porto Alegre, RS: Bookman (pg 103) #' @examples #' #' data(ManlyTb6.7) -#' +#' #' pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnso + fv, -#' data = ManlyTb6.7, +#' data = ManlyTb6.7, #' main="Matriz das variáveis de consumo de proteína") NULL @@ -81,32 +81,32 @@ NULL #' @name ManlyTb1.2 #' @title Cr\enc{â}{a}nios eg\enc{í}{i}pcios #' -#' @description Medidas de crânios egípcios masculinos em cinco períodos +#' @description Medidas de crânios egípcios masculinos em cinco períodos #' de tempo. Medidas tomadas em milímetros. #' -#' @format Um \code{data.frame} com os tamanhos de 30 crânios para cada +#' @format Um \code{data.frame} com os tamanhos de 30 crânios para cada #' período de tempo, com quatro variáveis. -#' +#' #' \describe{ -#' +#' #' \item{\code{grup}}{Identificação do período} #' #' \item{\code{x1}}{Largura máxima.} -#' +#' #' \item{\code{x2}}{Altura basibregamática.} #' #' \item{\code{x3}}{Comprimento basialveolar.} #' #' \item{\code{x4}}{Altura nasal.} -#' +#' #' } -#' +#' #' A figura abaixo descreve as medidas do crânio. #' \if{html}{\figure{ManlyTb1-2.jpg}{options: width="250px"}} -#' \if{latex}{\figure{ManlyTb1-2.jpg}{options: width=1.75in}} -#' -#' @keywords Afd -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +#' \if{latex}{\figure{ManlyTb1-2.jpg}{options: width=1.75in}} +#' +#' @keywords AnaFat +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - #' uma introdução. Porto Alegre, RS: Bookman (pg 16) #' @examples #' @@ -114,64 +114,64 @@ NULL #' require(lattice) #' require(reshape2) #' -#' splom(~ManlyTb1.2[2:5] | grup, data = ManlyTb1.2, -#' layout=c(3,2), +#' splom(~ManlyTb1.2[2:5] | grup, data = ManlyTb1.2, +#' layout=c(3,2), #' pscales = 0, #' varnames = c("x1", "x2","x3", "x4"), #' main = "Gráfico de dispersão das medidas de crânio para cada período") -#' +#' #' ManlyTb1.2long <- melt(ManlyTb1.2, id.vars = "grup") -#' +#' #' bwplot(value ~grup | variable, data = ManlyTb1.2long, -#' scales = list(relation = "free"), -#' ylab = "", +#' scales = list(relation = "free"), +#' ylab = "", #' main = "Boxplot das medições de crânio em cada período" ) #' -#' +#' NULL #' @name ManlyTb1.3 #' @title Distribui\enc{ç}{c}ao de uma esp\enc{é}{e}cie de borboletas #' -#' @description Estudo de colônias de borboletas do tipo \emph{Euphydryas -#' editha} na Califórnia e em Oregon, EUA, com variáveis ambientais e +#' @description Estudo de colônias de borboletas do tipo \emph{Euphydryas +#' editha} na Califórnia e em Oregon, EUA, com variáveis ambientais e #' frequências gênicas. #' #' @format Um \code{data.frame} com 16 colônias de borboletas com 11 variáveis. -#' +#' #' \describe{ #' #' \item{\code{colo}}{Identificação da colônia.} -#' +#' #' \item{\code{alt}}{Altitude (em pés).} -#' +#' #' \item{\code{precip}}{Precipitação anual (em polegadas).} #' #' \item{\code{tempmax}}{Temperatura máxima.} -#' +#' #' \item{\code{tempmin}}{Temperatura mínima.} -#' +#' #' \item{\code{dg0.4}}{Frequência 0.4 em demobilidade gênica PGi (porcentagem).} -#' +#' #' \item{\code{dg0.6}}{Frequência 0.6 em demobilidade gênica PGi.} -#' +#' #' \item{\code{dg0.8}}{Frequência 0.8 em demobilidade gênica PGi.} -#' +#' #' \item{\code{dg1}}{Frequência 1 em demobilidade gênica PGi.} -#' +#' #' \item{\code{dg1.16}}{Frequência 1.16 em demobilidade gênica PGi.} -#' +#' #'\item{\code{dg1.3}}{Frequência 1.3 em demobilidade gênica PGi.} -#' +#' #' } -#' @keywords CP -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados +#' @keywords AnaComPrin +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados #' - uma introdução. Porto Alegre, RS: Bookman (pg 19) #' @examples #' #' data(ManlyTb1.3) -#' -#' pairs(~ alt + precip + tempmax + tempmin + dg0.4 + dg0.6 + dg0.8 + +#' +#' pairs(~ alt + precip + tempmax + tempmin + dg0.4 + dg0.6 + dg0.8 + #' dg1 + dg1.16 + dg1.3, data = ManlyTb1.3, cex.labels = 1.4, #' main="Matriz de gráficos de dispersão") NULL @@ -179,90 +179,90 @@ NULL #' @name ManlyTb1.4 #' @title C\enc{ã}{a}es pr\enc{é}{e}-hist\enc{ó}{o}ricos da Tail\enc{â}{a}ndia #' -#' @description Estudo em ancestrais de cães da Tailândia, +#' @description Estudo em ancestrais de cães da Tailândia, #' através de medições das mandíbulas. #' -#' @format Um \code{data.frame} com 7 grupos caninos e 6 variáveis. -#' +#' @format Um \code{data.frame} com 7 grupos caninos e 6 variáveis. +#' #' \describe{ #' #' \item{\code{grup}}{Grupo canino} -#' +#' #' \item{\code{largm}}{Largura da mandíbula (mm)} -#' +#' #' \item{\code{altm}}{Altura da mandíbula abaixo do primeiro molar (mm).} #' #' \item{\code{comppm}}{Comprimento do primeiro molar (mm).} -#' +#' #' \item{\code{largpm}}{Largura do primeiro molar (mm).} -#' +#' #' \item{\code{comppt}}{Comprimento do primeiro ao terceiro molar (mm).} -#' +#' #' \item{\code{comppq}}{Comprimento do primeiro ao quarto molar (mm).} #' } #' -#' @keywords AnaClust +#' @keywords AnaAgrup #' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução. #' Porto Alegre, RS: Bookman (pg 21) #' @examples #' #' #' data(ManlyTb1.4) -#' +#' #' pairs(~largm + altm + comppm + largpm + comppt + comppq, -#' data = ManlyTb1.4, +#' data = ManlyTb1.4, #' main="Gráfico de dispersão para as medições da mandíbula") NULL #' @name ManlyTb1.5 #' @title Emprego em paises europeus #' -#' @description Porcentagens da força de trabalho de empregados para nove +#' @description Porcentagens da força de trabalho de empregados para nove #' diferentes campos de trabalho em 30 países europeus #' #' @format Um \code{data.frame} com 30 registros em 11 variáveis. -#' +#' #' \describe{ #' #' \item{\code{pais}}{Identificação do país.} -#' -#' \item{\code{grup}}{Grupo econômico ao qual pertencente o país: União +#' +#' \item{\code{grup}}{Grupo econômico ao qual pertencente o país: União #' Europeia (UE); Área europeia de livre comércio (AELC); Leste; Outro} -#' -#' \item{\code{afp}}{Porcentagem da população ativa empregada na agricultura, +#' +#' \item{\code{afp}}{Porcentagem da população ativa empregada na agricultura, #' florestal e pesca.} #' #' \item{\code{mep}}{Porcentagem empregada na mineração e exploração de pedreiras.} -#' +#' #' \item{\code{fab}}{Porcentagem empregada nas fábricas.} -#' -#' \item{\code{fea}}{Porcentagem empregada nas áreas de fornecimento de +#' +#' \item{\code{fea}}{Porcentagem empregada nas áreas de fornecimento de #' energia e água.} -#' +#' #' \item{\code{con}}{Porcentagem empregada na construção.} -#' +#' #' \item{\code{ser}}{Porcentagem empregada na área de serviços.} -#' +#' #' \item{\code{fin}}{Porcentagem empregada na área de finanças.} -#' +#' #' \item{\code{ssp}}{Porcentagem empregada na área de serviços sociais e #' pessoais.} -#' -#' \item{\code{tc}}{Porcentagem empregada nas áreas de transportes e +#' +#' \item{\code{tc}}{Porcentagem empregada nas áreas de transportes e #' comunicações.} -#' +#' #' } #' -#' @keywords AnaClust -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +#' @keywords AnaAgrup +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- #' uma introdução. Porto Alegre, RS: Bookman (pg 22) #' @examples #' # #' data(ManlyTb1.5) -#' +#' #' pairs(~afp + mep + fab + fea + con + ser + fin + ssp + tc, -#' data = ManlyTb1.5, +#' data = ManlyTb1.5, #' main="Matriz das variáveis de força de trabalho" #' ) NULL @@ -270,111 +270,111 @@ NULL #' @name ManlyTb10.2 #' @title Vari\enc{á}{a}veis solo e vegeta\enc{çã}{ca}o em Belize #' -#' @description Estudo no distrito de Corozal, em Belize, com 4 variáveis -#' de solo e 4 variáveis de vegetação registradas para quadrados +#' @description Estudo no distrito de Corozal, em Belize, com 4 variáveis +#' de solo e 4 variáveis de vegetação registradas para quadrados #' de 2,5 x 2,5 km. #' #' @format Um \code{data.frame} com 151 linhas e 8 variáveis. -#' +#' #' \describe{ -#' \item{\code{ser}}{Porcentagem de solo com enriquecimento constante de +#' \item{\code{ser}}{Porcentagem de solo com enriquecimento constante de #' calcário.} #' -#' \item{\code{spc}}{Porcentagem de solo de prado com cálcio na água +#' \item{\code{spc}}{Porcentagem de solo de prado com cálcio na água #' subterrânea.} -#' -#' \item{\code{smc}}{Porcentagem de solo com matriz de coral sob +#' +#' \item{\code{smc}}{Porcentagem de solo com matriz de coral sob #' condições de enriquecimento constante de calcário.} -#' -#' \item{\code{sao}}{Porcentagem de solos aluvial e orgânico adjacentes +#' +#' \item{\code{sao}}{Porcentagem de solos aluvial e orgânico adjacentes #' a rios e solo orgânico salino na costa.} #' -#' \item{\code{dfe}}{Porcentagem de floresta decídua estacional com +#' \item{\code{dfe}}{Porcentagem de floresta decídua estacional com #' ervas de folhas largas.} -#' -#' \item{\code{flab}}{Porcentagem de floresta de locais altos e baixos +#' +#' \item{\code{flab}}{Porcentagem de floresta de locais altos e baixos #' coberta com água e plantas herbáceas em lugares úmidos e pântano.} -#' +#' #' \item{\code{fpc}}{Porcentagem de floresta palma de cohune.} -#' +#' #' \item{\code{fm}}{Porcentagem de floresta mista.} #' } -#' -#' @keywords ACC -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +#' +#' @keywords AnaCorCan +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - #' uma introdução.Porto Alegre, RS: Bookman (pg 167 à 170) #' @examples #' #' data(ManlyTb10.2) #' pairs(~ ser + spc + smc + sao + fde + flab + fpc + fm, -#' data = ManlyTb10.2, +#' data = ManlyTb10.2, #' main="Matriz de gráficos para as variáveis de solo") #' -#' +#' NULL #' @name ManlyTb10.4 #' @title Combina\enc{çã}{ca}o de tabelas 1.5 e 6.7 #' -#' @description Dados referentes a consumo de proteína e força de trabalho +#' @description Dados referentes a consumo de proteína e força de trabalho #' em países europeus. #' #' @format Um \code{data.frame} com 22 países e 18 variáveis. -#' +#' #' \describe{ #' \item{\code{pais}}{Identificação do país.} -#' -#' \item{\code{cv}}{Consumo de carne vermelha medida em gramas por +#' +#' \item{\code{cv}}{Consumo de carne vermelha medida em gramas por #' pessoa por dia.} -#' +#' #' \item{\code{cb}}{Consumo de carne branca.} #' #' \item{\code{ovo}}{Consumo de ovos.} -#' +#' #' \item{\code{leite}}{Consumo de leite.} -#' +#' #' \item{\code{peixe}}{Consumo de peixe.} -#' +#' #' \item{\code{cere}}{Consumo por cereais.} -#' +#' #' \item{\code{carb}}{Consumo de carboidratos.} -#' +#' #' \item{\code{gnl}}{Consumo de grãos, nozes e sementes oleaginosas.} -#' +#' #' \item{\code{fv}}{Consumo de frutas e vegetais.} -#' -#' \item{\code{agr}}{Porcentagem da população ativa empregada na +#' +#' \item{\code{agr}}{Porcentagem da população ativa empregada na #' agricultura, florestal e pesca.} #' #' \item{\code{min}}{Mineração e exploração de pedreiras.} -#' +#' #' \item{\code{fab}}{Fabricação.} -#' +#' #' \item{\code{fea}}{Fornecimento de energia e água.} -#' +#' #' \item{\code{con}}{Construção.} -#' +#' #' \item{\code{ser}}{Serviços.} -#' +#' #' \item{\code{fin}}{Finanças.} -#' +#' #' \item{\code{ssp}}{Serviços sociais e pessoais.} -#' +#' #' \item{\code{tc}}{Transportes e comunicações.} -#' +#' #' } #' -#' @keywords ACC -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +#' @keywords AnaCorCan +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- #' uma introdução. Porto Alegre, RS: Bookman (pg 175) #' @examples #' #' data(ManlyTb10.4) -#' -#' pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnl+ agr + +#' +#' pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnl+ agr + #' min + fab + fea + con + ser + fin + ssp + tc, -#' data = ManlyTb10.4, -#' main = "Matriz de gráficos para as variáveis de força de trabalho +#' data = ManlyTb10.4, +#' main = "Matriz de gráficos para as variáveis de força de trabalho #' e consumo de proteínas diárias" #' ) NULL @@ -385,43 +385,43 @@ NULL #' @description Distâncias rodoviárias (em milhas) entre cidades na ilha #' Sul da Nova Zelândia #' -#' @format Uma matriz (13x13) com as distâncias rodoviárias entre as +#' @format Uma matriz (13x13) com as distâncias rodoviárias entre as #' cidades da ilha Sul da Nova Zelândia. -#' -#' @keywords EM -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +#' +#' @keywords TODO +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - #' uma introdução. Porto Alegre, RS: Bookman (pg 182) -#' +#' #' @examples #' #' data(ManlyTb11.3) -#' +#' #' require(lattice) -#' -#' levelplot(ManlyTb11.3, xlab = "", ylab = "", main = "Gráfico das +#' +#' levelplot(ManlyTb11.3, xlab = "", ylab = "", main = "Gráfico das #' distâncias rodoviárias", scales = list(x = list(rot=90))) NULL #' @name ManlyTb11.5 #' @title Vota\enc{çõ}{co}es de parlamentares #' -#' @description Número de votos discordantes entre os parlamentares de +#' @description Número de votos discordantes entre os parlamentares de #' Nova Jersey em leis referentes a problemas ambientais #' #' @format Uma matriz com os números de votos discordantes entre 15 #' parlamentares de Nova Jersey. -#' -#' @keywords EM -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados +#' +#' @keywords TODO +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados #' - uma introdução. Porto Alegre, RS: Bookman (pg 185) -#' +#' #' @examples #' #' data(ManlyTb11.5) -#' +#' #' require(lattice) -#' -#' levelplot(ManlyTb11.5, xlab = "", ylab = "", main = "Gráfico das +#' +#' levelplot(ManlyTb11.5, xlab = "", ylab = "", main = "Gráfico das #' distâncias entre parlamentares", scales = list(x = list(rot=90))) NULL @@ -430,137 +430,137 @@ NULL #' #' @title Cães pré-históricos da Tailândia #' -#' @description Estudo em ancestrais de cães da Tailândia, -#' através de medições da mandíbula. +#' @description Estudo em ancestrais de cães da Tailândia, +#' através de medições da mandíbula. #' #' @format Um \code{data.frame} com 5 grupo caninos e 10 variáveis. -#' +#' #' \describe{ #' #' \item{\code{grup}}{Grupo canino} -#' +#' #' \item{\code{compm}}{Comprimento da mandíbula (mm)} -#' +#' #'\item{\code{largmapm}}{Largura da mandíbula, abaixo do primeiro molar (mm)} -#' +#' #'\item{\code{largca}}{Largura do côndilo aricular (mm)} #' #' \item{\code{altmapm}}{Altura da mandíbula, abaixo do primeiro molar (mm)} -#' +#' #' \item{\code{comppm}}{Comprimento do primeiro molar (mm).} -#' +#' #' \item{\code{largpm}}{Largura do primeiro molar (mm).} -#' +#' #' \item{\code{compptm}}{Comprimento do primeiro ao terceiro molar (mm).} -#' +#' #'\item{\code{comppqp}}{Comprimento do primeiro ao quarto pré-molar (mm).} -#' +#' #'\item{\code{largci}}{Largura do canino inferior (mm).} #' -#'\item{\code{sexo}}{Código para sexo, (1 para masculino, 2 para feminino +#'\item{\code{sexo}}{Código para sexo, (1 para masculino, 2 para feminino #'e caso contrário é desconhecido} #' #' } -#' +#' #' @keywords TS -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - #' uma introdução. Porto Alegre, RS: Bookman (pg 67 à 69) #' @examples #' #' data(ManlyTb4.5) #' require(lattice) #' require(reshape2) -#' +#' #' ManlyTb4.5long <- melt(ManlyTb4.5[,-11], id.vars = "grup") #' #' bwplot(value ~grup | variable, data = ManlyTb4.5long, #' scales = c(list(relation = "free"), list(x=list(draw=FALSE))), #' ylab = "", #' main = "Boxplot de entre os grupo das medições da mandíbula", -#' par.settings = list( box.umbrella=list(col = c(1,2,3,4,6)), -#' box.dot=list(col = c(1,2,3,4,6)), +#' par.settings = list( box.umbrella=list(col = c(1,2,3,4,6)), +#' box.dot=list(col = c(1,2,3,4,6)), #' box.rectangle = list(col = c(1,2,3,4,6))), #' key = list(points = list(col=c(1,2,3,4,6), pch=19), #' space = "top", #' columns=2, -#' text=list(c("Caes modernos da Tailandia", "Chacais dourados", "Cuons", +#' text=list(c("Caes modernos da Tailandia", "Chacais dourados", "Cuons", #' "Lobos indianos", "Caes pre-historicos tailandeses")))) NULL #' @name ManlyTb6.6 #' @title Ta\enc{ç}{c}as de cer\enc{â}{a}micas pr\enc{é}{e}-hist\enc{ó}{o}ricas #' -#' @description Dimensões de 25 taças de cerâmicas escavadas de lugares +#' @description Dimensões de 25 taças de cerâmicas escavadas de lugares #' pré-históricos na Tailândia. #' #' @format Um \code{data.frame} com 25 registros em 6 variáveis. -#' +#' #' \describe{ #' #' A figura apresentada descreve as cinco variáveis, correspondentes às #' dimensões das taças. -#' +#' #' \if{html}{\figure{ManlyTb6-6.jpg}{options: width="250px"}} -#' \if{latex}{\figure{ManlyTb6-6.jpg}{options: width=1.75in}} +#' \if{latex}{\figure{ManlyTb6-6.jpg}{options: width=1.75in}} #'} -#' @keywords AnaComp -#' -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +#' @keywords AnaComPrin +#' +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- #' uma introdução. Porto Alegre, RS: Bookman (pg 101) -#' +#' #' @examples #' #' data(ManlyTb6.6) #' #' pairs(~ x1 + x2 + x3 + x4 + x5 + x6, -#' data = ManlyTb6.6, +#' data = ManlyTb6.6, #' main="Matriz de diapersão para as variáveis de medida das taças") NULL #' @name ManlyTb6.7 -#' @title Consumo de prote\enc{í}{i}na por habitantes de pa\enc{í}{i}ses europeus +#' @title Consumo de prote\enc{í}{i}na por habitantes de pa\enc{í}{i}ses europeus #' -#' @description Estimativas dos consumos médios de proteínas de diferentes -#' fontes de alimentos para habitantes de 25 países europeus. +#' @description Estimativas dos consumos médios de proteínas de diferentes +#' fontes de alimentos para habitantes de 25 países europeus. #' Consumos registrados em gramas por pessoa por dia. #' #' @format Um \code{data.frame} com 25 países e 9 variáveis. -#' +#' #' \describe{ #' #' \item{\code{pais}}{Identificação do país.} -#' +#' #' \item{\code{cv}}{Consumo de carne vermelha.} -#' +#' #' \item{\code{cb}}{Consumo de carne branca.} #' #' \item{\code{ovo}}{Consumo de ovos.} -#' +#' #' \item{\code{leite}}{Consumo de leite.} -#' +#' #' \item{\code{peixe}}{Consumo de peixe.} -#' +#' #' \item{\code{cere}}{Consumo por cereais.} -#' +#' #' \item{\code{carb}}{Consumo de carboidratos.} -#' +#' #' \item{\code{gnso}}{Consumo de grãos, nozes e sementes oleaginosas.} -#' +#' #' \item{\code{fv}}{Consumo de frutas e vegetais.} -#' +#' #' \item{\code{total}}{Total de consumo do país.} -#' +#' #' } -#' @keywords AnaComp -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +#' @keywords AnaComPrin +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - #' uma introdução. Porto Alegre, RS: Bookman (pg 103) -#' +#' #' @examples #' #' data(ManlyTb6.7) -#' +#' #' pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnso + fv, -#' data = ManlyTb6.7, +#' data = ManlyTb6.7, #' main="Matriz das variáveis de consumo de proteína") NULL @@ -568,65 +568,65 @@ NULL #' @title Esp\enc{é}{e}cies de plantas em lotes #' #' @description Estudo de 25 espécies de plantas em 17 lotes de um prado -#' de pastagem na Reserva Natural em Steneryd na Suécia. Cada valor na -#' tabela é a soma dos valores cobertos em um intervalo de 0 a 5 por -#' nove quadrantes de amostra, de modo que um valor 45 corresponde à -#' completa cobertura pela espécie. +#' de pastagem na Reserva Natural em Steneryd na Suécia. Cada valor na +#' tabela é a soma dos valores cobertos em um intervalo de 0 a 5 por +#' nove quadrantes de amostra, de modo que um valor 45 corresponde à +#' completa cobertura pela espécie. #' -#' @format Um \code{data.frame} com 25 espécie de plantas com 18 +#' @format Um \code{data.frame} com 25 espécie de plantas com 18 #' variáveis -#' +#' #' \describe{ #' #' \item{\code{esp}}{Espécie} -#' +#' #' \item{\code{l1}}{Medidas de abundância das espécies no lote 1.} -#' +#' #' \item{\code{l2}}{Medidas de abundância das espécies no lote 2.} -#' +#' #' \item{\code{l3}}{Medidas de abundância das espécies no lote 3.} -#' +#' #' \item{\code{l4}}{Medidas de abundância das espécies no lote 4.} -#' +#' #' \item{\code{l5}}{Medidas de abundância das espécies no lote 5.} -#' +#' #' \item{\code{l6}}{Medidas de abundância das espécies no lote 6.} -#' +#' #' \item{\code{l7}}{Medidas de abundância das espécies no lote 7.} -#' +#' #' \item{\code{l8}}{Medidas de abundância das espécies no lote 8.} -#' +#' #' \item{\code{l9}}{Medidas de abundância das espécies no lote 9.} -#' +#' #' \item{\code{l10}}{Medidas de abundância das espécies no lote 10.} -#' +#' #' \item{\code{l11}}{Medidas de abundância das espécies no lote 11.} -#' +#' #' \item{\code{l12}}{Medidas de abundância das espécies no lote 12.} -#' +#' #' \item{\code{l13}}{Medidas de abundância das espécies no lote 13.} -#' +#' #' \item{\code{l14}}{Medidas de abundância das espécies no lote 14.} -#' +#' #' \item{\code{l15}}{Medidas de abundância das espécies no lote 15.} -#' +#' #' \item{\code{l16}}{Medidas de abundância das espécies no lote 16.} -#' +#' #' \item{\code{l17}}{Medidas de abundância das espécies no lote 17.} #' } #' -#' @keywords AnaClust -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +#' @keywords AnaAgrup +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- #' uma introdução. Porto Alegre, RS: Bookman (pg 152) #' @examples #' #' data(ManlyTb9.7) -#' +#' #' euclid <- as.matrix(dist(ManlyTb9.7[,-1])) -#' -#' heatmap(euclid, -#' margins= c(6,6), -#' labRow = ManlyTb9.7$esp, +#' +#' heatmap(euclid, +#' margins= c(6,6), +#' labRow = ManlyTb9.7$esp, #' labCol = ManlyTb9.7$esp, #' main = "Heatmap para a matriz de distâncias para as 25 espécies") NULL @@ -634,114 +634,113 @@ NULL #' @name ManlyTb9.8 #' @title Bens de t\enc{ú}{u}mulos #' -#' @description Conjunto de dados referentes a bens de túmulos de um -#' cemitério em Bannadi, nordeste da Tailândia. São registros de -#' presença ou ausência de 38 diferentes artigos em cada um dos 46 +#' @description Conjunto de dados referentes a bens de túmulos de um +#' cemitério em Bannadi, nordeste da Tailândia. São registros de +#' presença ou ausência de 38 diferentes artigos em cada um dos 46 #' túmulos, com informação adicional sobre se os restos mortais eram de -#' um adulto masculino, feminino ou criança. Os sepultamentos estão na +#' um adulto masculino, feminino ou criança. Os sepultamentos estão na #' ordem de riqueza de diferentes bens (totais variando de 0 a 11), e os -#' bens estão na ordem de frequência de ocorrência (totais variando de +#' bens estão na ordem de frequência de ocorrência (totais variando de #' 1 a 18). -#' +#' #' @format Um \code{data.frame} com 45 linhas e 38 colunas. -#' +#' #' \describe{ #' #' \item{\code{sep}}{Identifica o sepultamento} -#' +#' #' \item{\code{tipo}}{Identifica os restos Mortais (1 = Adulto masculino; #' 2 = Adulto Feminino; 3 = Criança} -#' +#' #' \item{\code{obj1}}{Presença (1) ou ausência (0) do objeto 1} -#' +#' #' \item{\code{obj2}}{Presença (1) ou ausência (0) do objeto 2.} -#' +#' #' \item{\code{obj3}}{Presença (1) ou ausência (0) do objeto 3.} -#' +#' #' \item{\code{obj4}}{Presença (1) ou ausência (0) do objeto 4.} -#' +#' #' \item{\code{obj5}}{Presença (1) ou ausência (0) do objeto 5.} -#' +#' #' \item{\code{obj6}}{Presença (1) ou ausência (0) do objeto 6.} -#' +#' #' \item{\code{obj7}}{Presença (1) ou ausência (0) do objeto 7.} -#' +#' #' \item{\code{obj8}}{Presença (1) ou ausência (0) do objeto 8.} -#' +#' #' \item{\code{obj9}}{Presença (1) ou ausência (0) do objeto 9.} -#' +#' #' \item{\code{obj10}}{Presença (1) ou ausência (0) do objeto 10.} -#' +#' #' \item{\code{obj11}}{Presença (1) ou ausência (0) do objeto 11.} -#' +#' #' \item{\code{obj12}}{Presença (1) ou ausência (0) do objeto 12.} -#' +#' #' \item{\code{obj13}}{Presença (1) ou ausência (0) do objeto 13.} -#' +#' #' \item{\code{obj14}}{Presença (1) ou ausência (0) do objeto 14.} -#' +#' #' \item{\code{obj15}}{Presença (1) ou ausência (0) do objeto 15.} -#' +#' #' \item{\code{obj16}}{Presença (1) ou ausência (0) do objeto 16.} -#' +#' #' \item{\code{obj17}}{Presença (1) ou ausência (0) do objeto 17.} -#' +#' #' \item{\code{obj18}}{Presença (1) ou ausência (0) do objeto 18.} #' #' \item{\code{obj19}}{Presença (1) ou ausência (0) do objeto 19.} -#' +#' #' \item{\code{obj20}}{Presença (1) ou ausência (0) do objeto 20.} #' #' \item{\code{obj21}}{Presença (1) ou ausência (0) do objeto 21.} -#' +#' #' \item{\code{obj22}}{Presença (1) ou ausência (0) do objeto 22.} -#' +#' #' \item{\code{obj23}}{Presença (1) ou ausência (0) do objeto 23.} -#' +#' #' \item{\code{obj24}}{Presença (1) ou ausência (0) do objeto 24.} -#' +#' #' \item{\code{obj25}}{Presença (1) ou ausência (0) do objeto 25.} -#' +#' #' \item{\code{obj26}}{Presença (1) ou ausência (0) do objeto 26.} -#' +#' #' \item{\code{obj27}}{Presença (1) ou ausência (0) do objeto 27.} -#' +#' #' \item{\code{obj28}}{Presença (1) ou ausência (0) do objeto 28.} -#' +#' #' \item{\code{obj29}}{Presença (1) ou ausência (0) do objeto 29.} -#' +#' #' \item{\code{obj30}}{Presença (1) ou ausência (0) do objeto 30.} -#' +#' #' \item{\code{obj31}}{Presença (1) ou ausência (0) do objeto 31.} -#' +#' #' \item{\code{obj32}}{Presença (1) ou ausência (0) do objeto 32.} -#' +#' #' \item{\code{obj33}}{Presença (1) ou ausência (0) do objeto 33.} -#' +#' #' \item{\code{obj34}}{Presença (1) ou ausência (0) do objeto 34.} -#' +#' #' \item{\code{obj35}}{Presença (1) ou ausência (0) do objeto 35.} -#' +#' #' \item{\code{obj36}}{Presença (1) ou ausência (0) do objeto 36.} -#' +#' #' \item{\code{obj37}}{Presença (1) ou ausência (0) do objeto 37.} -#' +#' #' \item{\code{obj38}}{Presença (1) ou ausência (0) do objeto 38.} -#' +#' #' } #' -#' @keywords AnaClust -#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +#' @keywords AnaAgrup +#' @source Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- #' uma introdução. Porto Alegre, RS: Bookman (pg 153 e 154) #' @examples #' #' data(ManlyTb9.8) -#' +#' #' matdist <- as.matrix(dist(ManlyTb9.8[,-c(1,2)], method = "binary")) #' ### Mapa de calor para a matriz de dissimilaridades. -#' heatmap(matdist, -#' margins= c(6,6), -#' labRow = ManlyTb9.8$sep, +#' heatmap(matdist, +#' margins= c(6,6), +#' labRow = ManlyTb9.8$sep, #' labCol = ManlyTb9.8$sep) NULL - diff --git a/R/Mingoti.R b/R/Mingoti.R index 76ea5b3f..bae0e87e 100644 --- a/R/Mingoti.R +++ b/R/Mingoti.R @@ -131,7 +131,7 @@ NULL #' #' } #' -#' @keywords AnaComp +#' @keywords AnaComPrin #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de #' estatística multivariada - uma abordagem aplicada. #' Belo Horizonte, MG: Editora UFMG. (pg 287). @@ -174,7 +174,7 @@ NULL #' #' } #' -#' @keywords AnaComp +#' @keywords AnaComPrin #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de #' estatística multivariada - uma abordagem aplicada. #' Belo Horizonte, MG: Editora UFMG. (pg 290). @@ -267,7 +267,7 @@ NULL #' #' } #' -#' @keywords AnaComp +#' @keywords AnaComPrin #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de #' estatística multivariada - uma abordagem aplicada. #' Belo Horizonte, MG: Editora UFMG. (pg 292). @@ -401,7 +401,7 @@ NULL #' #' } #' -#' @keywords AnaComp +#' @keywords AnaComPrin #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de #' estatística multivariada - uma abordagem aplicada. #' Belo Horizonte, MG: Editora UFMG. (pg 75). @@ -480,7 +480,7 @@ NULL #' #' } #' -#' @keywords AnaComp +#' @keywords AnaComPrin #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de #' estatística multivariada - uma abordagem aplicada. #' Belo Horizonte, MG: Editora UFMG. (pg 73). @@ -513,7 +513,7 @@ NULL #' \item{\code{idade}}{Idade do indivíduo.} #' #' } -#' @keywords AnaClust +#' @keywords AnaAgrup #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de #' estatística multivariada - uma abordagem aplicada. #' Belo Horizonte, MG: Editora UFMG. (pg 159). @@ -558,7 +558,7 @@ NULL #' desestabilização (tensões étnicas, conflito armado, etc).} #' #' } -#' @keywords AnaClust +#' @keywords AnaAgrup #' @source Mingoti, S.A. (2005). Análise de dados através de métodos de #' estatística multivariada - uma abordagem aplicada. #' Belo Horizonte, MG: Editora UFMG. (pg 184). diff --git a/R/Paula.R b/R/Paula.R index 1e1ba461..eaa2412b 100644 --- a/R/Paula.R +++ b/R/Paula.R @@ -1,24 +1,24 @@ #' @name PaulaEg1.12.2 #' @title Pacientes com Processo Infecioso Pulmonar -#' @description Um total de 175 pacientes com processo infecioso +#' @description Um total de 175 pacientes com processo infecioso #' pulmonar atendidos no hospital no período acima foram classificados -#' por algumas variáveis. -#' +#' por algumas variáveis. +#' #' @format Um \code{data.frame} com 175 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{tipo}}{Tipo de tumor (maligno, benigno).} -#' +#' #' \item{\code{idade}}{Idade do paciente (em anos).} -#' +#' #' \item{\code{sexo}}{Sexo do paciente (masculino, feminino).} -#' -#' \item{\code{hl}}{Intensidade da célula histiócitos-linfócitos (ausente, +#' +#' \item{\code{hl}}{Intensidade da célula histiócitos-linfócitos (ausente, #' discreta, moderada, intensa).} -#' -#' \item{\code{ff}}{Intensidade da célula fibrose-frouxa (ausente, +#' +#' \item{\code{ff}}{Intensidade da célula fibrose-frouxa (ausente, #' discreta, moderada, intensa).} -#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -27,24 +27,24 @@ #' @examples #' #' data(PaulaEg1.12.2) -#' +#' #' str(PaulaEg1.12.2) -#' +#' #' library(lattice) -#' bwplot(idade ~ hl | tipo, +#' bwplot(idade ~ hl | tipo, #' data = PaulaEg1.12.2, #' ylab = "Idade", #' xlab = "Intensidade da célula histiócitos-linfócitos") -#' -#' bwplot(idade ~ ff | tipo, +#' +#' bwplot(idade ~ ff | tipo, #' data = PaulaEg1.12.2, #' ylab = "Idade", #' xlab = "Intensidade da célula fibrose-frouxa") -#' -#' barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl), -#' auto.key=list(space="top", columns=2, +#' +#' barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl), +#' auto.key=list(space="top", columns=2, #' cex.title=1, -#' rectangles = TRUE, +#' rectangles = TRUE, #' points=FALSE)) #' NULL @@ -104,25 +104,25 @@ NULL #' @name PaulaEg1.12.5 #' @title Consumo de Combust\enc{í}{i}vel -#' @description Dados referentes ao consumo de combustível em 48 estados -#' norte-americanos. O interesse nesse estudo é tentar explicar o +#' @description Dados referentes ao consumo de combustível em 48 estados +#' norte-americanos. O interesse nesse estudo é tentar explicar o #' consumo de combustível com base em variáveis econômicas. -#' +#' #' @format Um \code{data.frame} com 48 observações e 6 variáveis. #' \describe{ -#' +#' #' \item{\code{est}}{Estado.} -#' +#' #' \item{\code{taxa}}{Taxa do combustível no estado (em USD).} -#' +#' #' \item{\code{licen}}{Proporção de motoristas licenciados.} -#' +#' #' \item{\code{renda}}{Renda percapita (em USD).} -#' +#' #' \item{\code{estr}}{Ajuda federal para as estradas (em 1000 USD).} -#' +#' #' \item{\code{cons}}{Consumo de combustível por habitante.} -#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -131,16 +131,16 @@ NULL #' @examples #' #' data(PaulaEg1.12.5) -#' +#' #' str(PaulaEg1.12.5) -#' +#' #' library(lattice) -#' +#' #' library(car) -#' +#' #' scatterplotMatrix( ~ cons + taxa + licen + renda + estr, #' data = PaulaEg1.12.5) -#' +#' #' xyplot(cons ~ est, #' ylab = "Consumo", #' xlab = "Estados", @@ -153,23 +153,23 @@ NULL #' @name PaulaEg1.12.6 #' @title Sal\enc{á}{a}rio de Executivos -#' @description Dados referentes ao salário anual de uma -#' amostra aleatória de 220 executivos (145 homens e 75 mulheres). O -#' salário será relacionado com as variáveis: sexo, anos de experiência +#' @description Dados referentes ao salário anual de uma +#' amostra aleatória de 220 executivos (145 homens e 75 mulheres). O +#' salário será relacionado com as variáveis: sexo, anos de experiência #' no cargo e posição na empresa. -#' +#' #' @format Um \code{data.frame} com 220 observações e 4 variáveis. #' \describe{ -#' +#' #' \item{\code{sal}}{Salário anual (em mil USD).} -#' +#' #' \item{\code{sexo}}{Sexo (masculino, feminino).} -#' +#' #' \item{\code{pos}}{Posição na empresa (escore de 1 a 9).} -#' +#' #' \item{\code{aexp}}{Experiência (em anos).} -#' -#' +#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -178,11 +178,11 @@ NULL #' @examples #' #' data(PaulaEg1.12.6) -#' +#' #' str(PaulaEg1.12.6) -#' +#' #' library(lattice) -#' +#' #' xyplot(sal ~ aexp | sexo, #' data = PaulaEg1.12.6, #' type = c("p", "smooth"), @@ -203,33 +203,33 @@ NULL #' trimestre, latitude, longitude, dias de pesca, quantidade de #' peixes capturados e a captura por unidade de esforço (definida #' como divisão da quantidade de peixe capturado pelos dias de -#' pesca). +#' pesca). #' @format Um \code{data.frame} com 156 observações e 8 variáveis. #' \describe{ -#' +#' #' \item{\code{frota}}{Fator com dois níveis que indica de qual frota é #' a embarcação, \code{Santos} ou \code{Ubatuba}.} -#' +#' #' \item{\code{ano}}{Fator com cinco níveis que representa o ano, de #' \code{1995} a \code{1996}.} -#' +#' #' \item{\code{trim}}{Fator com quatro níveis que representa o trimestre #' em estudo, de \code{1} a \code{4}.} -#' +#' #' \item{\code{lat}}{Latitude, definida como distância ao Equador medida #' ao longo do meridiano de Greenwich.} -#' +#' #' \item{\code{long}}{Longitude, definida como distância ao meridiano de #' Greenwich medida ao longo do Equador.} -#' +#' #' \item{\code{dias}}{Dias de pesca.} -#' +#' #' \item{\code{captura}}{Quantidade de peixes-batata capturados, em kg.} -#' +#' #' \item{\code{cpue}}{Captura por unidade de esforço, calculada como #' razão da quantidade de peixes-batata capturados (\code{captura}) #' pelo número de dias de pesca \code{dias}.} -#' +#' #' } #' @keywords positivo-assimétrico #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -240,30 +240,30 @@ NULL #' Esforço de Peixe-Batata na Frota Paulista. RAE-CEA0102, IME-USP. #' @examples #' data(PaulaEg2.4.2) -#' +#' #' str(PaulaEg2.4.2) -#' +#' #' # Separando as covariáveis numéricas #' index <- sapply(PaulaEg2.4.2, is.numeric) -#' +#' #' # Número de observações em cada combinação das covariáveis #' # não numéricas #' ftable(table(PaulaEg2.4.2[, !index])) -#' +#' #' library(lattice) -#' +#' #' # Relação marginal da variável resposta com as covariáveis #' # não numéricas #' bwplot(cpue ~ frota, data = PaulaEg2.4.2) #' bwplot(cpue ~ ano, data = PaulaEg2.4.2) #' bwplot(cpue ~ trim, data = PaulaEg2.4.2) -#' +#' #' # Relação da variável resposta com as combinações das #' # covariáveis não numéricas #' ue <- with(PaulaEg2.4.2, paste(ano, trim, sep = "-")) #' bwplot(cpue ~ ue | frota, data = PaulaEg2.4.2, #' scales = list(x = list(rot = 90))) -#' +#' #' # Verificando a suposição de coeficiente de variação constante, #' # desconsiderando as covariáveis tri e numéricas #' resumo <- aggregate(cpue ~ frota + ano, data = PaulaEg2.4.2, @@ -274,7 +274,7 @@ NULL #' "n" = length(x)) #' }) #' ftable(xtabs(cpue ~ frota + ano, data = resumo)) -#' +#' #' # Relação das covariáveis numéricas #' splom(~PaulaEg2.4.2[, index], groups = frota, #' data = PaulaEg2.4.2, @@ -288,26 +288,26 @@ NULL #' individuais por danos com acidentes pessoais no período de #' janeiro de 1998 a junho de 1999 (18 meses). O estudo completo #' (Jong e Heller, 2008) contém o acompanhamento dos seguros desde -#' 1989. No período considerado aqui foram pagos 769 seguros, sendo +#' 1989. No período considerado aqui foram pagos 769 seguros, sendo #' armazenadas as informações: se houve representação #' legal, tempo operacional para pagamento e mês em que ocorreu o #' acidente. #' @format Um \code{data.frame} com 769 observações e 4 variáveis. #' \describe{ -#' +#' #' \item{\code{valor}}{Valor pago do seguro, em dólares australianos.} -#' +#' #' \item{\code{rl}}{Fator com dois níveis que indica, se no seguro em #' análise, há representação legal do indivíduo.} -#' +#' #' \item{\code{mes}}{Fator com 15 níveis que indica o mês de ocorrência #' do acidente. Os níveis deste fator são codificados e não #' informou-se quais os meses que eles representam.} -#' +#' #' \item{\code{to}}{Tempo operacional para pagamento do seguro. Essa #' variável assume valores de 0,1 a 31,9, pois são considerados #' apenas os 18 últimos meses do estudo.} -#' +#' #' } #' @keywords positivo-assimétrico #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -315,19 +315,19 @@ NULL #' #' @references De Jong, P., Heller, G. Z. (2008). Generalized linear #' models for insurance data (Vol. 136). Cambridge: Cambridge -#' University Press. +#' University Press. #' @examples #' data(PaulaEg2.4.3) -#' +#' #' str(PaulaEg2.4.3) -#' +#' #' # Número de seguros pagos em cada combinação de mês e #' # representação legal #' ftable(table(PaulaEg2.4.3[, c("mes", "rl")])) #' table(PaulaEg2.4.3[, c("rl")]) -#' +#' #' library(lattice) -#' +#' #' xyplot(log(valor) ~ to | rl, #' data = PaulaEg2.4.3, #' type = c("p", "g", "smooth"), @@ -336,7 +336,7 @@ NULL #' strip.names = TRUE, #' var.name = "Representação Legal", #' sep = ": ")) -#' +#' #' densityplot(~valor | rl, #' data = PaulaEg2.4.3, #' grid = TRUE, @@ -399,23 +399,23 @@ NULL #' ácidos graxos, foram comparados ao longo de 20 semanas. Nesse #' novo produto a gordura vegetal hidrogenada, responsável pela #' fixação do aroma do produto, foi substituída, totalmente ou -#' parcialmente, por óleo de canola. Ao todo foram produzidas 750 -#' observações, referentes a 15 avaliações para cada tipo de snack +#' parcialmente, por óleo de canola. Ao todo foram produzidas 750 +#' observações, referentes a 15 avaliações para cada tipo de snack #' a cada 2 semanas. #' @format Um \code{data.frame} com 750 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{semana}}{Semana da avaliação.} -#' -#' \item{\code{tipo}}{Tipo de snack avaliado. Os níveis representam as +#' +#' \item{\code{tipo}}{Tipo de snack avaliado. Os níveis representam as #' seguintes configurações: #' \code{A}: 22\% de gordura, 0\% de óleo de canola, \code{B}: 0\% #' de gordura, 22\% de óleo de canola, \code{C}: 17\% de gordura, #' 5\% de óleo de canola, \code{D}: 11\% de gordura, 11\% de óleo de #' canola e \code{E}: 5\% de gordura, 17\% de óleo de canola.} -#' +#' #' \item{\code{fnpc}}{Força necessária para o cisalhamento.} -#' +#' #' } #' @keywords positivo-assimétrico #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -424,21 +424,21 @@ NULL #' #' @examples #' data(PaulaEg2.8.1) -#' +#' #' str(PaulaEg2.8.1) -#' +#' #' # Experimento balanceado, 15 observações para cada tipo em cada #' # semana #' ftable(PaulaEg2.8.1[, c("tipo", "semana")]) #' xtabs(fnpc ~ tipo + semana, data = PaulaEg2.8.1) -#' +#' #' library(lattice) #' bwplot(fnpc ~ tipo | factor(semana), #' data = PaulaEg2.8.1, #' as.table = TRUE, #' strip = strip.custom(strip.names = TRUE, #' var.name = "semana")) -#' +#' #' # Estatísticas descritivas #' resumo <- aggregate(fnpc ~ tipo + semana, #' data = PaulaEg2.8.1, @@ -449,7 +449,7 @@ NULL #' "n" = length(x)) #' }) #' ftable(xtabs(fnpc ~ tipo + semana, data = resumo)) -#' +#' #' xyplot(fnpc[, "Média"] ~ semana, #' groups = tipo, #' data = resumo, @@ -465,18 +465,18 @@ NULL #' @name PaulaEg3.5.1 #' @title Associa\enc{çã}{ca}o entre fungicida e desenvolvimento de tumor #' @description Dados de um experimento realizado para avaliar -#' o possível efeito cancerígeno do fungicida Avadex. Foram utilizados -#' 403 camundongos. Desses, 65 receberam o fungicida e foram acompanhados -#' durante 85 semanas, verificando-se o desenvolvimento ou não de tumor -#' cancerígeno. Os demais animais não receberam o fungicida (grupo controle) +#' o possível efeito cancerígeno do fungicida Avadex. Foram utilizados +#' 403 camundongos. Desses, 65 receberam o fungicida e foram acompanhados +#' durante 85 semanas, verificando-se o desenvolvimento ou não de tumor +#' cancerígeno. Os demais animais não receberam o fungicida (grupo controle) #' e também foram acompanhados pelo mesmo período. -#' +#' #' @format Um \code{data.frame} com 4 observações e 4 variáveis, em que #' #' \describe{ #' #' \item{sexo}{Sexo do camundongo (macho = 1 e fêmea = 0).} -#' +#' #' \item{trat}{Identifica a presença ou não do tratamento (sim = 1 e não = 0).} #' #' \item{casos}{Número inteiro que identifica a quantidade de casos @@ -485,9 +485,9 @@ NULL #' \item{exp}{Quantidade de camundongos expostos.} #' #' } -#' -#' @keywords GLM binarios -#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +#' +#' @keywords MLG binarios +#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. #' São Paulo, SP: IME-USP. (Eg 3.5.1 pág. 201) #' @examples #' @@ -498,9 +498,9 @@ NULL #' barchart(casos/exp ~ trat | sexo, data = PaulaEg3.5.1, #' xlab="Grupo", ylab="Proporção de casos", #' scales=list(x=list(labels=c("Controle","Tratado"))), -#' strip=strip.custom(var.name="Sexo", +#' strip=strip.custom(var.name="Sexo", #' factor.levels=c(" Fêmea", "Macho"), -#' strip.levels=rep(TRUE,2)), +#' strip.levels=rep(TRUE,2)), #' main="Associação entre fungicida e desenvolvimento de tumor") NULL @@ -509,14 +509,14 @@ NULL #' @name PaulaEg3.5.2 #' @title Efeito de extrato vegetal -#' @description Dados de um experimento conduzido para avaliar o efeito de -#' diversos extratos vegetais na mortalidade de embriões de -#' \emph{Biomphalaria Glabrata}. Para o extrato vegetal aquoso frio de +#' @description Dados de um experimento conduzido para avaliar o efeito de +#' diversos extratos vegetais na mortalidade de embriões de +#' \emph{Biomphalaria Glabrata}. Para o extrato vegetal aquoso frio de #' folhas de \emph{P. Hyrsiflora} foram consideradas 7 amostras, sendo -#' que em cada uma delas 50 embriões foram submetidos a uma particular -#' dose do extrato vegetal, registrando-se, após o vigésimo dia, o +#' que em cada uma delas 50 embriões foram submetidos a uma particular +#' dose do extrato vegetal, registrando-se, após o vigésimo dia, o #' número de embriões mortos. -#' +#' #' @format Um \code{data.frame} com 2 observações e 3 variáveis, em que #' #' \describe{ @@ -524,10 +524,10 @@ NULL #' \item{dose}{Dose de extrato vegetal aplicada (em partes por milhão).} #' #' \item{emb}{Número observado de embriões mortos.} -#' +#' #' } -#' @keywords GLM binarios -#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +#' @keywords MLG binarios +#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. #' São Paulo, SP: IME-USP. (Eg 3.5.2 pág. 203) #' @examples #' @@ -536,72 +536,72 @@ NULL #' data(PaulaEg3.5.2) #' #' str(PaulaEg3.5.2) -#' -#' barchart(emb/(sum(emb)) ~ dose, data = PaulaEg3.5.2, +#' +#' barchart(emb/(sum(emb)) ~ dose, data = PaulaEg3.5.2, #' stack=TRUE, col= "lightblue", -#' xlab="Dose (em ppm)", ylab="Proporção de embriões mortos", +#' xlab="Dose (em ppm)", ylab="Proporção de embriões mortos", #' main="Efeito de extrato vegetal") -#' +#' NULL #' @name PaulaEg3.6.11a #' @title Exposi\enc{çã}{ca}o de besouros -#' @description Dados de um estudo sobre o efeito da exposição de -#' besouros adultos a diferentes doses de disulfeto de carbono gasoso -#' \emph{(CS2)}, durante cinco horas. Foram registrados os números -#' de besouros mortos. -#' +#' @description Dados de um estudo sobre o efeito da exposição de +#' besouros adultos a diferentes doses de disulfeto de carbono gasoso +#' \emph{(CS2)}, durante cinco horas. Foram registrados os números +#' de besouros mortos. +#' #' @format Um \code{data.frame} com 8 observações e 3 variáveis, em que #' #' \describe{ #' #' \item{mortos}{Quantidade observada de besouros mortos.} -#' +#' #' \item{exp}{Quantidade de besouros expostos a cada dose.} #' #' \item{dose}{Dose de disulfeto de carbono gasoso à qual os besouros #' foram expostos.} -#' +#' #' } -#' @keywords GLM binarios -#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +#' @keywords MLG binarios +#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. #' São Paulo, SP: IME-USP. (Eg 3.6.11a pág. 237) #' @examples #' #' library(lattice) #' #' data(PaulaEg3.6.11a) -#' +#' #' str(PaulaEg3.6.11a) #' -#' xyplot(mortos/(sum(mortos)) ~ dose, data = PaulaEg3.6.11a, +#' xyplot(mortos/(sum(mortos)) ~ dose, data = PaulaEg3.6.11a, #' type = "o", -#' xlab = "Dose de disulfeto de carbono gasoso", -#' ylab = "Proporção de besouros mortos", +#' xlab = "Dose de disulfeto de carbono gasoso", +#' ylab = "Proporção de besouros mortos", #' main = expression("Exposição de besouros a"~CS[2])) -#' +#' NULL #' @name PaulaEg3.6.11b #' @title Idade do in\enc{í}{i}cio da menstrua\enc{çã}{ca}o em garotas de Vars\enc{ó}{o}via -#' @description Dados de um estudo em que se investigou a idade do início -#' da menstruação em 3918 garotas de Varsóvia. Para 25 médias de +#' @description Dados de um estudo em que se investigou a idade do início +#' da menstruação em 3918 garotas de Varsóvia. Para 25 médias de #' idade foram observadas a ocorrência ou não do início de períodos -#' de menstruação nas adolescentes. -#' +#' de menstruação nas adolescentes. +#' #' @format Um \code{data.frame} com 25 observações e 3 variáveis, em que #' #' \describe{ #' #' \item{menst}{Número de garotas menstruando.} -#' +#' #' \item{entre}{Número de garotas entrevistadas.} #' #' \item{idade}{Idade media.} -#' +#' #' } -#' @keywords GLM -#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +#' @keywords MLG +#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. #' São Paulo, SP: IME-USP. (Eg 3.6.11b pág. 241) #' @examples #' @@ -609,29 +609,29 @@ NULL #' #' data(PaulaEg3.6.11b) #' -#' -#' xyplot((menst/entre) ~ idade, data = PaulaEg3.6.11b, +#' +#' xyplot((menst/entre) ~ idade, data = PaulaEg3.6.11b, #' type = c("p","a"), -#' xlab = "Idade média", -#' ylab = "Meninas menstruando/Entrevistadas", +#' xlab = "Idade média", +#' ylab = "Meninas menstruando/Entrevistadas", #' main = "Idade do início da menstruação em garotas de Varsóvia.") NULL #' @name PaulaEg3.6.9c #' @title Prefer\enc{ê}{e}ncia de consumidores #' @description Dados sobre a preferência de consumidores americanos com -#' relação a automóveis. Uma amostra aleatória de 263 consumidores foi -#' considerada. As seguintes variáveis foram observadas para cada -#' comprador: preferência quanto ao tipo de automóvel, idade, sexo e -#' estado civil. -#' +#' relação a automóveis. Uma amostra aleatória de 263 consumidores foi +#' considerada. As seguintes variáveis foram observadas para cada +#' comprador: preferência quanto ao tipo de automóvel, idade, sexo e +#' estado civil. +#' #' @format Um \code{data.frame} com 263 observações e 4 variáveis, em que #' #' \describe{ #' -#' \item{pref}{Preferência do comprador por um tipo de automóvel (1 = americano, +#' \item{pref}{Preferência do comprador por um tipo de automóvel (1 = americano, #' 0 = japonês).} -#' +#' #' \item{idade}{Idade do comprador (em anos).} #' #' \item{sexo}{Sexo do comprador (0 = masculino; 1 = feminino).} @@ -639,8 +639,8 @@ NULL #' \item{est}{Estado civil do comprador (0 = casado, 1 = solteiro).} #' #' } -#' @keywords GLM binarios -#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +#' @keywords MLG binarios +#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. #' São Paulo, SP: IME-USP. (Eg 3.6.9c pág. 231) #' @examples #' @@ -649,13 +649,13 @@ NULL #' data(PaulaEg3.6.9c) #' #' str(PaulaEg3.6.9c) -#' -#' bwplot(idade ~ pref, data = PaulaEg3.6.9c, +#' +#' bwplot(idade ~ pref, data = PaulaEg3.6.9c, #' type="p", -#' xlab="Preferência - Japonês e Americano", -#' ylab="Idade do Comprador", +#' xlab="Preferência - Japonês e Americano", +#' ylab="Idade do Comprador", #' main="Preferência") -#' +#' NULL #' @name PaulaEg4.2.6 @@ -667,18 +667,18 @@ NULL #' explicativas registradas #' @format Um \code{data.frame} com 110 observações e 6 variáveis. #' \describe{ -#' +#' #' \item{\code{nclien}}{Número de clientes da loja na área.} -#' +#' #' \item{\code{ndomic}}{Número de domicílios na área (em mil).} -#' +#' #' \item{\code{renda}}{Renda média anual da área (em mil USD).} -#' +#' #' \item{\code{idade}}{Idade média dos domicílios (em anos).} -#' +#' #' \item{\code{distac}}{Distância entre a área e o concorrente mais #' próximo (em milhas).} -#' +#' #' \item{\code{distal}}{Distância entre a área e a loja (em milhas).} #' #' } @@ -692,9 +692,9 @@ NULL #' @examples #' #' data(PaulaEg4.2.6) -#' +#' #' str(PaulaEg4.2.6) -#' +#' #' library(lattice) #' splom(PaulaEg4.2.6, type = c("p", "smooth"), lwd = 2) #' @@ -709,22 +709,22 @@ NULL #' o aluno está cursando e desempenho escolar. #' @format Um \code{data.frame} com 146 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{etnia}}{Fator com dois níveis que indica se o aluno é #' aborígene da própria região (A) ou não aborígene (N).} -#' +#' #' \item{\code{sexo}}{Fator com dois níveis que indica o sexo do #' aluno: masculino (M) ou feminino (F).} -#' +#' #' \item{\code{ano}}{Fator com quatro níveis que indica o ano que o aluno #' está cursando: 8ª série (F0), 1º ano do ensino médio (F1), 2º ano #' do ensino médio (F2) ou 3º ano do ensino médio (F3).} -#' +#' #' \item{\code{desemp}}{Fator com dois níveis que indica o desempenho do #' aluno: baixo (SL) ou normal (AL).} -#' +#' #' \item{\code{ndias}}{Número de dias ausentes no ano letivo.} -#' +#' #' } #' @keywords contagem superdispersão #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -735,20 +735,20 @@ NULL #' @examples #' #' data(PaulaEg4.3.6) -#' +#' #' str(PaulaEg4.3.6) -#' +#' #' # Número de observações em cada combinação. Para modelagem não será #' # possível a estimação de algumas interações #' ftable(PaulaEg4.3.6[, -5]) -#' +#' #' # Ausência escolar seccionadas pelas variáveis explicativas #' xtabs(ndias ~ ., data = PaulaEg4.3.6) -#' +#' #' # Relação média-variância #' aggregate(ndias ~ ., FUN = function(x) c(mean(x), var(x)), #' data = PaulaEg4.3.6) -#' +#' #' library(latticeExtra) #' fl1 <- c("Aborígene", "Não Aborígene") #' fl2 <- c("Feminino", "Masculino") @@ -768,48 +768,48 @@ NULL #' @name PaulaEg5.2.8a #' @title N\enc{ú}{u}mero de \enc{Á}{A}caros em Placas de Esterco de Gado -#' @description Dados de um experimento desenvolvido para estudar -#' a distribuição do número de ácaros em placas de esterco de gado -#' bovino no estado de São Paulo, obtidos por Paula e Tavares, 1992. -#' Essas placas são depósitos de ovos da mosca do chifre -#' (\emph{Haematobia irritans}), uma das pragas mais importantes da -#' pecuária brasileira. Os ácaros são inimigos naturais da mosca do +#' @description Dados de um experimento desenvolvido para estudar +#' a distribuição do número de ácaros em placas de esterco de gado +#' bovino no estado de São Paulo, obtidos por Paula e Tavares, 1992. +#' Essas placas são depósitos de ovos da mosca do chifre +#' (\emph{Haematobia irritans}), uma das pragas mais importantes da +#' pecuária brasileira. Os ácaros são inimigos naturais da mosca do #' chifre, uma vez que se alimentam de ovos e larvas dessas moscas. -#' +#' #' @format Um \code{data.frame} com 102 observações e 8 variáveis. #' \describe{ -#' +#' #' \item{\code{esp2}}{Número de ácaros coletados da espécie 2.} -#' +#' #' \item{\code{esp3}}{Número de ácaros coletados da espécie 3.} -#' +#' #' \item{\code{esp6}}{Número de ácaros coletados da espécie 6.} -#' +#' #' \item{\code{esp14}}{Número de ácaros coletados da espécie 14.} -#' -#' \item{\code{placa}}{Número de partes da placa de esterco onde +#' +#' \item{\code{placa}}{Número de partes da placa de esterco onde #' foram coletados os ácaros. (1 ou 6)} -#' -#' \item{\code{posic}}{Posição na placa de esterco onde foram coletados +#' +#' \item{\code{posic}}{Posição na placa de esterco onde foram coletados #' os ácaros (central ou lateral).} -#' +#' #' \item{\code{reg}}{Região onde a placa de esterco foi coletada (São #' Roque, Pindamonhangaba, Nova Odessa ou Ribeirão Preto).} -#' +#' #' \item{\code{temp}}{Temperatura no local da coleta, medida #' \eqn{C^{\circ}}.} -#' +#' #' } #' @keywords quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exemplo 5.2.8a, pág. 359) -#' +#' #' @references Paula, G. A. e Tavares, H. R. (1992). Relatório de #' Análise Estatística sobre o Projeto: Ácaros Associados ao Esterco #' Bovino. Subsídios para Controle Biológico da Mosca do Chifre. #' RAECEA 9206, IME-USP #' @examples -#' +#' #' data(PaulaEg5.2.8a) #' #' str(PaulaEg5.2.8a) @@ -832,19 +832,19 @@ NULL #' #' @format Um \code{data.frame} com 90 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{incid}}{Proporção da área afetada na folha de cevada.} -#' +#' #' \item{\code{local}}{Local onde foi realizado o experimento (1-9).} -#' +#' #' \item{\code{varied}}{Variedade de cevada (1-10).} -#' +#' #' } -#' +#' #' @keywords quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exemplo 5.2.8a, pág. 367) -#' +#' #' @references McCullagh, P. e Nelder, J. A. (1989). Generalized Linear #' Models, 2nd. Edition. Chapman and Hall, London. Tabela 9.2. #' @examples @@ -865,42 +865,42 @@ NULL #' @name PaulaEg5.5.1 #' @title Ensaio Cl\enc{í}{i}nico com Indiv\enc{í}{i}duos Epil\enc{é}{e}pticos -#' @description Dados apresentados em Diggle, Liang e Zeger (1994), +#' @description Dados apresentados em Diggle, Liang e Zeger (1994), #' referentes a um ensaio clínico com 59 indivíduos epilépticos, #' aleatorizados de modo que cada um recebesse uma droga #' antiepiléptica (progabide) ou placebo. -#' Os dados de cada indivíduo consistem do número de ataques +#' Os dados de cada indivíduo consistem do número de ataques #' epilépticos num período de oito semanas antes do tratamento, além #' do número de ataques em cada período de duas semanas, num total #' de quatro períodos após o tratamento. O interesse do estudo é #' verificar possível diminuição na taxa de ataques epilépticos. -#' +#' #' @format Um \code{data.frame} com 295 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{indiv}}{Identificação do indivíduo.} -#' -#' \item{\code{period}}{Período de observação (1 = antes do tratamento, -#' 2 = primeiro período após o tratamento, 3 = segundo período após +#' +#' \item{\code{period}}{Período de observação (1 = antes do tratamento, +#' 2 = primeiro período após o tratamento, 3 = segundo período após #' o tratamento e 4 = terceiro período após o tratamento).} -#' +#' #' \item{\code{seman}}{Número de semanas em cada período.} -#' +#' #' \item{\code{ataq}}{Número de ataques em cada período.} -#' +#' #' \item{\code{trat}}{Tratamento aplicado a cada indivíduo (placebo ou #' progabide).} -#' +#' #' } #' @keywords quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.1, pág. 379) -#' +#' #' @references Diggle, P. J.; Liang, K. Y. e Zeger, S. L. (1994). #' Analysis of Longitudinal Data. Oxford University Press. #' Seção 8.4. #' @examples -#' +#' #' data(PaulaEg5.5.1) #' #' str(PaulaEg5.5.1) @@ -911,7 +911,7 @@ NULL #' type = c("p", "a"), #' xlab = "Período", #' ylab = "Número de ataques epilépticos") -#' +#' NULL #' @name PaulaEg5.5.2 @@ -927,26 +927,26 @@ NULL #' @format Um \code{data.frame} com 224 observações e 6 variáveis. #' \describe{ -#' +#' #' \item{\code{paci}}{Identificação do paciente.} -#' +#' #' \item{\code{trat}}{Tratamento aplicado ao paciente (droga ativa ou #' placebo).} -#' +#' #' \item{\code{sexo}}{Sexo do paciente.} -#' +#' #' \item{\code{idade}}{Idade (em anos).} -#' +#' #' \item{\code{nivel}}{Pré-existência de um nível base (ausência ou #' presença).} -#' +#' #' \item{\code{cond}}{Condição respiratória do paciente (boa ou ruim).} -#' +#' #' } #' @keywords quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.2, pág. 385) -#' +#' #' @references Myers, R.H.; Montgomery, D. C.; Vining, G. G. (2002). #' Generalized Linear Models: With Applications in Engineering and #' the Sciences. John Wiley, New York. Seção 6.5. @@ -955,7 +955,7 @@ NULL #' data(PaulaEg5.5.2) #' #' str(PaulaEg5.5.2) -#' +#' #' library(latticeExtra) #' #' tb <- with(PaulaEg5.5.2, table(nivel, trat, sexo, cond)) @@ -972,50 +972,50 @@ NULL #' columns = 2, cex.title = 1) #' ) #' ) -#' +#' NULL #' @name PaulaEg5.5.3 #' @title Ensaio cl\enc{í}{i}nico da pr\enc{é}{e}-exist\enc{ê}{e}ncia de placa dent\enc{á}{a}ria -#' @description Dados de um ensaio clínico realizado com 109 indivíduos, +#' @description Dados de um ensaio clínico realizado com 109 indivíduos, #' distribuídos de forma aleatória para receberem um líquido #' tipo A (34 indivíduos), um líquido tipo B (36 indivíduos) ou um -#' líquido controle (39 indivíduos). Placas dentárias foram -#' avaliadas e classificadas segundo um escore no início do +#' líquido controle (39 indivíduos). Placas dentárias foram +#' avaliadas e classificadas segundo um escore no início do #' tratamento, após 3 e 6 meses. -#' +#' #' @format Um \code{data.frame} com 323 observações e 4 variáveis. #' \describe{ -#' +#' #' \item{\code{volunt}}{Identificação do paciente voluntário.} -#' +#' #' \item{\code{period}}{Momento de avaliação: (1 = início do tratamento, #' 2 = após 3 meses e 3 = após 6 meses.} -#' +#' #' \item{\code{trat}}{Tipo de tratamento (1 = placebo, 2 = líquido A e #' 3 = líquido B.} -#' +#' #' \item{\code{escore}}{Escore atribuído às placas dentárias.} -#' +#' #' } #' @keywords quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.3, pág. 390) -#' -#' @references Hadgu, A. e Koch, G. (1999). Application of generalized -#' estimating equations to a dental randomized clinical trial. Journal +#' +#' @references Hadgu, A. e Koch, G. (1999). Application of generalized +#' estimating equations to a dental randomized clinical trial. Journal #' of Biopharmaceutical Statistics 9, 161-178. -#' +#' #' @examples -#' +#' #' data(PaulaEg5.5.3) -#' +#' #' require(lattice) -#' +#' #' xyplot(escore ~ period | trat, groups = volunt, -#' xlab = 'Período', ylab = 'Escore', type = c("p", "a"), +#' xlab = 'Período', ylab = 'Escore', type = c("p", "a"), #' data = PaulaEg5.5.3) -#' +#' NULL #' @name PaulaEx1.13.19 @@ -1071,28 +1071,28 @@ NULL #' @name PaulaEx1.13.20 #' @title Vendas de Telhados de Madeira -#' @description Dados referentes a vendas de um tipo de telhado de madeira +#' @description Dados referentes a vendas de um tipo de telhado de madeira #' em 26 filiais de uma rede de lojas de construção. Um dos objetivos do #' estudo é tentar prever o número esperado de telhados vendidos #' dadas as demais variáveis registradas. -#' +#' #' @format Um \code{data.frame} com 26 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{gasto}}{Gasto com publicidade do produto (em mil #' dólares).} -#' +#' #' \item{\code{ncli}}{Número de clientes cadastrados (em milhares).} -#' +#' #' \item{\code{nmar}}{Número de marcas concorrentes do produto} -#' +#' #' \item{\code{poten}}{Potencial da loja, informação advinda da rede de #' lojas de construção (quanto maior o valor maior o potencial de #' venda da filial).} -#' +#' #' \item{\code{telha}}{Total de telhados vendidos (em mil metros #' quadrados).} -#' +#' #' } #' @keywords TODO #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1100,9 +1100,9 @@ NULL #' pág. 110) #' @examples #' data(PaulaEx1.13.20) -#' +#' #' str(PaulaEx1.13.20) -#' +#' #' library(lattice) #' splom(PaulaEx1.13.20, #' type = c("p", "g", "smooth"), @@ -1119,21 +1119,21 @@ NULL #' produzida. #' @format Um \code{data.frame} com 82 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{x1}}{Variável não nomeada. Imagina-se que se tenha #' relação com o número de octanas da gasolina.} -#' +#' #' \item{\code{x2}}{Variável não nomeada. Imagina-se que se tenha #' relação com o número de octanas da gasolina.} #' #' \item{\code{x3}}{Variável não nomeada. Imagina-se que se tenha #' relação com o número de octanas da gasolina.} -#' +#' #' \item{\code{x4}}{Valores de uma combinação (não informada) das #' variável \code{x1}, \code{x2} e \code{x3}.} -#' +#' #' \item{\code{nocta}}{Número de octanas da gasolina produzida.} -#' +#' #' } #' @keywords TODO #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1141,9 +1141,9 @@ NULL #' pág. 110) #' @examples #' data(PaulaEx1.13.21) -#' +#' #' str(PaulaEx1.13.21) -#' +#' #' library(lattice) #' splom(PaulaEx1.13.21, #' type = c("p", "g", "smooth"), @@ -1158,17 +1158,17 @@ NULL #' no preço de venda de um imóvel. #' @format Um \code{data.frame} com 27 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{impos}}{Valor cobrado de imposto, em 100 dólares.} -#' +#' #' \item{\code{areat}}{Área do terreno, em 1000 pés quadrados.} -#' +#' #' \item{\code{areac}}{Área construída, em 1000 pés quadrados.} -#' +#' #' \item{\code{idade}}{Idade da residência, em anos.} -#' +#' #' \item{\code{preco}}{Preço de venda do imóvel, em 1000 dólares.} -#' +#' #' } #' @keywords TODO #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1176,9 +1176,9 @@ NULL #' pág. 111) #' @examples #' data(PaulaEx1.13.22) -#' +#' #' str(PaulaEx1.13.22) -#' +#' #' library(lattice) #' splom(PaulaEx1.13.22, #' type = c("p", "g", "smooth"), @@ -1194,15 +1194,15 @@ NULL #' árvore a partir de sua altura e diâmetro. #' @format Um \code{data.frame} com 31 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{diam}}{Diâmetro da cerejeira, em polegadas. Provavelmente #' o diâmetro foi calculado à altura do peito (\eqn{\approx} #' 1.30m).} -#' +#' #' \item{\code{alt}}{Altura da cerejeira, em pés.} -#' +#' #' \item{\code{vol}}{Volume da cerejeira, em pés cúbicos.} -#' +#' #' } #' @keywords TODO #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1210,9 +1210,9 @@ NULL #' pág. 111) #' @examples #' data(PaulaEx1.13.23) -#' +#' #' str(PaulaEx1.13.23) -#' +#' #' library(lattice) #' splom(PaulaEx1.13.23, #' type = c("p", "g", "smooth"), @@ -1221,7 +1221,7 @@ NULL NULL #' @name PaulaEx1.13.24 -#' @title Porcentagens de Retorno de A\enc{çõ}{co}es +#' @title Porcentagens de Retorno de A\enc{çõ}{co}es #' @description Dados referentes aos retornos diários das ações das #' empresas Microsoft, General Eletric (GE) e Ford no período de #' janeiro de 2002 a abril de 2003. No registro dessas ações também @@ -1229,19 +1229,19 @@ NULL #' mercado, para padronizar as comparações. #' @format Um \code{data.frame} com 311 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{tbill}}{Taxa de retorno livre de risco.} -#' +#' #' \item{\code{sp500}}{Porcentagem de retorno do mercado.} -#' +#' #' \item{\code{micro}}{Porcentagem de retorno das ações da empresa #' Microsoft.} -#' +#' #' \item{\code{ge}}{Porcentagem de retorno das ações da empresa General #' Eletric (GE).} -#' +#' #' \item{\code{ford}}{Porcentagem de retorno das ações da empresa Ford.} -#' +#' #' } #' @keywords TODO #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1249,17 +1249,17 @@ NULL #' pág. 112) #' @examples #' data(PaulaEx1.13.24) -#' +#' #' str(PaulaEx1.13.24) -#' +#' #' library(reshape) #' da <- melt(PaulaEx1.13.24, measure.vars = c("micro", "ge", "ford"), #' variable_name = "empresa") -#' +#' #' library(lattice) #' densityplot(~value, groups = empresa, data = da, #' auto.key = list(corner = c(0.9, 0.9))) -#' +#' #' xyplot((sp500 - tbill) ~ (value - tbill) | empresa, #' data = da, type = c("p", "smooth", "g")) #' @@ -1273,11 +1273,11 @@ NULL #' de venda registrados. #' @format Um \code{data.frame} com 50 observações e 2 variáveis. #' \describe{ -#' +#' #' \item{\code{area}}{Área total do imóvel, em pés quadrados.} -#' +#' #' \item{\code{preco}}{Preço de venda do imóvel, em mil dólares.} -#' +#' #' } #' @keywords TODO #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1285,9 +1285,9 @@ NULL #' pág. 112) #' @examples #' data(PaulaEx1.13.25) -#' +#' #' str(PaulaEx1.13.25) -#' +#' #' library(lattice) #' xyplot(preco ~ area, data = PaulaEx1.13.25, #' type = c("p", "smooth", "g")) @@ -1298,16 +1298,16 @@ NULL #' @title Consumo de Energia em Domic\enc{í}{i}lios #' @description Dados referentes ao consumo de energia em 53 domicílios #' e demanda de energia no horário de pico. -#' +#' #' @format Um \code{data.frame} com 53 observações e 2 variáveis. #' \describe{ -#' +#' #' \item{\code{consu}}{Consumo de energia num determinado mês, em #' quilowatts-hora.} -#' +#' #' \item{\code{deman}}{Demanda de energia no horário de pico (unidade de #' medida não informada).} -#' +#' #' } #' @keywords positivo-assimétrico #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1320,9 +1320,9 @@ NULL #' #' @examples #' data(PaulaEx2.10.15) -#' +#' #' str(PaulaEx2.10.15) -#' +#' #' library(lattice) #' xyplot(deman ~ consu, data = PaulaEx2.10.15, #' pch = 19, lwd = 2, type = c("p", "g", "smooth")) @@ -1337,13 +1337,13 @@ NULL #' publicidade. #' @format Um \code{data.frame} com 30 observações e 2 variáveis. #' \describe{ -#' +#' #' \item{\code{fatura}}{Faturamento anual do restaurante, em mil #' dólares.} -#' +#' #' \item{\code{gastos}}{Gastos do restaurante com publicidade, em mil #' dólares.} -#' +#' #' } #' @keywords positivo-assimétrico RS #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1356,9 +1356,9 @@ NULL #' #' @examples #' data(PaulaEx2.10.16) -#' +#' #' str(PaulaEx2.10.16) -#' +#' #' library(lattice) #' xyplot(fatura ~ gastos, #' data = PaulaEx2.10.16, @@ -1420,7 +1420,7 @@ NULL #' @name PaulaEx2.10.19 #' @title Estudo Sobre Leucemia e Caracter\enc{í}{i}stica Morfol\enc{ó}{o}gica nas C\enc{é}{e}lulas -#' Brancas +#' Brancas #' @description Dados provenientes de um estudo em que pacientes com #' leucemia foram classificados segundo a ausência ou presença de #' uma característica morfológica nas células brancas. O objetivo do @@ -1428,16 +1428,16 @@ NULL #' tempo de sobrevivência dos pacientes. #' @format Um \code{data.frame} com 32 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{ncel}}{Número de células brancas #' na amostra do paciente.} -#' +#' #' \item{\code{carac}}{Fator com dois níveis que representa a presença #' (\code{AG positivo}) ou ausência (\code{AG negativo}) da #' característica morfológica.} -#' +#' #' \item{\code{tempo}}{Tempo de sobrevivência do paciente, em semanas.} -#' +#' #' } #' @keywords positivo-assimétrico #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1450,9 +1450,9 @@ NULL #' #' @examples #' data(PaulaEx2.10.19) -#' +#' #' str(PaulaEx2.10.19) -#' +#' #' library(latticeExtra) #' xyplot(tempo ~ ncel, #' groups = carac, @@ -1482,31 +1482,31 @@ NULL #' informações do veículo e do principal condutor). #' @format Um \code{data.frame} com 996 observações e 9 variáveis. #' \describe{ -#' +#' #' \item{\code{valorv}}{Valor do veículo, em dez mil dólares #' australianos.} -#' +#' #' \item{\code{expos}}{Exposição do veículo (unidade de medida não #' informada).} -#' +#' #' \item{\code{tipov}}{Tipo de veículo (fator com onze níveis).} -#' +#' #' \item{\code{idadev}}{Idade do veículo (fator com quatro níveis).} -#' +#' #' \item{\code{sexoc}}{Sexo do principal condutor, fator com dois níveis #' \code{M} masculino e \code{F} feminino.} -#' +#' #' \item{\code{areac}}{Área de residência do principal condutor (fator #' com seis níveis).} -#' +#' #' \item{\code{idadec}}{Idade do principal condutor (fator com seis #' níveis).} -#' +#' #' \item{\code{nsinis}}{Número de sinistros no período.} -#' +#' #' \item{\code{csinis}}{Custo total dos sinistros, em dólares #' australianos.} -#' +#' #' } #' @keywords positivo-assimétrico quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -1519,20 +1519,20 @@ NULL #' #' @examples #' data(PaulaEx2.10.20) -#' +#' #' str(PaulaEx2.10.20) -#' +#' #' # Variável de interesse - custo médio de um sinistro #' PaulaEx2.10.20$cmsinis <- with(PaulaEx2.10.20, csinis/nsinis) #' PaulaEx2.10.20 <- PaulaEx2.10.20[, -c(8:9)] -#' +#' #' # Separando as covariáveis numéricas #' index <- sapply(PaulaEx2.10.20, is.numeric) -#' +#' #' # Frequências dos níveis das variáveis categóricas #' par(mfrow = c(2, 3), las = 2, mar = c(4, 3, 3, 1)) #' sapply(PaulaEx2.10.20[, !index], function(x) plot(table(x))) -#' +#' #' # Dispersão das variáveis numéricas #' library(lattice) #' splom(PaulaEx2.10.20[, index], @@ -1550,18 +1550,18 @@ NULL #' e temperatura.) #' @format Um \code{data.frame} com 32 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{tempo}}{Tempo de resistência do vidro, mensurado em #' horas.} -#' +#' #' \item{\code{volt}}{Fator com quatro níveis de voltagem considerados, #' valores em quilovolts (kV).} -#' +#' #' \item{\code{temp}}{Fator com dois níveis de temperatura considerados, #' valores em graus Celsius.} -#' +#' #' } -#' @keywords positivos-assimétricos +#' @keywords positivo-assimétrico #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exercício 2.10.7, #' pág. 175) @@ -1571,13 +1571,13 @@ NULL #' #' @examples #' data(PaulaEx2.10.7) -#' +#' #' str(PaulaEx2.10.7) -#' +#' #' library(lattice) #' xyplot(tempo ~ volt, #' groups = temp, -#' data = PaulaEx2.10.7, +#' data = PaulaEx2.10.7, #' type = c("p", "g", "a"), #' auto.key = list( #' corner = c(0.9, 0.9), @@ -1585,7 +1585,7 @@ NULL #' cex.title = 1, #' title = "Temperatura" #' )) -#' +#' #' resumo <- aggregate(tempo ~ temp + volt, #' data = PaulaEx2.10.7, #' FUN = function(x) { @@ -1595,7 +1595,7 @@ NULL #' "n" = length(x)) #' }) #' ftable(xtabs(tempo ~ temp + volt, data = resumo)) -#' +#' #' trat <- with(resumo, paste(temp, volt, sep = "-")) #' xyplot(tempo[, "C.Variação"] ~ factor(trat), #' data = resumo, @@ -1613,43 +1613,43 @@ NULL #' @title Confiabilidade de equipamentos #' #' @description Dados referentes aos tempos de falhas de equipamentos. -#' +#' #' @format Um \code{data.frame} com 4 variáveis. -#' +#' #' \describe{ #' #' \item{\code{temp}}{Tempo de operação (1 a 5).} -#' +#' #' \item{\code{equip}}{Tipo de equipamento (A, B ou C).} -#' +#' #' \item{\code{nit}}{Número de equipamentos que não falharam até o tempo t, #' t = 1,2,3,4,5.} #' #' \item{\code{yit}}{Número de falhas no intervalo entre os tempos t-1 e t.} #' #' } -#' @keywords RLAS +#' @keywords sobrevivencia #' @source Paula, G. A. (2004). Modelos de regressão: com apoio -#' computacional. São Paulo, SP: IME-USP. +#' computacional. São Paulo, SP: IME-USP. #' (Exercício 3.7.14, página 272) -#' -#' @references Lawless, J. F. (1982). Statistical Models and Methods for +#' +#' @references Lawless, J. F. (1982). Statistical Models and Methods for #' Lifetime Data. John Wiley & Sons, New York. (Página 389) -#' -#' @references Efron, B. (1988). Logistic regression, survival analysis, +#' +#' @references Efron, B. (1988). Logistic regression, survival analysis, #' and the Kaplan-Meier curve. J. Amer. Stat. Assoc., 83. #' (Páginas 414-425) -#' +#' #' @examples -#' +#' #' require(lattice) -#' +#' #' data(PaulaEx3.7.14) -#' +#' #' PaulaEx3.7.14$temp <- as.factor(PaulaEx3.7.14$temp) -#' -#' xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o", -#' auto.key = TRUE, xlab = "Tempos", +#' +#' xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o", +#' auto.key = TRUE, xlab = "Tempos", #' ylab = "N° de equipamentos operantes", #' main = "Confiabilidade dos equipamentos") NULL @@ -1660,73 +1660,73 @@ NULL #' @description Estudo de caso-controle com emparelhamentos do tipo 1:1, #' em que os casos foram mulheres com diagnóstico confirmado de tumor #' benigno na mama. Os controles foram mulheres sadias diagnosticadas no -#' mesmo hospital e período dos casos. -#' +#' mesmo hospital e período dos casos. +#' #' @format Um \code{data.frame} com 100 observações e 14 variáveis. #' #' \describe{ #' #' \item{\code{est}}{Identificação do estrato (par).} -#' +#' #' \item{\code{obs}}{Observação (1 = caso, 2 = controle).} -#' +#' #' \item{\code{idade}}{Idade do paciente no momento da entrevista (em anos).} #' #' \item{\code{diag}}{Diagnóstico (1:caso, 0:controle).} -#' +#' #' \item{\code{tesc}}{Tempo de escolaridade (em anos).} #' -#' \item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau, +#' \item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau, #' 2 = técnico, 3 = universitário, 4 = mestrado, 5 = doutorado).} -#' +#' #' \item{\code{cur}}{Checkup Regular (1 = sim, 2 = não).} -#' +#' #' \item{\code{ipg}}{Idade da primeira gravidez.} -#' +#' #' \item{\code{iim}}{Idade do início da menstruação.} -#' +#' #' \item{\code{numab}}{Número de abortos} -#' +#' #' \item{\code{numfi}}{Número de filhos.} -#' +#' #' \item{\code{peso}}{Peso (em libras).} -#' +#' #' \item{\code{iupmen}}{Idade do último período menstrual.} -#' -#' \item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada, +#' +#' \item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada, #' 4 = viúva, 5 = solteira).} -#' +#' #' } -#' +#' #' @keywords RL #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exercício 3.7.14, pág. 273) -#' -#' -#' @references Hosmer, D. W. e Lemeshow, S. (1989). +#' +#' +#' @references Hosmer, D. W. e Lemeshow, S. (1989). #' Applied Logistic Regression. John Wiley, New York. (Capítulo.7) -#' +#' #' @examples #' #' data(PaulaEx3.7.15) -#' +#' #' # Transformar variáveis -#' +#' #' str(PaulaEx3.7.15) -#' +#' #' PaulaEx3.7.15 <- transform( -#' PaulaEx3.7.15, +#' PaulaEx3.7.15, #' PaulaEx3.7.15$est <- as.factor(PaulaEx3.7.15$est), #' PaulaEx3.7.15$diag <- as.factor(PaulaEx3.7.15$diag), #' PaulaEx3.7.15$cur <- as.factor(PaulaEx3.7.15$cur), #' PaulaEx3.7.15$ec <- as.factor(PaulaEx3.7.15$ec) #' ) #' # Libra para Kg -#' PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592 -#' -#' pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens +#' PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592 +#' +#' pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens #' + numab + numfi + peso + idupmens + ec, -#' data = PaulaEx3.7.15, +#' data = PaulaEx3.7.15, #' main = "Matriz de gráficos de dispersão - tumor benigno na mama") NULL @@ -1738,36 +1738,36 @@ NULL #' deguelin e mistura, essa última como uma mistura das duas pri- #' meiras) é investigada. As concentrações foram testadas em insetos e #' observado, para cada dose, o número de insetos mortos. -#' -#' @format Um \code{data.frame} com 4 variáveis. +#' +#' @format Um \code{data.frame} com 4 variáveis. #' #' \describe{ #' -#' \item{\code{conc}}{Concentração (R = rotenine, +#' \item{\code{conc}}{Concentração (R = rotenine, #' D = deguelin e M = mistura).} -#' +#' #' \item{\code{dose}}{Dose aplicada da concentração.} -#' +#' #' \item{\code{exp}}{Número de insetos expostos.} #' #' \item{\code{mort}}{Número de insetos mortos.} -#' +#' #' } -#' +#' #' @keywords binomial #' @source Paula, G. A. (2004). Modelos de regressão: com apoio -#' computacional. São Paulo, SP: IME-USP. +#' computacional. São Paulo, SP: IME-USP. #' (Exercício 3.7.14, pág. 274 e 275) -#' -#' @references Morgan, B. J. T. (1992). Analysis of Quantal Response Data. +#' +#' @references Morgan, B. J. T. (1992). Analysis of Quantal Response Data. #' Chapman and Hall, London. (Página 90) -#' +#' #' @examples -#' +#' #' data(PaulaEx3.7.16) -#' +#' #' require(lattice) -#' +#' #' xyplot(mort/exp ~ dose, groups = conc, data = PaulaEx3.7.16, type = 'o', #' auto.key = TRUE, ylab = "Proporção de insetos mortos", #' xlab = "Dose", main = "Sobrevivência dos insetos expostos a toxina") @@ -1776,54 +1776,54 @@ NULL #' @name PaulaEx3.7.19 #' @title Gestantes fumantes #' -#' @description Estudo com gestantes fumantes, no qual as participantes -#' foram classificadas segundo os fatores de idade, número de cigarros +#' @description Estudo com gestantes fumantes, no qual as participantes +#' foram classificadas segundo os fatores de idade, número de cigarros #' consumidos, tempo de gestação, e a condição (sobrevivência) da criança. -#' +#' #' @format Um \code{data.frame} com 5 variáveis. #' #' \describe{ #' #' \item{\code{idade}}{Idade (<30 anos ou +30).} -#' -#' \item{\code{ncigar}}{Número de cigarros consumidos por dia +#' +#' \item{\code{ncigar}}{Número de cigarros consumidos por dia #' (< 5 ou +5).} -#' +#' #' \item{\code{tgest}}{Tempo de gestação (<= 260 dias ou >260).} #' #' \item{\code{sobres}}{Número de crianças que sobreviveram.} -#' +#' #' \item{\code{sobren}}{Número de crianças que não sobreviveram.} -#' +#' #' } -#' +#' #' @keywords ML #' @source Paula, G. A. (2004). Modelos de regressão: com apoio -#' computacional. São Paulo, SP: IME-USP. +#' computacional. São Paulo, SP: IME-USP. #' (Exercício 3.7.19, página 276) -#' -#' -#' @references Agresti A. (1990). Categorical Data Analysis. John Wiley, +#' +#' +#' @references Agresti A. (1990). Categorical Data Analysis. John Wiley, #' New York. (página 253)) -#' +#' #' @examples #' #' data(PaulaEx3.7.19) -#' +#' #' require(vcd) -#' -#' # Paciente que sobreviveram +#' +#' # Paciente que sobreviveram #' ss <- xtabs(sobres ~ idade + ncigar + tgest, PaulaEx3.7.19) -#' +#' #' # Paciente que não sobreviveram #' ns <- xtabs(sobren ~ idade + ncigar + tgest, PaulaEx3.7.19) -#' +#' #' mosaic(ss, #' main = "Crianças que sobreviveram", #' labeling_args = list( #' set_varnames = c(ncigar = "Número de cigarros", #' tgest = "Tempo de gestação"))) -#' +#' #' mosaic(ns, #' main = "Crianças que não sobreviveram", #' labeling_args = list( @@ -1834,67 +1834,67 @@ NULL #' @name PaulaEx3.7.20 #' @title Pacientes com leucemia #' -#' @description Estudo com 51 pacientes adultos, -#' previamente diagnosticados com um tipo agudo de leucemia, que -#' receberam um tipo de tratamento sendo verificada, após certo +#' @description Estudo com 51 pacientes adultos, +#' previamente diagnosticados com um tipo agudo de leucemia, que +#' receberam um tipo de tratamento sendo verificada, após certo #' período, a eficiência ou não do tratamento. -#' -#' @format Um \code{data.frame} com 51 pacientes e +#' +#' @format Um \code{data.frame} com 51 pacientes e #' #' \describe{ #' #' \item{\code{idade}}{Idade do paciente (em anos).} #' -#' \item{\code{mdd}}{Mancha diferencial da doença (em porcentagem).} -#' +#' \item{\code{mdd}}{Mancha diferencial da doença (em porcentagem).} +#' #' \item{\code{if}}{Infiltração na medula (em porcentagem).} #' #' \item{\code{cl}}{Células com leucemia (em porcentagem).} -#' +#' #' \item{\code{md}}{Malignidade da doença (*10^3).} -#' +#' #' \item{\code{tmax}}{Temperatura máxima antes do tratamento (*10 F°).} -#' +#' #' \item{\code{trat}}{Tratamento (1 = satisfatório, 0 = não satisfatório).} -#' -#' \item{\code{tsobre}}{Tempo de sobrevivência (em meses).} #' -#' \item{\code{sit}}{Situação (1 = sobrevivente, 0 = não sobrevivente).} +#' \item{\code{tsobre}}{Tempo de sobrevivência (em meses).} +#' +#' \item{\code{sit}}{Situação (1 = sobrevivente, 0 = não sobrevivente).} #' } -#' +#' #' @keywords ML #' @source Paula, G. A. (2004). Modelos de regressão: com apoio -#' computacional. São Paulo, SP: IME-USP. +#' computacional. São Paulo, SP: IME-USP. #' (Exercício 3.7.19, página 276) -#' -#' @references Everitt, B. S. (1994). -#' A Handbook of Statistical Analysis using S-Plus. +#' +#' @references Everitt, B. S. (1994). +#' A Handbook of Statistical Analysis using S-Plus. #' Chapman and Hall, London. (Página 253) -#' +#' #' @examples #' #' data(PaulaEx3.7.20) -#' +#' #' # Transformar variáveis -#' +#' #' str(PaulaEx3.7.20) -#' +#' #' PaulaEx3.7.20 <- transform( #' PaulaEx3.7.20, #' PaulaEx3.7.20$trat <- as.factor(PaulaEx3.7.20$trat), #' PaulaEx3.7.20$sit <- as.factor(PaulaEx3.7.20$sit) #' ) -#' -#' +#' +#' #' require(car) -#' -#' scatterplotMatrix(~ idade + mdd + im + cl + md + tmax + trat +#' +#' scatterplotMatrix(~ idade + mdd + im + cl + md + tmax + trat #' + tsobre + sit, -#' spread = FALSE, -#' pch = 20, +#' spread = FALSE, +#' pch = 20, #' lwd = 2, -#' smooth = TRUE, -#' data = PaulaEx3.7.20, +#' smooth = TRUE, +#' data = PaulaEx3.7.20, #' cex = 1.5, #' main = "Matriz de gráficos de dispersão - Leucemia") NULL @@ -2128,20 +2128,20 @@ NULL #' @name PaulaEx3.7.7a #' @title Influ\enc{ê}{e}ncia de Extrato Vegetal e Qu\enc{í}{i}mico -#' @description Experimento de dose-resposta conduzido para avaliar a +#' @description Experimento de dose-resposta conduzido para avaliar a #' influência dos extratos vegetais "aquoso frio de folhas", "aquoso -#' frio de frutos" e de um extrato químico, respectivamente, na morte -#' de um determinado tipo de caramujo. -#' +#' frio de frutos" e de um extrato químico, respectivamente, na morte +#' de um determinado tipo de caramujo. +#' #' @format Um \code{data.frame} com 7 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{dose}}{Dose.} -#' +#' #' \item{\code{cexp}}{Caramujos expostos.} -#' +#' #' \item{\code{cmort}}{Caramujos mortos.} -#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2150,17 +2150,17 @@ NULL #' @examples #' #' data(PaulaEx3.7.7a) -#' +#' #' str(PaulaEx3.7.7a) -#' +#' #' library(lattice) -#' +#' #' xyplot(PaulaEx3.7.7a$cmort/PaulaEx3.7.7a$cexp ~ dose, #' data = PaulaEx3.7.7a, #' xlab = "Dose", #' type = c("o"), #' ylab = "Proporção de mortos", -#' auto.key = list(space="top", columns=2, +#' auto.key = list(space="top", columns=2, #' title="Caramujos", cex.title=1, #' lines=TRUE, points=FALSE)) #' @@ -2168,20 +2168,20 @@ NULL #' @name PaulaEx3.7.7b #' @title Influ\enc{ê}{e}ncia de Extrato Vegetal e Qu\enc{í}{i}mico -#' @description Experimento de dose-resposta conduzido para avaliar a +#' @description Experimento de dose-resposta conduzido para avaliar a #' influência dos extratos vegetais "aquoso frio de folhas", "aquoso -#' frio de frutos" e de um extrato químico, respectivamente, na morte -#' de um determinado tipo de caramujo. -#' +#' frio de frutos" e de um extrato químico, respectivamente, na morte +#' de um determinado tipo de caramujo. +#' #' @format Um \code{data.frame} com 7 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{dose}}{Dose.} -#' +#' #' \item{\code{cexp}}{Caramujos expostos.} -#' +#' #' \item{\code{cmort}}{Caramujos mortos.} -#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2190,17 +2190,17 @@ NULL #' @examples #' #' data(PaulaEx3.7.7b) -#' +#' #' str(PaulaEx3.7.7b) -#' +#' #' library(lattice) -#' +#' #' xyplot(PaulaEx3.7.7b$cmort/PaulaEx3.7.7b$cexp ~ dose, #' data = PaulaEx3.7.7b, #' xlab = "Dose", #' type = c("o"), #' ylab = "Proporção de mortos", -#' auto.key = list(space="top", columns=2, +#' auto.key = list(space="top", columns=2, #' title="Caramujos", cex.title=1, #' lines=TRUE, points=FALSE)) #' @@ -2209,20 +2209,20 @@ NULL #' @name PaulaEx3.7.7c #' @title Influ\enc{ê}{e}ncia de Extrato Vegetal e Qu\enc{í}{i}mico -#' @description Experimento de dose-resposta conduzido para avaliar a +#' @description Experimento de dose-resposta conduzido para avaliar a #' influência dos extratos vegetais "aquoso frio de folhas", "aquoso -#' frio de frutos" e de um extrato químico, respectivamente, na morte -#' de um determinado tipo de caramujo. -#' +#' frio de frutos" e de um extrato químico, respectivamente, na morte +#' de um determinado tipo de caramujo. +#' #' @format Um \code{data.frame} com 7 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{dose}}{Dose.} -#' +#' #' \item{\code{cexp}}{Caramujos expostos.} -#' +#' #' \item{\code{cmort}}{Caramujos mortos.} -#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2231,43 +2231,43 @@ NULL #' @examples #' #' data(PaulaEx3.7.7c) -#' +#' #' str(PaulaEx3.7.7c) -#' +#' #' library(lattice) -#' +#' #' xyplot(PaulaEx3.7.7c$cmort/PaulaEx3.7.7c$cexp ~ dose, #' data = PaulaEx3.7.7c, #' xlab = "Dose", #' type = c("o"), #' ylab = "Proporção de mortos", -#' auto.key = list(space="top", columns=2, +#' auto.key = list(space="top", columns=2, #' title="Caramujos", cex.title=1, #' lines=TRUE, points=FALSE)) #' -#' +#' #' NULL #' @name PaulaEx3.7.8 #' @title Sal\enc{á}{a}rio de Executivos #' @description Dados referentes a um experimento desenvolvido para avaliar -#' a germinação de um determinado tipo de semente. A tabela abaixo -#' apresenta o número de sementes que germinaram após cinco dias para +#' a germinação de um determinado tipo de semente. A tabela abaixo +#' apresenta o número de sementes que germinaram após cinco dias para #' cada 100 sementes submetidas a cada condição experimental. -#' +#' #' @format Um \code{data.frame} com 18 observações e 4 variáveis. #' \describe{ -#' +#' #' \item{\code{temp}}{Temperatura da germinação.} -#' +#' #' \item{\code{numid}}{Nível da umidade.} -#' +#' #' \item{\code{ntemp}}{Nível da temperatura.} -#' +#' #' \item{\code{sgerm}}{Número de sementes que germinaram.} -#' -#' +#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2276,13 +2276,13 @@ NULL #' @examples #' #' data(PaulaEx3.7.8) -#' +#' #' str(PaulaEx3.7.8) -#' +#' #' library(lattice) -#' +#' #' PaulaEx3.7.8$ntemp <- as.factor(PaulaEx3.7.8$ntemp) -#' +#' #' PaulaEx3.7.8$numid <- as.factor(PaulaEx3.7.8$numid) #' xyplot(sgerm ~ numid | ntemp, #' data = PaulaEx3.7.8, @@ -2295,27 +2295,27 @@ NULL #' @title N\enc{ú}{u}mero de Infec\enc{çõ}{co}es de Ouvido em Recrutas Americanos #' @description Dados referentes a um estudo realizado em 1990 com #' recrutas americanos em que a variável de interesse era o número de -#' infecções de ouvido. Além disso, foram coletadas as seguintes -#' informações sobre os recrutas: hábito de nadar, local em que +#' infecções de ouvido. Além disso, foram coletadas as seguintes +#' informações sobre os recrutas: hábito de nadar, local em que #' costuma nadar, idade e sexo. -#' +#' #' @format Um \code{data.frame} com 287 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{habito}}{Fator com dois níveis que indica o hábito em #' nadar do recruta (\code{ocasional} ou \code{frequente}).} -#' +#' #' \item{\code{local}}{Fator com dois níveis que indica o local onde o #' recruta costuma nadar, (\code{praia} ou \code{piscina}).} -#' +#' #' \item{\code{idade}}{Idade do recruta, em anos categorizados em três #' níveis (\code{15-19}, \code{20-24} e \code{25-29}).} -#' +#' #' \item{\code{sexo}}{Sexo (\code{F} para feminino e \code{M} para masculino).} -#' +#' #' \item{\code{ninfec}}{Número de infecções de ouvido diagnosticadas #' pelo próprio recruta.} -#' +#' #' } #' @keywords contagem superdispersão #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2328,18 +2328,18 @@ NULL #' @examples #' #' data(PaulaEx4.6.15) -#' +#' #' str(PaulaEx4.6.15) -#' +#' #' xt <- xtabs(ninfec ~ ., data = PaulaEx4.6.15) #' ftable(prop.table(xt)) #' plot(xt, xlab = "Hábito", main = "") -#' +#' #' mv <- aggregate(ninfec ~ ., FUN = function(x) #' c(mu = mean(x), var = var(x)), data = PaulaEx4.6.15) -#' +#' #' library(lattice) -#' +#' #' # Relação Média Variância #' xyplot(ninfec[, "var"] ~ ninfec[, "mu"], #' data = mv, @@ -2349,9 +2349,9 @@ NULL #' panel.xyplot(x, y, type = c("p", "r"), grid = TRUE) #' panel.abline(a = 0, b = 1, lty = 2) #' }) -#' +#' #' library(latticeExtra) -#' useOuterStrips( +#' useOuterStrips( #' xyplot(ninfec ~ idade | habito + local, #' groups = sexo, #' data = PaulaEx4.6.15, @@ -2373,22 +2373,22 @@ NULL #' preferência e maciez da água. #' @format Um \code{data.frame} com 24 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{temp}}{Temperatura da água, mensurada em dois níveis #' (\code{alta} e \code{baixa}).} -#' +#' #' \item{\code{usom}}{Uso anterior do detergente da marca \code{M} #' (\code{sim} ou \code{não}).} -#' +#' #' \item{\code{prefer}}{Detergente de preferência (\code{M} ou #' \code{X}).} -#' +#' #' \item{\code{maciez}}{Maciez da água, mensurada em três níveis #' (\code{forte}, code{leve} e \code{média}).} -#' +#' #' \item{\code{nind}}{Número de pessoas que tiveram respostas conforme #' combinação de \code{temp}, \code{usom}, \code{prefer} e \code{maciez}.} -#' +#' #' } #' @keywords contagem #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2401,15 +2401,15 @@ NULL #' @examples #' #' data(PaulaEx4.6.17) -#' +#' #' str(PaulaEx4.6.17) -#' +#' #' xt <- xtabs(nind ~ ., data = PaulaEx4.6.17) #' ftable(xt) #' plot(xt) -#' +#' #' library(latticeExtra) -#' useOuterStrips( +#' useOuterStrips( #' xyplot(nind ~ maciez | prefer + usom, #' groups = temp, #' data = PaulaEx4.6.17, @@ -2432,11 +2432,11 @@ NULL #' de ovos eclodidos. #' @format Um \code{data.frame} com 50 observações e 2 variáveis. #' \describe{ -#' +#' #' \item{\code{dose}}{Dosagem de \emph{Nitrofen} aplicada, em mg/l.} -#' +#' #' \item{\code{novos}}{Número de ovos de \emph{Ceriodaphnia dubia} -#' eclodidos após 3 ninhadas.} +#' eclodidos após 3 ninhadas.} #' #' } #' @@ -2454,12 +2454,12 @@ NULL #' @examples #' #' data(PaulaEx4.6.20) -#' +#' #' str(PaulaEx4.6.20) -#' +#' #' aggregate(novos ~ dose, FUN = function(x) c(mean(x), var(x)), #' data = PaulaEx4.6.20) -#' +#' #' library(lattice) #' xyplot(novos ~ dose, #' data = PaulaEx4.6.20, @@ -2478,23 +2478,23 @@ NULL #' realizada, sexo e escores de balanço e força. O objetivo do #' estudo é relacionar o número médio de quedas com o tipo de intervenção #' e as demais variáveis explicativas coletadas. -#' +#' #' @format Um \code{data.frame} com 100 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{nquedas}}{Número de quedas no período de seis meses.} -#' +#' #' \item{\code{interv}}{Fator com dois níveis que indica a intervenção #' realizada (\code{E}: somente educação, \code{EF}: educação e #' exercícios físicos.)} -#' +#' #' \item{\code{sexo}}{Fator com dois níveis que indica o sexo do #' indivíduo (\code{F}: feminino e \code{M}: masculino).} -#' +#' #' \item{\code{balan}}{Escore do balanço do indivíduo, escala de 0 a 100.} -#' +#' #' \item{\code{forca}}{Escore da força do indivíduo, escala de 0 a 100.} -#' +#' #' } #' @keywords contagem #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2506,11 +2506,11 @@ NULL #' @examples #' #' data(PaulaEx4.6.5) -#' +#' #' str(PaulaEx4.6.5) -#' +#' #' library(lattice) -#' +#' #' xyplot(nquedas ~ balan + forca | interv, #' groups = sexo, #' data = PaulaEx4.6.5, @@ -2520,7 +2520,7 @@ NULL #' scales = list(x = list(rot = 45, relation = "free")), #' auto.key = list(cex.title = 1, columns = 2, #' title = "Sexo")) -#' +#' #' splom(~ PaulaEx4.6.5[, c("nquedas", "balan", "forca")], #' type = c("p", "smooth")) #' @@ -2537,24 +2537,24 @@ NULL #' desde o primeiro emprego. #' @format Um \code{data.frame} com 72 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{idade}}{Fator com quatro níveis referente à idade (em anos) #' do trabalhador no seu primeiro emprego, com níveis #' \code{<20}, \code{20-27}, \code{27.5-34.9} e \code{>35}.} -#' +#' #' \item{\code{ano}}{Fator com quatro níveis referente ao ano do #' primeiro emprego (\code{<1910}, \code{1910-1914}, #' \code{1915-1919} e \code{1920-1924}).} -#' +#' #' \item{\code{tempo}}{Fator com cinco níveis que indica o tempo #' decorrido desde o primeiro emprego, em anos, categorizados nos #' níveis \code{0-19}, \code{20-39}, \code{30-39}, \code{40-49} e #' \code{>50}.} -#' +#' #' \item{\code{ncasos}}{Número de casos de câncer nasal.} -#' +#' #' \item{\code{tpessoas}}{Total de pessoas|ano de observação.} -#' +#' #' } #' @keywords contagem #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2566,28 +2566,28 @@ NULL #' @examples #' #' data(PaulaEx4.6.6) -#' +#' #' str(PaulaEx4.6.6) -#' +#' #' # Número de observações em cada combinação das variáveis explicativas #' # Para modelagem não será possível a estimação de algumas interações #' ftable(PaulaEx4.6.6[, c("idade", "ano", "tempo")]) -#' +#' #' # Casos de câncer seccionados pelas variáveis explicativas #' ftable(xtabs(ncasos ~ idade + ano + tempo, data = PaulaEx4.6.6)) #' xt <- xtabs((ncasos/tpessoas)*100 ~ ., data = PaulaEx4.6.6) #' ftable(xt) #' plot(xt) -#' +#' #' library(lattice) -#' +#' #' xyplot((ncasos/tpessoas) ~ tempo | ano, #' groups = idade, #' data = PaulaEx4.6.6, #' type = c("p", "g", "a"), #' auto.key = list(space = "right", cex.title = 1, #' title = "Idade")) -#' +#' #' # Retirando a observação que domina a escala do eixo y #' index <- with(PaulaEx4.6.6, which.max(ncasos/tpessoas)) #' xyplot((ncasos/tpessoas) ~ tempo | ano, @@ -2606,11 +2606,11 @@ NULL #' produzida e o número de falhas encontradas. #' @format Um \code{data.frame} com 32 observações e 2 variáveis. #' \describe{ -#' +#' #' \item{\code{comp}}{Comprimento da peça de tecido produzida, em metros.} -#' +#' #' \item{\code{nfalhas}}{Número de falhas encontradas na peça.} -#' +#' #' } #' @keywords contagem superdispersão #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2621,52 +2621,52 @@ NULL #' @examples #' #' data(PaulaEx4.6.7) -#' +#' #' str(PaulaEx4.6.7) #' #' library(lattice) #' xyplot(nfalhas ~ comp, data = PaulaEx4.6.7, -#' type = c("p", "g", "smooth"), xlab = "Comprimento", ylab = +#' type = c("p", "g", "smooth"), xlab = "Comprimento", ylab = #' "Número de falhas") -#' -#' histogram( ~nfalhas/comp, data = PaulaEx4.6.7, +#' +#' histogram( ~nfalhas/comp, data = PaulaEx4.6.7, #' xlab = "Número de falhas por metro de tecido", ylab = "Frequência") #' NULL #' @name PaulaEx5.6.13 #' @title An\enc{á}{a}lise da dispers\enc{ã}{a}o de um pigmento na pintura -#' @description Um experimento foi conduzido para avaliar a dispersão -#' de quatro diferentes pigmentos numa pintura. O procedimento -#' consistiu em preparar cada mistura e aplicá-las num painel usando -#' três métodos diferentes. O experimento é repetido em três dias distintos +#' @description Um experimento foi conduzido para avaliar a dispersão +#' de quatro diferentes pigmentos numa pintura. O procedimento +#' consistiu em preparar cada mistura e aplicá-las num painel usando +#' três métodos diferentes. O experimento é repetido em três dias distintos #' e a resposta é a porcentagem de reflectância do pigmento. -#' +#' #' @format Um \code{data.frame} com 36 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{painel}}{Número do painel.} -#' +#' #' \item{\code{dia}}{Dia de aplicação (1, 2 ou 3).} -#' -#' \item{\code{metod}}{Método utilizado: (1 = pincel, 2 = rolo e +#' +#' \item{\code{metod}}{Método utilizado: (1 = pincel, 2 = rolo e #' 3 = spray.} -#' +#' #' \item{\code{mistur}}{Tipo de mistura do pigmento (1, 2, 3 ou 4).} -#' +#' #' \item{\code{reflec}}{Porcetagem de reflectância do pigmento.} -#' +#' #' } #' @keywords quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exercício 5.6.13, pág. 400) -#' +#' #' @references Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002). -#' Generalized Linear Models: With Applications in Engineering and the +#' Generalized Linear Models: With Applications in Engineering and the #' Sciences. John Wiley, New York. -#' +#' #' @examples -#' +#' #' library(lattice) #' #' data(PaulaEx5.6.13) @@ -2680,93 +2680,93 @@ NULL #' @name PaulaEx5.6.14 #' @title Compara\enc{çã}{ca}o de drogas para tratamento de leucemia #' @description Dados referentes a um experimento em que 30 ratos tiveram -#' uma condição de leucemia induzida, sendo submetidos, posteriormente, -#' a três drogas quimioterápicas. Foram coletadas de cada animal a -#' quantidade de células brancas, a quantidade de células vermelhas +#' uma condição de leucemia induzida, sendo submetidos, posteriormente, +#' a três drogas quimioterápicas. Foram coletadas de cada animal a +#' quantidade de células brancas, a quantidade de células vermelhas #' e o número de colônias de células cancerosas, em três períodos diferentes. -#' +#' #' @format Um \code{data.frame} com 120 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{rato}}{Número de identificação do rato.} -#' +#' #' \item{\code{period}}{Período de avaliação (1, 2, 3 ou 4).} -#' +#' #' \item{\code{trat}}{Droga quimioterápica utilizada (1, 2 ou 3).} -#' +#' #' \item{\code{celubran}}{Quantidade de células brancas.} -#' +#' #' \item{\code{celuverm}}{Quantidade de células vermelhas.} -#' +#' #' \item{\code{celucanc}}{Número de colônias de células cancerosas.} -#' +#' #' } #' @keywords quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exercício 5.6.14, pág. 401) -#' +#' #' @references Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002). -#' Generalized Linear Models: With Applications in Engineering and the +#' Generalized Linear Models: With Applications in Engineering and the #' Sciences. John Wiley, New York. -#' +#' #' @examples -#' +#' #' library(lattice) #' #' data(PaulaEx5.6.14) -#' +#' #' xyplot(celucanc ~ period, groups = rato, #' type = c("p", "g", "a"), data = PaulaEx5.6.14) -#' +#' NULL #' @name PaulaEx5.6.15 #' @title Ensaio cl\enc{í}{i}nico em pacientes com artrite -#' @description Ensaio clínico em que 20 pacientes com artrite +#' @description Ensaio clínico em que 20 pacientes com artrite #' foram aleatorizados, de modo que 10 receberam o medicamento #' auronofin e os outros 10 receberam placebo. São consideradas como -#' variáveis explicativas sexo e idade, além do tipo do tratamento. Os +#' variáveis explicativas sexo e idade, além do tipo do tratamento. Os #' pacientes foram consultados e avaliados em 4 ocasiões. -#' +#' #' @format Um \code{data.frame} com 80 observações e 6 variáveis. #' \describe{ -#' +#' #' \item{\code{pacient}}{Identificação do paciente.} -#' -#' \item{\code{period}}{Momento em que o paciente foi avaliado (1 = início +#' +#' \item{\code{period}}{Momento em que o paciente foi avaliado (1 = início #' do mês, 2 = após 1 mês, 3 = após 2 meses e 4 = após 3 meses.} -#' +#' #' \item{\code{sexo}}{Sexo (1 = masculino e 0 = feminino).} -#' +#' #' \item{\code{idade}}{Idade (em anos).} -#' +#' #' \item{\code{trat}}{Tratamento aplicado placebo ou Auronofin).} -#' -#' \item{\code{result}}{Avaliação do paciente classificada em +#' +#' \item{\code{result}}{Avaliação do paciente classificada em #' bom e regular ou ruim.} -#' +#' #' } #' @keywords quase-verossimilhança #' @source Paula, G. A. (2004). Modelos de regressão: com apoio #' computacional. São Paulo, SP: IME-USP. (Exercício 5.6.14, pág. 401) -#' +#' #' @references Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002). -#' Generalized Linear Models: With Applications in Engineering and the +#' Generalized Linear Models: With Applications in Engineering and the #' Sciences. John Wiley, New York. -#' +#' #' @examples -#' +#' #' library(lattice) -#' +#' #' data(PaulaEx5.6.15) -#' -#' barchart(table(PaulaEx5.6.15$result,PaulaEx5.6.15$trat, PaulaEx5.6.15$period), -#' auto.key = list(space="top", -#' columns = 4, cex.title = 1, rectangles = TRUE, points=FALSE, +#' +#' barchart(table(PaulaEx5.6.15$result,PaulaEx5.6.15$trat, PaulaEx5.6.15$period), +#' auto.key = list(space="top", +#' columns = 4, cex.title = 1, rectangles = TRUE, points=FALSE, #' title = "Período"), #' scales = list(y = list(relation = "free"), #' x = list(alternating = FALSE)), -#' horizontal = FALSE, beside = FALSE, stack = FALSE, +#' horizontal = FALSE, beside = FALSE, stack = FALSE, #' xlab = "Resultado", ylab = "Frequência absoluta") #' NULL @@ -2776,16 +2776,16 @@ NULL #' @description Conjunto de dados que apresenta para cada unidade da #' federação o número médio de anos de estudo e a renda média mensal #' do chefe ou chefes de domicílio. -#' +#' #' @format Um \code{data.frame} com 27 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{est}}{Estado (unidade da federação).} -#' +#' #' \item{\code{esc}}{Número médio de anos de estudo.} -#' +#' #' \item{\code{rendm}}{Renda média mensal (em reais).} -#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2794,11 +2794,11 @@ NULL #' @examples #' #' data(PaulaTb1.6) -#' +#' #' str(PaulaTb1.6) -#' +#' #' library(lattice) -#' +#' #' xyplot(rendm ~ est, #' ylab = "Renda", #' xlab = "Estados", @@ -2806,7 +2806,7 @@ NULL #' type = 'h', #' main = "Renda Média Mensal em Estado", #' grid = TRUE) -#' +#' #' xyplot(rendm ~ esc, #' ylab = "Renda", #' xlab = "Número médio de anos de estudo", @@ -2818,17 +2818,17 @@ NULL #' @name PaulaTb1.9 #' @title Bact\enc{é}{e}rias Sobreviventes em Amostras -#' @description Número de bactérias sobreviventes em amostras de um +#' @description Número de bactérias sobreviventes em amostras de um #' produto alimentício segundo o tempo de exposição do produto a uma #' temperatura de 300°F. -#' +#' #' @format Um \code{data.frame} com 12 observações e 2 variáveis. #' \describe{ -#' +#' #' \item{\code{num}}{Número de bactérias sobreviventes.} -#' +#' #' \item{\code{temp}}{Tempo de exposição (em minutos).} -#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2837,11 +2837,11 @@ NULL #' @examples #' #' data(PaulaTb1.9) -#' +#' #' str(PaulaTb1.9) -#' +#' #' library(lattice) -#' +#' #' xyplot(num ~ temp, #' ylab = "Número de bactérias", #' xlab = "Tempo de exposição", @@ -2861,13 +2861,13 @@ NULL #' equivalentemente, a duração do motor. #' @format Um \code{data.frame} com 50 observações e 2 variáveis. #' \describe{ -#' +#' #' \item{\code{turb}}{Fator com cinco níveis que indica o tipo de #' turbina.} -#' +#' #' \item{\code{tempo}}{Tempo até a perda de velocidade, ou seja, duração #' do motor, mensurado em unidades de milhões de ciclos.} -#' +#' #' } #' @keywords positivo-assimétrico #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2877,19 +2877,19 @@ NULL #' Lifetime Data. John Wiley, New York. #' @examples #' data(PaulaTb2.1) -#' +#' #' str(PaulaTb2.1) -#' +#' #' # Dados no formato "largo", conforme tabela 2.1 (Paula, 2004) #' unstack(PaulaTb2.1, tempo ~ turb) -#' +#' #' aggregate(tempo ~ turb, summary, data = PaulaTb2.1) -#' +#' #' library(lattice) #' xyplot(tempo ~ turb, #' data = PaulaTb2.1, #' type = c("p", "g", "smooth")) -#' +#' #' densityplot(~tempo, groups = turb, data = PaulaTb2.1, #' auto.key = list(corner = c(0.9, 0.9), #' title = "Tipos de turbina", @@ -2904,11 +2904,11 @@ NULL #' obtidos. #' @format Um \code{data.frame} com 20 observações e 2 variáveis. #' \describe{ -#' +#' #' \item{\code{proj}}{Valor projetado de venda.} -#' +#' #' \item{\code{real}}{Valor real de venda.} -#' +#' #' } #' @keywords positivo-assimétrico #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -2916,9 +2916,9 @@ NULL #' #' @examples #' data(PaulaTb2.6) -#' +#' #' str(PaulaTb2.6) -#' +#' #' library(lattice) #' xyplot(real ~ proj, data = PaulaTb2.6, #' grid = TRUE, pch = 19, cex = 1.2, @@ -2931,26 +2931,26 @@ NULL #' @name PaulaTb3.12 #' @title Ocorr\enc{ê}{e}ncia de vaso-constri\enc{çã}{ca}o -#' @description Dados de um experimento desenvolvido para +#' @description Dados de um experimento desenvolvido para #' avaliar a influência da quantidade de ar inspirado na ocorrência #' de vaso-constrição na pele dos dedos da mão. A resposta é a ocorrência -#' (1) ou ausência (0) de compressão de vasos e as covariáveis são o -#' volume e a razão de ar inspirado. -#' +#' (1) ou ausência (0) de compressão de vasos e as covariáveis são o +#' volume e a razão de ar inspirado. +#' #' @format Um \code{data.frame} com 39 observações e 3 variáveis, em que #' #' \describe{ #' #' \item{vol}{Logaritmo do volume de ar inspirado.} -#' +#' #' \item{razao}{Logaritmo da razão de ar inspirado.} #' #' \item{resp}{Ocorrência ou não de compressão de vaso (ocorrência = 1 #' e ausência = 0).} -#' +#' #' } -#' @keywords GLM binarios -#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +#' @keywords MLG binarios +#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. #' São Paulo, SP: IME-USP. (Tb 3.12 pág. 227) #' @examples #' @@ -2959,17 +2959,17 @@ NULL #' data(PaulaTb3.12) #' #' str(PaulaTb3.12) -#' -#' bwplot(vol ~ resp, data = PaulaTb3.12, +#' +#' bwplot(vol ~ resp, data = PaulaTb3.12, #' type=c("p","a"), #' xlab="Vaso-constrição", ylab="Volume de ar inspirado", -#' scales=list(x=list(labels=c("Ausência","Ocorrência"))), +#' scales=list(x=list(labels=c("Ausência","Ocorrência"))), #' main="Ocorrência de vaso-constrição") -#' -#' bwplot(razao ~ resp, data = PaulaTb3.12, +#' +#' bwplot(razao ~ resp, data = PaulaTb3.12, #' type=c("p","a"), #' xlab=" Vaso-constrição", ylab="Razão de ar inspirado", -#' scales=list(x=list(labels=c("Ausência","Ocorrência"))), +#' scales=list(x=list(labels=c("Ausência","Ocorrência"))), #' main="Ocorrência de vaso-constrição") NULL @@ -2977,23 +2977,23 @@ NULL #' @title Aplica\enc{çã}{ca}o de inseticidas em insetos #' @description Dados de um experimento em que três #' inseticidas foram aplicados em determinada espécie de inseto, sendo -#' verificado o número de sobreviventes para cada dose aplicada. -#' +#' verificado o número de sobreviventes para cada dose aplicada. +#' #' @format Um \code{data.frame} com 18 observações e 7 variáveis, em que #' #' \describe{ #' #' \item{mortos}{Número de insetos mortos.} -#' +#' #' \item{exp}{Número de insetos expostos aos inseticidas.} #' #' \item{dose}{Dose aplicada dos inseticidas.} -#' +#' #' \item{inset}{Tipo de inseticida.} #' #' } -#' @keywords GLM -#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +#' @keywords MLG +#' @source Paula, G. A. (2004). Modelos de regressão: com apoio computacional. #' São Paulo, SP: IME-USP. (Tb 3.20 pág. 246) #' @examples #' @@ -3002,32 +3002,32 @@ NULL #' data(PaulaTb3.20) #' #' str(PaulaTb3.20) -#' +#' #' xyplot(mortos/(sum(mortos)) ~ dose, data = PaulaTb3.20, auto.key = TRUE, #' type = c("p","a"), groups= inset, -#' xlab = "Dose de inseticida aplicada", -#' ylab = "Proporção de insetos mortos", +#' xlab = "Dose de inseticida aplicada", +#' ylab = "Proporção de insetos mortos", #' main = "Aplicações de inseticidas") NULL #' @name PaulaTb3.21 #' @title Distribui\enc{çã}{ca}o de Rotifers das Duas Esp\enc{é}{e}cies -#' @description Experimento com duas espécies de *rotifers*, um tipo -#' microscópio de invertebrado aquático. São apresentados pra cada +#' @description Experimento com duas espécies de *rotifers*, um tipo +#' microscópio de invertebrado aquático. São apresentados pra cada #' espécie a densidade relativa da substância, o número de *rotifers* #' expostos e o número de *rotifers* em suspensão. -#' +#' #' @format Um \code{data.frame} com 40 observações e 4 variáveis. #' \describe{ -#' +#' #' \item{\code{dens}}{Densidade.} -#' +#' #' \item{\code{susp}}{Rotifers suspensos.} -#' +#' #' \item{\code{exp}}{Rotifers expostos.} -#' +#' #' \item{\code{esp}}{Espécie (Polyarthra, Keratella).} -#' +#' #' } #' @keywords MLG #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -3036,11 +3036,11 @@ NULL #' @examples #' #' data(PaulaTb3.21) -#' +#' #' str(PaulaTb3.21) -#' +#' #' library(lattice) -#' +#' #' xyplot(PaulaTb3.21$susp/PaulaTb3.21$exp ~ dens, #' groups = esp, #' data = PaulaTb3.21, @@ -3048,7 +3048,7 @@ NULL #' ylab = "Proporção de rotifers suspensos", #' type = c("p"), #' auto.key = TRUE) -#' +#' NULL #' @name PaulaTb4.12 @@ -3057,22 +3057,22 @@ NULL #' classificados segundo sua renda anual e grau informado de #' satisfação no emprego. O interesse no estudo é relacionar a renda #' anual e satisfação no emprego. -#' +#' #' @format Um \code{data.frame} com 16 observações e 3 variáveis. #' \describe{ -#' +#' #' \item{\code{renda}}{Fator com quatro níveis representando a renda do #' indivíduo. Expressos em mil USD os níveis são: menor que 6 #' (\code{<6}), entre 6 e 12 (\code{6-15}), entre 15 e 25 #' (\code{15-25}) e maior que 25 (\code{>25}).} -#' +#' #' \item{\code{satis}}{Fator com quatro níveis que representa o grau de #' satisfação do indivíduo no emprego (\code{alto}, \code{bom}, #' \code{médio} e \code{baixo}).} -#' +#' #' \item{\code{nind}}{Número de indivíduos na combinação das variáveis #' \code{renda} e \code{satis}.} -#' +#' #' } #' @keywords contagem #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -3083,12 +3083,12 @@ NULL #' @examples #' #' data(PaulaTb4.12) -#' +#' #' str(PaulaTb4.12) -#' +#' #' (xt <- xtabs(nind ~ ., data = PaulaTb4.12)) #' plot(xt) -#' +#' #' library(lattice) #' xyplot(nind ~ renda, #' groups = satis, @@ -3107,27 +3107,27 @@ NULL #' pacientes segundo três fatores: ocorrência de doença das #' coronárias, nível de colesterol e pressão arterial. O interesse #' é analisar a associação entre essas variáveis. -#' +#' #' @format Um \code{data.frame} com 32 observações e 4 variáveis. #' \describe{ -#' +#' #' \item{\code{doenca}}{Fator com dois níveis que indica a ocorrência #' (\code{sim}) ou não ocorrência (\code{não}) de doença das #' coronárias.} -#' +#' #' \item{\code{colest}}{Fator com quatro níveis que indica o nível de #' colesterol do paciente. A unidade de medida adotada é #' \eqn{mg/100cm^3} com classes \code{<200}, \code{200-219}, #' \code{220-259} e \code{>259}.} -#' +#' #' \item{\code{pa}}{Fator com quatro níveis referente à pressão #' arterial do paciente. A unidade de medida adotada é mm Hg #' (milímetro-mercúrio) com classes \code{<127}, \code{127-146}, #' \code{147-166} e \code{>166}.} -#' +#' #' \item{\code{nind}}{Número de indivíduos para cada combinação das categorias #' das variáveis \code{doenca}, \code{colest} e \code{pa}.} -#' +#' #' } #' @keywords contagem #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -3138,13 +3138,13 @@ NULL #' @examples #' #' data(PaulaTb4.14) -#' +#' #' str(PaulaTb4.14) -#' +#' #' xt <- xtabs(nind ~ ., data = PaulaTb4.14) #' ftable(xt) #' plot(xt) -#' +#' #' library(lattice) #' xyplot(nind ~ colest | doenca, #' groups = pa, @@ -3167,19 +3167,19 @@ NULL #' consumo médio diário de cigarro e a faixa-etária. #' @format Um \code{data.frame} com 16 observações e 4 variáveis. #' \describe{ -#' +#' #' \item{\code{nmortes}}{Número de casos de morte por câncer de #' pulmão.} -#' -#' \item{\code{tpessoas}}{Total de anos de exposição (somado para toda a +#' +#' \item{\code{tpessoas}}{Total de anos de exposição (somado para toda a #' amostra).} -#' +#' #' \item{\code{cmdc}}{Consumo médio diário de cigarros, dividido em #' quatro níveis 0, 1-9, 10-30 ou +30 cigarros consumidos.} -#' +#' #' \item{\code{idade}}{Idade, registrada em faixas-etárias de 40- 49, #' 50-59, 60-79 e 70-80 anos.} -#' +#' #' } #' @keywords contagem #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -3187,13 +3187,13 @@ NULL #' @examples #' #' data(PaulaTb4.2) -#' +#' #' str(PaulaTb4.2) -#' +#' #' xtabs(nmortes ~ cmdc + idade, data = PaulaTb4.2) #' (xt <- xtabs((nmortes/tpessoas)*100 ~ cmdc + idade, data = PaulaTb4.2)) #' plot(xt) -#' +#' #' library(lattice) #' xyplot((nmortes/tpessoas)*100 ~ cmdc, #' xlab = "Consumo médio de cigarros", @@ -3213,27 +3213,27 @@ NULL #' variáveis registradas tem por objetivo explicar esta contagem. #' @format Um \code{data.frame} com 40 observações e 8 variáveis. #' \describe{ -#' +#' #' \item{\code{nass}}{Número de assinantes de TV a cabo (em milhares).} -#' +#' #' \item{\code{domic}}{Número de domicílios na área (em milhares).} -#' +#' #' \item{\code{perc}}{Percentagem de domicílios com TV a cabo.} -#' +#' #' \item{\code{renda}}{Renda per capita por domicílio com TV a cabo (em #' USD).} -#' +#' #' \item{\code{taxa}}{Valor da taxa de instalação de TV a cabo (em #' USD).} -#' +#' #' \item{\code{custo}}{Custo médio mensal de manutenção de TV a cabo (em #' USD).} -#' +#' #' \item{\code{ncabo}}{Número de canais a cabo disponíveis na área.} -#' +#' #' \item{\code{ntv}}{Número de canais não pagos com sinal de boa #' qualidade na área.} -#' +#' #' } #' @keywords contagem superdispersão #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -3241,9 +3241,9 @@ NULL #' @examples #' #' data(PaulaTb4.7) -#' +#' #' str(PaulaTb4.7) -#' +#' #' library(lattice) #' splom(PaulaTb4.7, type = c("p", "smooth"), lwd = 2) #' @@ -3259,23 +3259,23 @@ NULL #' navios com um maior tempo em operação). #' @format Um \code{data.frame} com 34 observações e 5 variáveis. #' \describe{ -#' +#' #' \item{\code{tipo}}{Fator com cinco níveis que representa o tipo de #' navio (A, B, C, D e E).} -#' +#' #' \item{\code{ano}}{Fator com quatro níveis que representa o ano de #' fabricação do navio (entre 1960 e 1964 (\code{60-64}), entre 1965 -#' e 1969 (\code{65-69}), entre 1970 e 1974 (\code{70-74}) e +#' e 1969 (\code{65-69}), entre 1970 e 1974 (\code{70-74}) e #' entre 1975 e 1979 (\code{75-79})).} -#' +#' #' \item{\code{peri}}{Fator com dois níveis que representa o período de #' operação do navio (entre 1960 e 1974 (\code{60-74}) e entre 1975 #' e 1979 (\code{75-79})).} -#' +#' #' \item{\code{meses}}{Tempo, em meses, em que o navio esteve em operação.} -#' +#' #' \item{\code{avarias}}{Número de avarias no navio.} -#' +#' #' } #' @keywords contagem superdispersão #' @source Paula, G. A. (2004). Modelos de regressão: com apoio @@ -3283,18 +3283,18 @@ NULL #' @examples #' #' data(PaulaTb4.9) -#' +#' #' str(PaulaTb4.9) -#' +#' #' # Número de observações em cada combinação das variáveis explicativas #' ftable(PaulaTb4.9[, c("tipo", "ano", "peri")]) -#' +#' #' # Número de avarias e número de avarias por mês observada em cada #' # combinação das variáveis explicativas #' xtabs(avarias ~ tipo + ano + peri, data = PaulaTb4.9) #' xt <- xtabs(avarias/meses ~ ., data = PaulaTb4.9) #' plot(xt) -#' +#' #' library(lattice) #' xyplot(avarias/meses ~ tipo | peri, #' groups = ano, @@ -3305,4 +3305,3 @@ NULL #' title = "Ano de\nfabricação")) #' NULL - diff --git a/R/Pimentel.R b/R/Pimentel.R index b4d51f8c..af3bef96 100644 --- a/R/Pimentel.R +++ b/R/Pimentel.R @@ -1,5 +1,5 @@ #' @name PimentelEg4.2 -#' @title Alimenta\enc{çã}{ca}o de porcos +#' @title Alimenta\enc{çã}{ca}o de Porcos #' @description Experimento (fictício) de alimentação de porcos em que #' se usaram quatro rações (A, B, C, D), cada uma fornecida a cinco #' animais escolhidos ao acaso. A tabela apresenta os aumentos de @@ -16,8 +16,7 @@ #' #' } #' @keywords DIC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. +#' @source PIMENTEL-GOMES (2009). #' @examples #' #' plot(PimentelEg4.2, @@ -62,7 +61,8 @@ NULL NULL #' @name PimentelEg6.2 -#' @title Ensaio de Competi\enc{çã}{ca}o de Variedades de Cana-de-a\enc{çú}{cu}car +#' @title Ensaio de Competi\enc{çã}{ca}o de Variedades de +#' Cana-de-a\enc{çú}{cu}car #' @description Experimento de competição de variedades de #' cana-de-açúcar no qual foram usadas cinco variedades dispostas #' em um delineamento quadrado latino 5 \eqn{\times} 5. @@ -84,8 +84,7 @@ NULL #' #' } #' @keywords DQL -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 6.2, pág. 96) +#' @source PIMENTEL-GOMES (2009), Exemplo 6.2, pág. 96. #' @examples #' #' data(PimentelEg6.2) @@ -111,7 +110,8 @@ NULL NULL #' @name PimentelEg7.3 -#' @title Experimento Fatorial de Aduba\enc{çã}{ca}o Mineral e com Vinha\enc{ç}{c}a +#' @title Experimento Fatorial de Aduba\enc{çã}{ca}o Mineral e com +#' Vinha\enc{ç}{c}a #' @description Experimento fatorial, \eqn{2^{2}}, em que os fatores #' eram adubação mineral completa e adubação com vinhaça. As #' parcelas foram dispostas em blocos ao acaso. @@ -134,8 +134,7 @@ NULL #' #' } #' @keywords FAT2 -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 7.3, pág. 119) +#' @source PIMENTEL-GOMES (2009), Exemplo 7.3, pág. 119. #' @examples #' #' library(lattice) @@ -157,7 +156,8 @@ NULL NULL #' @name PimentelEg7.4 -#' @title Experimento de Aduba\enc{çã}{ca}o com Torta de Filtro e Adubo Mineral +#' @title Experimento de Aduba\enc{çã}{ca}o com Torta de Filtro e Adubo +#' Mineral #' @description Experimento fatorial 2\eqn{^{2}} em que os fatores eram #' adubo mineral e torta dos filtros de Oliver de usinas de açúcar. #' @format Um \code{data.frame} com 16 observações e 4 variáveis, em que @@ -181,8 +181,7 @@ NULL #' #' } #' @keywords FAT2 -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 7.4, pág. 120) +#' @source PIMENTEL-GOMES (2009), Exemplo 7.4, pág. 120. #' @examples #' #' library(lattice) @@ -202,7 +201,8 @@ NULL NULL #' @name PimentelEx5.8.4 -#' @title Dados de Produ\enc{çã}{ca}o de Cana-planta em Ensaio de Variedades +#' @title Dados de Produ\enc{çã}{ca}o de Cana-planta em Ensaio de +#' Variedades #' @description Experimento em blocos casualizados realizado pela #' Cooperativa dos Usineiros do Oeste do Estado de São Paulo, #' referente à produção de cana-planta de um ensaio de variedades @@ -216,13 +216,12 @@ NULL #' #' \item{\code{variedade}}{Fator de 7 níveis qualitativos, que são as #' variedades cana-de-açúcar.} -#' +#' #' \item{\code{prod}}{Dados de produção de cana-planta.} #' #' } #' @keywords DBC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. +#' @source PIMENTEL-GOMES (2009). #' @examples #' #' library(lattice) @@ -251,13 +250,12 @@ NULL #' #' \item{\code{variedade}}{Fator de 6 níveis qualitativos, que são os #' diferentes tipos de mandioca.} -#' +#' #' \item{\code{prod}}{Produção de mandioca, em t ha\eqn{^{-1}}.} #' #' } #' @keywords DBC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. +#' @source PIMENTEL-GOMES (2009). #' @examples #' #' library(lattice) @@ -271,7 +269,8 @@ NULL NULL #' @name PimentelEx6.6.3 -#' @title Efeito da Idade de Castra\enc{çã}{ca}o no Ganho de Peso de Su\enc{í}{i}nos +#' @title Efeito da Idade de Castra\enc{çã}{ca}o no Ganho de Peso de +#' Su\enc{í}{i}nos #' @description Ensaio de alimentação de suínos, no qual foi usado um #' quadrado latino de 4 x 4, com os resultados referentes aos ganhos #' de peso ao fim de 252 dias. @@ -296,8 +295,7 @@ NULL #' #' } #' @keywords DQL -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Exercício 6.6.3, página 110) +#' @source PIMENTEL-GOMES (2009), Exercício 6.6.3, página 110. #' @examples #' #' data(PimentelEx6.6.3) @@ -324,7 +322,8 @@ NULL NULL #' @name PimentelPg142 -#' @title Grupo de Experimentos Fatoriais de Aduba\enc{çã}{ca}o de Algod\enc{ã}{a}o +#' @title Grupo de Experimentos Fatoriais de Aduba\enc{çã}{ca}o de +#' Algod\enc{ã}{a}o #' @description Grupo de experimentos de adubação de algodão, todos em #' delineamento inteiramente casualiado com 4 repetições cada. As #' combinações de NPK formam em ensaio fatorial com um tratamento @@ -362,8 +361,7 @@ NULL #' e a porção fatorial é a combinação das doses 1 e 2 de NK tendo o #' P fixo em 1. #' @keywords GE DIC FATADI -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Página 142) +#' @source PIMENTEL-GOMES (2009), página 142. #' @examples #' #' library(lattice) @@ -425,7 +423,8 @@ NULL NULL #' @name PimentelPg267 -#' @title Percentual de Sorgo na Ra\enc{çã}{ca}o para Desenvolvimento de Pintos +#' @title Percentual de Sorgo na Ra\enc{çã}{ca}o para Desenvolvimento de +#' Pintos #' @description Ensaio de Torres e Pimentel-Gomes (1959) em que foram #' estudadas 4 rações para pintos dos dois sexos (machos e fêmeas), #' instalado um delineamento inteiramente casualizado com duas @@ -472,7 +471,8 @@ NULL NULL #' @name PimentelPg269 -#' @title Influ\enc{ê}{e}ncia da Case\enc{í}{i}na Iodada na Nutri\enc{çã}{ca}o de Vacas Leiteiras +#' @title Influ\enc{ê}{e}ncia da Case\enc{í}{i}na Iodada na +#' Nutri\enc{çã}{ca}o de Vacas Leiteiras #' @description Ensaio realizado pelo Departamento de Produção Animal da #' Secretaria de Agricultura paulista, que teve por objetivo estudar #' a influência da caseína iodada na nutrição de vacas leiteiras. @@ -503,10 +503,9 @@ NULL #' #' A observação da testemunha (0 de caseina) no bloco 3 foi perdida. O #' valor correspondente foi estimado por métodos de imputação de -#' parcela perdida discutido na seção 5.4 de Pimentel-Gomes (2009). +#' parcela perdida discutido na seção 5.4 de PIMENTEL-GOMES (2009). #' @keywords DBC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Página 269) +#' @source PIMENTEL-GOMES (2009), página 269. #' @examples #' #' library(lattice) @@ -550,8 +549,7 @@ NULL #' #' } #' @keywords DIC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Página 382) +#' @source PIMENTEL-GOMES (2009), página 382. #' @examples #' #' library(lattice) @@ -580,16 +578,15 @@ NULL #' #' \describe{ #' -#' \item{\code{feno}}{Fator de 2 níveis qualitativos, que são os diferentes -#' tipos de feno.} +#' \item{\code{feno}}{Fator de 2 níveis qualitativos, que são os +#' diferentes tipos de feno.} #' #' \item{\code{ganhopeso}}{Aumento do peso das leitoas, observado em #' quilogramas.} #' #' } #' @keywords DIC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. +#' @source PIMENTEL-GOMES (2009). #' @examples #' #' library(lattice) @@ -615,14 +612,13 @@ NULL #' #' \item{\code{bloco}}{Fator de 6 níveis qualitativos, usado para #' controle local.} -#' +#' #' \item{\code{prod}}{Produção de milho, em kg por parcela de #' 200\eqn{m^{2}}.} #' #' } #' @keywords DBC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. +#' @source PIMENTEL-GOMES (2009). #' @examples #' #' library(lattice) @@ -662,8 +658,7 @@ NULL #' #' } #' @keywords DBI -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 10.3.1, pág. 190) +#' @source PIMENTEL-GOMES (2009), Tabela 10.3.1, pág. 190. #' @examples #' #' data(PimentelTb10.3.1) @@ -708,8 +703,7 @@ NULL #' #' } #' @keywords DBI -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 10.4.1, pág. 192) +#' @source PIMENTEL-GOMES (2009), Tabela 10.4.1, pág. 192. #' @examples #' #' data(PimentelTb10.4.1) @@ -731,8 +725,8 @@ NULL NULL #' @name PimentelTb10.6.1 -#' @title Experimento do Tipo III com recupera\enc{çã}{ca}o da informa\enc{çã}{ca}o -#' interblocos +#' @title Experimento do Tipo III com recupera\enc{çã}{ca}o da +#' informa\enc{çã}{ca}o interblocos #' @description Experimento em blocos incompletos equilibrados do Tipo #' III com recuperação da informação interblocos, conduzido por #' Fraga e Costa (1950). Neste experimento temos \eqn{b = v = 13}, @@ -784,7 +778,8 @@ NULL NULL #' @name PimentelTb11.3.1 -#' @title Experimento de Produ\enc{çã}{ca}o de Milho em L\enc{á}{a}tice Quadrado +#' @title Experimento de Produ\enc{çã}{ca}o de Milho em L\enc{á}{a}tice +#' Quadrado #' @description Produção de milho em um experimento em delineamento #' reticulado quadrado triplo de 4 \eqn{times} 4 avaliando a 16 #' híbridos de milho, em que \eqn{m = 3} repetições ortogonais e @@ -833,7 +828,8 @@ NULL NULL #' @name PimentelTb12.2.1 -#' @title Experimento de Aduba\enc{çã}{ca}o com P\eqn{_2}O\eqn{_5} em Milho +#' @title Experimento de Aduba\enc{çã}{ca}o com P\eqn{_2}O\eqn{_5} em +#' Milho #' @description Experimento de adubação de milho feito pelos engenheiros #' agrônomos Glauco Pinto Viegas e Erik Smith, em blocos ao acaso, #' para estudar o efeito da adubação na produtividade da cultura. @@ -897,8 +893,7 @@ NULL #' #' } #' @keywords RP -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 12.3.1, pág. 236) +#' @source PIMENTEL-GOMES (2009), Tabela 12.3.1, pág. 236. #' @examples #' #' library(lattice) @@ -914,7 +909,8 @@ NULL NULL #' @name PimentelTb12.4.1 -#' @title Produ\enc{çã}{ca}o de Cana em Fun\enc{çã}{ca}o do Teor de K do Solo +#' @title Produ\enc{çã}{ca}o de Cana em Fun\enc{çã}{ca}o do Teor de K do +#' Solo #' @description Experimento de produção de cana-de-açúcar em função do #' teor de K trocável do solo, em miliequivalentes de terra fina #' seca na estufa, onde a nutrição com potássio foi feita com @@ -930,8 +926,7 @@ NULL #' #' } #' @keywords RP -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 12.4.1, pág. 238) +#' @source PIMENTEL-GOMES (2009), Tabela 12.4.1, pág. 238. #' @examples #' #' library(lattice) @@ -948,7 +943,8 @@ NULL NULL #' @name PimentelTb13.5.1 -#' @title Grupo de Experimentos de Aduba\enc{çã}{ca}o de Cana-de-a\enc{çú}{cu}car +#' @title Grupo de Experimentos de Aduba\enc{çã}{ca}o de +#' Cana-de-a\enc{çú}{cu}car #' @description Conjunto de 38 ensaios fatoriais de \eqn{3^{3}} com N, P #' e K, em cana-de-açúçar, com dados de cana-planta e soca, obtidos #' por Strauss (1951). O nutriente foi aplicado nas doses de zero, @@ -972,8 +968,7 @@ NULL #' #' } #' @keywords GE -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 13.5.1, pág. 259) +#' @source PIMENTEL-GOMES (2009), Tabela 13.5.1, pág. 259. #' @examples #' #' library(lattice) @@ -1008,7 +1003,8 @@ NULL NULL #' @name PimentelTb14.4.1 -#' @title Produ\enc{çã}{ca}o de Leite em um Ensaio de Alimenta\enc{çã}{ca}o de Vacas +#' @title Produ\enc{çã}{ca}o de Leite em um Ensaio de +#' Alimenta\enc{çã}{ca}o de Vacas #' @description Experimento de nutrição de vacas, conduzido em períodos #' com 12 vacas distribuídas em 4 grupos de 3 vacas. Foram estudados #' 3 tipos de alimentação para as vacas em um delineamento quadrado @@ -1036,9 +1032,8 @@ NULL #' \item{\code{prod}}{Produções de leite, em kg.} #' #' } -#' @keywords SQL -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.4.1, pág. 272) +#' @keywords DQL +#' @source PIMENTEL-GOMES (2009), Tabela 14.4.1, pág. 272. #' @examples #' #' library(lattice) @@ -1091,8 +1086,7 @@ NULL #' #' } #' @keywords ER -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.5.1, pág. 278) +#' @source PIMENTEL-GOMES (2009), Tabela 14.5.1, pág. 278. #' @examples #' #' library(lattice) @@ -1139,8 +1133,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.7.1, pág. 283) +#' @source PIMENTEL-GOMES (2009), Tabela 14.7.1, pág. 283. #' #' Pimentel-Gomes, F.; Nunes, S. G.; Gomes, M. de B; Curvo, #' J. B. E. Modificação na análise de variância de ensaions de @@ -1191,8 +1184,7 @@ NULL #' #' } #' @keywords DBC COV -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 16.2.1, pág. 300) +#' @source PIMENTEL-GOMES (2009), Tabela 16.2.1, pág. 300. #' @examples #' #' library(lattice) @@ -1229,7 +1221,8 @@ NULL NULL #' @name PimentelTb16.3.1 -#' @title Suscetibilidade de Variedades de Soja ao Ataque de Nemat\enc{ó}{o}ides +#' @title Suscetibilidade de Variedades de Soja ao Ataque de +#' Nemat\enc{ó}{o}ides #' @description Experimento de Arruda (1952), em blocos casualizados, em #' que se compararam 21 variedades de soja para estudar sua #' suscetibilidade ao ataque de nematóides. Em cada parcela foram @@ -1258,8 +1251,7 @@ NULL #' #' } #' @keywords DBC COV -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 16.3.1, pág. 306) +#' @source PIMENTEL-GOMES (2009), Tabela 16.3.1, pág. 306. #' @examples #' #' library(lattice) @@ -1317,8 +1309,7 @@ NULL #' #' } #' @keywords DBC GE -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 17.3.1, pág. 317) +#' @source PIMENTEL-GOMES (2009), Tabela 17.3.1, pág. 317. #' @examples #' #' library(lattice) @@ -1358,8 +1349,7 @@ NULL #' #' } #' @keywords GE -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 17.4.1, pág. 322) +#' @source PIMENTEL-GOMES (2009), Tabela 17.4.1, pág. 322. #' @examples #' #' library(lattice) @@ -1383,8 +1373,8 @@ NULL NULL #' @name PimentelTb18.2.1 -#' @title Ensaio Fatorial com Tratamentos Adicionais de Aduba\enc{çã}{ca}o de -#' Milho +#' @title Ensaio Fatorial com Tratamentos Adicionais de +#' Aduba\enc{çã}{ca}o de Milho #' @description Ensaio de adubação NPK de milho, fatorial de #' \eqn{3^{3}}, com confundimento de 2 graus de liberdade da #' interação tripla. A cada três blocos de 9 parcelas juntaram-se @@ -1424,8 +1414,7 @@ NULL #' #' } #' @keywords FAT3 FATADI -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 18.2.1, pág. 330) +#' @source PIMENTEL-GOMES (2009), Tabela 18.2.1, pág. 330. #' @examples #' #' library(lattice) @@ -1465,8 +1454,7 @@ NULL #' #' } #' @keywords FAT2 -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 20.2.1, pág. 369) +#' @source PIMENTEL-GOMES (2009), Tabela 20.2.1, pág. 369. #' @examples #' #' library(lattice) @@ -1501,8 +1489,7 @@ NULL #' #' } #' @keywords DIC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 21.5.1, pág. 384) +#' @source PIMENTEL-GOMES (2009), Tabela 21.5.1, pág. 384. #' @examples #' #' library(lattice) @@ -1540,8 +1527,7 @@ NULL #' #' } #' @keywords DBC -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. +#' @source PIMENTEL-GOMES (2009). #' @examples #' #' library(lattice) @@ -1556,7 +1542,8 @@ NULL NULL #' @name PimentelTb6.3.1 -#' @title Experimento de Aduba\enc{çã}{ca}o Mineral e Verde em Cana-de-a\enc{çú}{cu}car +#' @title Experimento de Aduba\enc{çã}{ca}o Mineral e Verde em +#' Cana-de-a\enc{çú}{cu}car #' @description Experimento de adubação de cana da Usina Monte Alegre, #' com fertilizantes minerais e adubos verdes. O delineamento #' utilizado foi um quadrado latino de 6 x 6. @@ -1589,8 +1576,7 @@ NULL #' realidade um experimento fatorial incompleto no qual não existem #' os níveis de de adução mineral para o nível sem crotalária. #' @keywords DQL -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 6.3.1, página 99) +#' @source PIMENTEL-GOMES (2009), Tabela 6.3.1, página 99. #' @examples #' #' data(PimentelTb6.3.1) @@ -1626,7 +1612,8 @@ NULL NULL #' @name PimentelTb7.2.1 -#' @title Experimento Fatorial Sobre Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Milho +#' @title Experimento Fatorial Sobre Aduba\enc{çã}{ca}o NPK na +#' Produ\enc{çã}{ca}o de Milho #' @description Resultados da produção de milho em um experimento #' com fatorial \eqn{2^{3}} dos fatores presentes na adubação #' minenal (NPK) em delineamento de blocos casualizados. @@ -1650,8 +1637,7 @@ NULL #' #' } #' @keywords FAT3 -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 7.2.1, página 115) +#' @source PIMENTEL-GOMES (2009), Tabela 7.2.1, página 115. #' @examples #' #' data(PimentelTb7.2.1) @@ -1671,8 +1657,8 @@ NULL NULL #' @name PimentelTb7.6.1 -#' @title Experimento Fatorial Com Confunfimento de Aduba\enc{çã}{ca}o em -#' Cana-de-a\enc{çú}{cu}car +#' @title Experimento Fatorial Com Confunfimento de Aduba\enc{çã}{ca}o +#' em Cana-de-a\enc{çú}{cu}car #' @description Experimento fatorial, de 3\eqn{^{3}}, de adubação de #' cana com NPK, feito por Strauss (1951), com confundimento (grupo #' W) de dois graus de liberdade da interação tripla N \eqn{\times} @@ -1706,8 +1692,7 @@ NULL #' tratamento 202 sendo que a última deveria ser 220. Foi feita a #' inclusão desses dados no pacote com essa correção. #' @keywords FAT3 confundimento -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 7.6.1, pág. 126) +#' @source PIMENTEL-GOMES (2009), Tabela 7.6.1, pág. 126. #' #' Straus, F. Esperimentos de adubação na zona canavieira de #' Pernambuco. In: Terceira Reunião Brasileira de Ciência do @@ -1733,7 +1718,8 @@ NULL NULL #' @name PimentelTb7.8.1 -#' @title Acidez de Variedades de Mangas em Fun\enc{çã}{ca}o da \enc{É}{E}poca +#' @title Acidez de Variedades de Mangas em Fun\enc{çã}{ca}o da +#' \enc{É}{E}poca #' @description Experimento fatorial, de 6 \eqn{\times} 3 \eqn{\times} #' 3, referente a acidez de 6 variedades de mangas, em 3 meses do #' ano e em 3 anos agrícolas sucessivos reproduzidos de um trabalho @@ -1840,7 +1826,8 @@ NULL NULL #' @name PimentelTb8.3.1 -#' @title Grupo de Ensaios de Batatinha na Prov\enc{í}{i}ncia de Buenos Aires +#' @title Grupo de Ensaios de Batatinha na Prov\enc{í}{i}ncia de Buenos +#' Aires #' @description Grupo de ensaios de competição de variedades de #' batatinha, realizados pelo engenheiro agrônomo Oscar A. Garay, da #' Estação Experimental de Balcarce, Argentina, instalados em @@ -1875,8 +1862,7 @@ NULL #' refere-se ao experimento número 3 com todas as observações. #' @keywords GE #' @seealso \code{\link{PimentelEg5.2}}. -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 8.3.1, pág. 147) +#' @source PIMENTEL-GOMES (2009), Tabela 8.3.1, pág. 147. #' @examples #' #' library(lattice) @@ -1922,8 +1908,7 @@ NULL #' #' } #' @keywords PSS -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 9.2.1, pág. 166) +#' @source PIMENTEL-GOMES (2009), Tabela 9.2.1, pág. 166. #' @examples #' #' library(lattice) @@ -1943,7 +1928,8 @@ NULL NULL #' @name PimentelTb9.3.1 -#' @title Experimento de Aduba\enc{çã}{ca}o de Variedades de Cana-de-a\enc{çú}{cu}car +#' @title Experimento de Aduba\enc{çã}{ca}o de Variedades de +#' Cana-de-a\enc{çú}{cu}car #' @description Experimento com 5 variedades de cana-de-açúcar, em #' delineamento quadrado latino de 5 x 5, sendo cada parcela #' dividida em duas subparcelas, uma sem adubo e outra com adubação @@ -2013,8 +1999,7 @@ NULL #' #' } #' @keywords PS -#' @source Pimentel-Gomes, F. (2009). Curso de Estatística Experimental -#' (15th ed.). Piracicaba, SP: FEALQ. (Tabela 9.4.1, pág. 175) +#' @source PIMENTEL-GOMES (2009), Tabela 9.4.1, pág. 175. #' @examples #' #' library(lattice) @@ -2031,4 +2016,3 @@ NULL #' columns = 2)) #' NULL - diff --git a/R/Ramalho.R b/R/Ramalho.R index d46db168..6e2366ed 100644 --- a/R/Ramalho.R +++ b/R/Ramalho.R @@ -1,7 +1,7 @@ #' @name RamalhoEg11.10 #' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Sorgo -#' @description Experimento da avaliação da produção de 40 cultivares de sorgo -#' conduzido no delineamento alfa-látice. +#' @description Experimento da avaliação da produção de 40 cultivares de +#' sorgo conduzido no delineamento alfa-látice. #' @format Um \code{data.frame} com 120 observações e 3 variáveis, em #' que #' @@ -19,9 +19,7 @@ #' #' } #' @keywords DBI -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (pág. 181) +#' @source RAMALHO et al. (2005), pág. 181. #' @examples #' #' library(lattice) @@ -59,7 +57,8 @@ NULL #' @name RamalhoEg11.13 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Diferentes Popula\enc{çõ}{co}es +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Diferentes +#' Popula\enc{çõ}{co}es #' @description Experimento envolvendo populações de milho no #' delinemanto em blocos aumentados com 4 populações comuns e 25 #' populações regulares. @@ -80,9 +79,7 @@ NULL #' #' } #' @keywords DBI -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exemplo 11.13, pág. 188) +#' @source RAMALHO et al. (2005), Exemplo 11.13, pág. 188. #' @examples #' #' library(lattice) @@ -117,9 +114,7 @@ NULL #' #' } #' @keywords DBI -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (pág. 171) +#' @source RAMALHO et al. (2005), pág. 171. #' @examples #' #' library(lattice) @@ -157,7 +152,8 @@ NULL NULL #' @name RamalhoEg12.10 -#' @title Ensaio Dialelo para o Tempo At\enc{é}{e} o Florescimento do Feijoeiro +#' @title Ensaio Dialelo para o Tempo At\enc{é}{e} o Florescimento do +#' Feijoeiro #' @description Dados referentes ao cruzamento dialelo realizado por #' Arriel et al. (1993), em que foi avaliado o número de dias para o #' florescimento do feijoeiro para cada progenie. @@ -174,9 +170,7 @@ NULL #' #' } #' @keywords Dialelo -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exemplo 12.10, pág. 227) +#' @source RAMALHO et al. (2005), Exemplo 12.10, pág. 227. #' #' Arriel, E., Ramalho, M. A. P., Pacheco, C. A. P. Expected and #' Realized Gains in the CMS-39 Maize Population after three Cycles @@ -202,7 +196,8 @@ NULL NULL #' @name RamalhoEg13.2 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Cons\enc{ó}{o}rcio com Feij\enc{ã}{a}o. +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em +#' Cons\enc{ó}{o}rcio com Feij\enc{ã}{a}o. #' @description Dados referente ao experimento conduzido por Rezende et #' al. (1994), envolvendo 4 cultivares de milho consorciadas com 3 #' de feijão. @@ -225,9 +220,7 @@ NULL #' #' } #' @keywords COV FAT2 DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exemplo 13.2, pág. 237) +#' @source RAMALHO et al. (2005), Exemplo 13.2, pág. 237. #' #' Rezende, G. D. S. P.; Ramalho, M. A. P. Competitive Ability of #' Maize and Commom Bean (Phaseolus Vulgaris L.) Cultivars @@ -256,7 +249,8 @@ NULL NULL #' @name RamalhoEg4.3 -#' @title Porcentagem de absor\enc{çã}{ca}o de \enc{á}{a}gua de feij\enc{ã}{a}o +#' @title Porcentagem de absor\enc{çã}{ca}o de \enc{á}{a}gua de +#' feij\enc{ã}{a}o #' @description Experimento conduzido na Universidade Federal de Lavras, #' avaliando a porcentagem de absorção de água de 10 linhares de #' feijão. O delineamento é inteiramente ao acaso com 3 repetições. @@ -275,9 +269,7 @@ NULL #' #' } #' @keywords DIC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (Exemplo 4.3, pág 56) +#' @source RAMALHO et al. (2005), Exemplo 4.3, pág 56. #' @examples #' #' library(lattice) @@ -307,9 +299,7 @@ NULL #' #' } #' @keywords DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (pg 62) +#' @source RAMALHO et al. (2005), pág. 62. #' @examples #' #' library(lattice) @@ -323,7 +313,8 @@ NULL NULL #' @name RamalhoEg7.8 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Cruzamentos Feij\enc{ã}{a}o +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Cruzamentos +#' Feij\enc{ã}{a}o #' @description Experimento referente à produção de grãos de feijão #' obtida na avaliação de 24 famílias \eqn{F_{5}} do cruzamento #' Jalo x Small White, cujos dados foram obtidos por Souza (1991). @@ -346,9 +337,7 @@ NULL #' #' } #' @keywords DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (Exemplo 7.8, pág 110). +#' @source RAMALHO et al. (2005), Exemplo 7.8, pág. 110. #' @examples #' #' library(lattice) @@ -372,7 +361,8 @@ NULL NULL #' @name RamalhoEg8.1 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os em Cultivares de Feij\enc{ã}{a}o +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os em Cultivares de +#' Feij\enc{ã}{a}o #' @description Experimentos para medir a produção de grãos de #' cultivares de feijão, conduzidos em Lavras e Patos de Minas/MG #' durante o ano de 1990 em delineamento em blocos casualizados. @@ -394,9 +384,7 @@ NULL #' #' } #' @keywords DBC GE -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exemplo 8.1, pág. 115) +#' @source RAMALHO et al. (2005), Exemplo 8.1, pág. 115. #' @examples #' #' library(lattice) @@ -423,7 +411,8 @@ NULL NULL #' @name RamalhoEg8.8 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o de Popula\enc{çõ}{co}es Segregantes +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o de +#' Popula\enc{çõ}{co}es Segregantes #' @description Dados da produção de grãos de feijão obtidos por Corte #' et al. (2002) relativos à avaliação de 6 populações segregantes #' avaliadas nas gerações F\eqn{_{2}}, F\eqn{_{3}} e F\eqn{_{4}} com @@ -448,9 +437,7 @@ NULL #' #' } #' @keywords DBC GE -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Tabela 8.8, pág. 123) +#' @source RAMALHO et al. (2005), Tabela 8.8, pág. 123. #' #' Corte, H. R., Ramalho, M. A. P., Gonçalves, F. M. A., Abreu. A de #' F. B. Natural Selection for Grain Yield in Dry Bean Population @@ -486,9 +473,7 @@ NULL #' Gerais. #' @format Vetor com 100 observações altura das plantas em metros. #' @keywords AAS -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (pg 26) +#' @source RAMALHO et al. (2005), pág. 26. #' #' Castro, N. H. A., Andrade, H. B., Ramalho, m A. P. (1993). #' Revista Árvore. Viçosa, v. 17, n.2. @@ -507,7 +492,8 @@ NULL NULL #' @name RamalhoEx12.2 -#' @title Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o M\enc{ú}{u}ltipla +#' @title Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o +#' M\enc{ú}{u}ltipla #' @description Conjunto de dados apresentados para exercício. Objetivo #' do exercício é estimar a equação de regressão múltipla. #' @format Um \code{data.frame} com 8 observações e 4 variáveis, em que @@ -524,9 +510,7 @@ NULL #' #' } #' @keywords RM -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exercício 12.2, pág. 231) +#' @source RAMALHO et al. (2005), Exercício 12.2, pág. 231. #' @examples #' #' data(RamalhoEx12.2) @@ -562,9 +546,7 @@ NULL #' #' } #' @keywords COV -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exercício 13.1, pág. 255) +#' @source RAMALHO et al. (2005), Exercício 13.1, pág. 255. #' @examples #' #' data(RamalhoEx13.1) @@ -599,9 +581,7 @@ NULL #' #' } #' @keywords COV DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exercício 13.2, pág. 256) +#' @source RAMALHO et al. (2005), Exercício 13.2, pág. 256. #' @examples #' #' data(RamalhoEx13.2) @@ -630,7 +610,8 @@ NULL NULL #' @name RamalhoEx13.3 -#' @title Avalia\enc{çã}{ca}o do Stay Green em Fam\enc{í}{i}lias de Feijoeiro +#' @title Avalia\enc{çã}{ca}o do Stay Green em Fam\enc{í}{i}lias de +#' Feijoeiro #' @description Notas da avaliação do "stay green" obtidos de famílias #' de feijoeiro, avaliados nas gerações \eqn{F_{2:3}}, \eqn{F_{2:4}} #' e \eqn{F_{2:5}}. @@ -648,9 +629,7 @@ NULL #' #' } #' @keywords COV DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exercício 13.3, pág. 257) +#' @source RAMALHO et al. (2005), Exercício 13.3, pág. 257. #' @examples #' #' data(RamalhoEx13.3) @@ -675,7 +654,8 @@ NULL NULL #' @name RamalhoEx3.1 -#' @title N\enc{ú}{u}mero de plantas de milho ap\enc{ó}{o}s inocula\enc{çã}{ca}o +#' @title N\enc{ú}{u}mero de plantas de milho ap\enc{ó}{o}s +#' inocula\enc{çã}{ca}o #' @description Experimento referente ao número de plantas de milho, #' por parcela, após a inoculação com Diploidia. Experimento para #' avaliação de fungicidas para tratamento de sementes. @@ -692,9 +672,7 @@ NULL #' #' } #' @keywords contagem -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (pg 50) +#' @source RAMALHO et al. (2005), pág. 50. #' #' @examples #' @@ -729,9 +707,7 @@ NULL #' #' } #' @keywords DIC desbalanceado -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (Exercício 4.1, pág 66) +#' @source RAMALHO et al. (2005), Exercício 4.1, pág. 66. #' @examples #' #' library(lattice) @@ -762,9 +738,7 @@ NULL #' #' } #' @keywords DBC contagem -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (Execício 4.2, pág 66) +#' @source RAMALHO et al. (2005), Execício 4.2, pág. 66. #' @examples #' #' library(lattice) @@ -806,9 +780,7 @@ NULL #' #' } #' @keywords DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (pg 112). +#' @source RAMALHO et al. (2005), pág. 112. #' @examples #' #' library(lattice) @@ -832,7 +804,8 @@ NULL NULL #' @name RamalhoEx8.1 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Munic\enc{í}{i}pios de Minas Gerais +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em +#' Munic\enc{í}{i}pios de Minas Gerais #' @description Experimentos para avaliar a produção de grãos de #' cultivares de arroz, conduzidos em três locais do Estado de Minas #' Gerais (Lambari, Lavras e Felixlândia) em delineamento @@ -854,9 +827,7 @@ NULL #' #' } #' @keywords DIC GE -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exercício 8.1, pág. 132) +#' @source RAMALHO et al. (2005), Exercício 8.1, pág. 132. #' @examples #' #' data(RamalhoEx8.1) @@ -928,9 +899,7 @@ NULL #' #' } #' @keywords DBC GE -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Exercício 8.2, pág. 133) +#' @source RAMALHO et al. (2005), Exercício 8.2, pág. 133. #' @examples #' #' library(latticeExtra) @@ -970,10 +939,8 @@ NULL #' ha\eqn{^{-1}}).} #' #' } -#' @keywords ASS -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (pg 15) +#' @keywords AAS +#' @source RAMALHO et al. (2005), pág 15. #' #' @examples #' @@ -1015,9 +982,7 @@ NULL #' #' } #' @keywords DBI -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (pág. 165) +#' @source RAMALHO et al. (2005), pág. 165. #' @examples #' #' library(lattice) @@ -1079,9 +1044,7 @@ NULL #' #' } #' @keywords DBI -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Tabela 11.17, pág. 193) +#' @source RAMALHO et al. (2005), Tabela 11.17, pág. 193. #' @examples #' #' library(lattice) @@ -1100,7 +1063,8 @@ NULL NULL #' @name RamalhoTb12.8 -#' @title Componentes da Produ\enc{çã}{ca}o de Linhagens de Feij\enc{ã}{a}o +#' @title Componentes da Produ\enc{çã}{ca}o de Linhagens de +#' Feij\enc{ã}{a}o #' @description Dados obtidos por Perreira Filho et al. (1987), #' referentes ao número médio de vagens por planta, número de #' sementes por vagem, peso de 100 sementes e produção de grãos, @@ -1125,9 +1089,7 @@ NULL #' #' } #' @keywords RM -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Tabela 12.8, pág. 225) +#' @source RAMALHO et al. (2005), Tabela 12.8, pág. 225. #' #' Pereira Filho, I. A., Ramalho, M. A. P., Ferreira, S. Avaliação #' de Progênies de Feijão e Estimativas de Parâmetros Genéticos na @@ -1164,9 +1126,7 @@ NULL #' #' } #' @keywords COV -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Tabela 13.1, pág. 233) +#' @source RAMALHO et al. (2005), Tabela 13.1, pág. 233. #' @examples #' #' data(RamalhoTb13.1) @@ -1200,9 +1160,7 @@ NULL #' #' } #' @keywords COV RS -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Tabela 13.11, pág. 248) +#' @source RAMALHO et al. (2005), Tabela 13.11, pág. 248. #' @examples #' #' data(RamalhoTb13.11) @@ -1219,7 +1177,8 @@ NULL NULL #' @name RamalhoTb13.13 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Prog\enc{ê}{e}nies de Feij\enc{ã}{a}o +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Prog\enc{ê}{e}nies de +#' Feij\enc{ã}{a}o #' @description Experimento referente a avaliação de progênies #' provenientes do cruzamento (ESAL 501 x Rio Tibagi), obtidos em 3 #' gerações (F3, F4 e F5). Foi utilizado o delineamento de blocos @@ -1238,9 +1197,7 @@ NULL #' #' } #' @keywords COV DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Tabela 13.13, pág. 251) +#' @source RAMALHO et al. (2005), Tabela 13.13, pág. 251. #' @examples #' #' data(RamalhoTb13.13) @@ -1281,9 +1238,7 @@ NULL #' #' } #' @keywords COV RS -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Tabela 13.15, pág. 252) +#' @source RAMALHO et al. (2005), Tabela 13.15, pág. 252. #' @examples #' #' data(RamalhoTb13.15) @@ -1302,7 +1257,8 @@ NULL NULL #' @name RamalhoTb13.6 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o e Teor de \eqn{P_{2}O_{5}} +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o e Teor +#' de \eqn{P_{2}O_{5}} #' @description Experimento apresentado por Pereira (1993) referente a #' avaliação da produção de feijão e teor de \eqn{P_{2}O_{5}} em #' cada parcela, cujos dados foram obtidos de 10 cultivares de @@ -1325,9 +1281,8 @@ NULL #' #' } #' @keywords COV DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (Tabela 13.6, pág. 243 e tabela 13.9, pág. 246) +#' @source RAMALHO et al. (2005), Tabela 13.6, pág. 243 e tabela 13.9, +#' pág. 246. #' #' Pereira, A. F. Emprego de Covariância visando reduzir o efeito da #' heterogeneidade Ambiental nos Experimentos com a Cultura do @@ -1395,9 +1350,7 @@ NULL #' #' } #' @keywords DIC contagem -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (pg 43) +#' @source RAMALHO et al. (2005), pág. 43. #' #' @examples #' @@ -1464,9 +1417,7 @@ NULL #' #' } #' @keywords DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (pg 45) +#' @source RAMALHO et al. (2005), pág 45. #' #' @examples #' @@ -1497,9 +1448,7 @@ NULL #' #' } #' @keywords DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (pg 48) +#' @source RAMALHO et al. (2005), pág. 48. #' #' @examples #' @@ -1533,9 +1482,7 @@ NULL #' #' } #' @keywords DBC -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras, MG: UFLA. (Tabela 7.1, pág 102). +#' @source RAMALHO et al. (2005), Tabela 7.1, pág 102. #' @examples #' #' library(lattice) @@ -1554,7 +1501,8 @@ NULL NULL #' @name RamalhoTb8.12 -#' @title Produ\enc{çã}{ca}o M\enc{é}{e}dia de Gr\enc{ã}{a}os de Caf\enc{é}{e}-cereja +#' @title Produ\enc{çã}{ca}o M\enc{é}{e}dia de Gr\enc{ã}{a}os de +#' Caf\enc{é}{e}-cereja #' @description Experimento que estudou a produção média de grãos de #' café-cereja, obtidos por Mendes (1994), em função da progênie em #' 3 anos. Foi utilizado o delineamento de blocos casualizados. @@ -1578,9 +1526,7 @@ NULL #' #' } #' @keywords DBC GE -#' @source Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). -#' Experimentação em Genética e Melhoramento de Plantas (2th ed.). -#' Lavras: UFLA. (pág. 128) +#' @source RAMALHO et al. (2005), pág. 128. #' #' Mendes, A. N. G. Avaliação de Metodologias Empregadas na Seleção #' de Progênies do Cafeeiro (Coffea arabica L.) no estado de Minas @@ -1610,4 +1556,3 @@ NULL #' FUN = function(x) { c(mean = mean(x), var = var(x)) }) #' NULL - diff --git a/R/Storck.R b/R/Storck.R index 98d7b456..59ef5d36 100644 --- a/R/Storck.R +++ b/R/Storck.R @@ -25,9 +25,7 @@ #' #' } #' @keywords DQL -#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, -#' V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: -#' UFSM. (Tabela 2.3.5, pág 63) +#' @source STORCK et al. (2011), Tabela 2.3.5, pág. 63. #' @examples #' #' library(lattice) @@ -41,7 +39,8 @@ NULL #' @name StorckTb101 -#' @title Grupo de Experimentos de Competi\enc{çã}{ca}o de Cultivares de Milho +#' @title Grupo de Experimentos de Competi\enc{çã}{ca}o de Cultivares de +#' Milho #' @description Grupo de experimentos, avaliando 6 cultivres de milho, #' conduzidos em 4 locais (4 ambientes) da região central d Rio #' Grande do Sul, no delineamento de blocos ao acaso com 4 @@ -63,9 +62,7 @@ NULL #' #' } #' @keywords GE DBC -#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, -#' V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: -#' UFSM. (Tabela 101, pág. 182) +#' @source STORCK et al. (2011), Tabela 101, pág. 182. #' @examples #' #' library(lattice) @@ -98,9 +95,7 @@ NULL #' #' } #' @keywords DIC -#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, -#' V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: -#' UFMS. (Tabela 2, pág. 21) +#' @source STORCK et al. (2011), Tabela 2, pág. 21. #' @examples #' #' library(lattice) @@ -134,9 +129,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, -#' V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: -#' UFSM. (Tabela 56, pg 134) +#' @source STORCK et al. (2011), Tabela 56, pg 134. #' @examples #' #' library(lattice) @@ -174,9 +167,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, -#' V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: -#' UFSM. (Tabela 60, pág. 138) +#' @source STORCK et al. (2011), Tabela 60, pág. 138. #' @examples #' #' library(lattice) @@ -194,7 +185,8 @@ NULL NULL #' @name StorckTb67 -#' @title Efeito da Dose de NPK na Produ\enc{çã}{ca}o de Cultivares de Milho +#' @title Efeito da Dose de NPK na Produ\enc{çã}{ca}o de Cultivares de +#' Milho #' @description Resultados ficitícios (kg/parcela) de um experimento #' bifatorial 3 \eqn{\times} 5 no delineamento de blocos ao acaso #' com 4 repetições. @@ -215,9 +207,7 @@ NULL #' #' } #' @keywords DBC FAT2 -#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, -#' V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: -#' UFSM. (Tabela 67, pág. 144) +#' @source STORCK et al. (2011), Tabela 67, pág. 144. #' @examples #' #' library(lattice) @@ -236,7 +226,8 @@ NULL #' @name StorckTb74 #' @aliases StorckTb88 -#' @title \enc{É}{E}poca e Densidade de Semeadura na Produ\enc{çã}{ca}o de Milho +#' @title \enc{É}{E}poca e Densidade de Semeadura na Produ\enc{çã}{ca}o +#' de Milho #' @description Resultados ficitícios de um experimento fatorial 3 #' \eqn{\times} 5 no delineamento de blocos ao acaso, com arranjo #' dos fatores em parcela subdividida, que estudou o efeito da época @@ -270,9 +261,8 @@ NULL #' portanto uma verdadeira restrição de casualização (como acontece #' com camadas do solo ou tempo) mas sim uma dificuldade logística. #' @keywords DIC FAT2 PS -#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, -#' V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: -#' UFSM. (Tabela 74, pág. 150 e Tabela 88, pág. 168) +#' @source STORCK et al. (2011), Tabela 74, pág. 150 e Tabela 88, +#' pág. 168. #' @examples #' #' library(lattice) @@ -310,9 +300,7 @@ NULL #' #' } #' @keywords DIC -#' @source Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, -#' V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: -#' UFSM. (Tabela 8, pág. 33) +#' @source STORCK et al. (2011), Tabela 8, pág. 33. #' @examples #' #' library(lattice) @@ -324,4 +312,3 @@ NULL #' xlab = "Tratamentos", ylab = "Resposta") #' NULL - diff --git a/R/Vieira.R b/R/Vieira.R index 6458fb82..59da02e5 100644 --- a/R/Vieira.R +++ b/R/Vieira.R @@ -1,6 +1,6 @@ #' @name VieiraEx7.3 -#' @title Experimento de um Fator em DIC com N\enc{ú}{u}mero Diferente de -#' Repeti\enc{çõ}{co}es +#' @title Experimento de um Fator em DIC com N\enc{ú}{u}mero Diferente +#' de Repeti\enc{çõ}{co}es #' @description Dados de um experimento inteiramente ao acaso com número #' diferente de repetições. #' @format Um \code{data.frame} com 18 observações e 2 variáveis, em que @@ -15,8 +15,7 @@ #' #' } #' @keywords DIC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). -#' São Paulo, SP: Atlas. (Exercício 7.3, pág. 85). +#' @source VIEIRA (1999), Exercício 7.3, pág. 85. #' @examples #' #' data(VieiraEx7.3) @@ -32,7 +31,8 @@ NULL #' @name VieiraEx7.5 -#' @title Experimento Com Um Fator e Repeti\enc{çã}{ca}o Dentro dos Blocos +#' @title Experimento Com Um Fator e Repeti\enc{çã}{ca}o Dentro dos +#' Blocos #' @description Dados de um experimento em delineamento de blocos #' casualizados com repetição de tratamentos dentro dos blocos. #' @format Um \code{data.frame} com 12 observações e 3 variáveis, em que @@ -49,8 +49,7 @@ NULL #' #' } #' @keywords DBC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São -#' Paulo, SP: Atlas. (Exercício 7.5, pág. 85). +#' @source VIEIRA (1999), Exercício 7.5, pág. 85. #' @examples #' #' library(lattice) @@ -67,7 +66,8 @@ NULL NULL #' @name VieiraEx8.3 -#' @title Experimento Em Blocos Casualizados Com Repeti\enc{çõ}{co}es Nos Blocos +#' @title Experimento Em Blocos Casualizados Com Repeti\enc{çõ}{co}es +#' Nos Blocos #' @description Dados de um experimento em delineamento em blocos #' casualizados com repetições dos tratamentos dentro dos blocos. #' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que @@ -85,8 +85,7 @@ NULL #' #' } #' @keywords DBC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). -#' São Paulo, SP: Atlas. (Exercício 8.3, pág. 102). +#' @source VIEIRA (1999), Exercício 8.3, pág. 102. #' @examples #' #' library(lattice) @@ -117,8 +116,7 @@ NULL #' #' } #' @keywords DIC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São -#' Paulo, SP: Atlas. (pág. 50, exercício 2). +#' @source VIEIRA (1999), pág. 50, exercício 2. #' @examples #' #' data(VieiraPg50.1) @@ -152,8 +150,7 @@ NULL #' #' } #' @keywords DIC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São -#' Paulo, SP: Atlas. (pág. 50, Exercício 4). +#' @source VIEIRA (1999), pág. 50, Exercício 4. #' @examples #' #' data(VieiraPg50.2) @@ -186,8 +183,7 @@ NULL #' #' } #' @keywords DBC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São -#' Paulo, SP: Atlas. (pág. 57, exercício 3). +#' @source VIEIRA (1999), pág. 57, exercício 3 . #' @examples #' #' data(VieiraPg57.1) @@ -219,8 +215,7 @@ NULL #' #' } #' @keywords DBC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São -#' Paulo, SP: Atlas. (pág. 57, exercício 4). +#' @source VIEIRA (1999), pág. 57, exercício 4 . #' @examples #' #' data(VieiraPg57.2) @@ -252,8 +247,7 @@ NULL #' #' } #' @keywords DIC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São -#' Paulo, SP: Atlas. (pág 44, tabela 4.1). +#' @source VIEIRA (1999), pág 44, tabela 4.1. #' @examples #' #' data(VieiraTb4.1) @@ -285,8 +279,7 @@ NULL #' #' } #' @keywords DBC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). São -#' Paulo, SP: Atlas. (pág. 53, tabela 5.3). +#' @source VIEIRA (1999), pág. 53, tabela 5.3 . #' @examples #' #' data(VieiraTb5.3) @@ -303,7 +296,8 @@ NULL NULL #' @name VieiraTb7.2 -#' @title N\enc{ú}{u}meros de Ovos de Poedeiras em Fun\enc{çã}{ca}o do Estilo Musical +#' @title N\enc{ú}{u}meros de Ovos de Poedeiras em Fun\enc{çã}{ca}o do +#' Estilo Musical #' @description Dados que refere-se ao número de ovos por poedeira 35 #' dias após o início do experimento em função do estilo musical do #' som ambiente: música sertaneja (a), música clássica (b) e música @@ -320,8 +314,7 @@ NULL #' #' } #' @keywords DIC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). -#' São Paulo, SP: Atlas. (Tabela 7.2, pág. 74). +#' @source VIEIRA (1999), Tabela 7.2, pág. 74 . #' @examples #' #' data(VieiraTb7.2) @@ -336,7 +329,8 @@ NULL NULL #' @name VieiraTb7.7 -#' @title Teste Sobre Conhecimento em Fun\enc{çã}{ca}o da Fonte de Informa\enc{çã}{ca}o +#' @title Teste Sobre Conhecimento em Fun\enc{çã}{ca}o da Fonte de +#' Informa\enc{çã}{ca}o #' @description Dados referentes às notas dos alunos em um teste de #' conhecimento segundo a fonte de informação (tratamento). #' @format Um \code{data.frame} com 24 observações e 3 variáveis, em que @@ -354,8 +348,7 @@ NULL #' #' } #' @keywords DBC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). -#' São Paulo, SP: Atlas. (Tabela 7.7, pág. 81; Tabela 8.2, pág. 94). +#' @source VIEIRA (1999), Tabela 7.7, pág. 81; Tabela 8.2, pág. 94 . #' @examples #' #' library(lattice) @@ -371,7 +364,8 @@ NULL NULL #' @name VieiraTb8.5 -#' @title N\enc{ú}{u}mero de Itens Produzidos Em Fun\enc{çã}{ca}o do Tipo de M\enc{á}{a}quina +#' @title N\enc{ú}{u}mero de Itens Produzidos Em Fun\enc{çã}{ca}o do +#' Tipo de M\enc{á}{a}quina #' @description Os dados advém de um experimento no qual foram #' comparados cinco tipos de máquinas, operadas por três diferentes #' operadores (blocos). O objetivo era verificar a suspeita de que @@ -397,8 +391,7 @@ NULL #' #' } #' @keywords DBC -#' @source Vieira, S. (1999). Estatística experimental (2th ed.). -#' São Paulo, SP: Atlas. (Tabela 8.5, pág. 98). +#' @source VIEIRA (1999), Tabela 8.5, pág. 98 . #' @examples #' #' library(lattice) @@ -414,4 +407,3 @@ NULL #' xlab = "Tipo de máquina") #' NULL - -- GitLab From 75b0efd57483fe32fa626f85385a10ff05c124ad Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Mon, 22 Aug 2016 00:05:18 -0300 Subject: [PATCH 02/10] =?UTF-8?q?Adiciona=20documenta=C3=A7=C3=A3o=20da=20?= =?UTF-8?q?tabela=20de=20keywords.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/keywords.R | 34 ++++++++++++++++++++++++++++++++++ data/keywords.rda | Bin 0 -> 2784 bytes 2 files changed, 34 insertions(+) create mode 100644 R/keywords.R create mode 100644 data/keywords.rda diff --git a/R/keywords.R b/R/keywords.R new file mode 100644 index 00000000..fdd702bc --- /dev/null +++ b/R/keywords.R @@ -0,0 +1,34 @@ +#' @name keywords +#' @title Keywords para Classificar os Conjuntos de Dados +#' @description As keywords servem para classificar os conjuntos de +#' dados por características que definem, geralmente, o tipo de +#' análise a ser aplicada aos dados. Isso orienta os estudantes e +#' professores a escolherem os conjuntos de dados para listas de +#' exercício, por exemplo. +#' @format Um \code{data.frame} com 596 observações e 2 variáveis, em +#' que +#' +#' \describe{ +#' +#' \item{\code{name}}{Nome do conjunto de dados no pacote labestData.} +#' +#' \item{\code{keyword}}{Keyword atribuída ao conjunto de dados.} +#' +#' } +#' @examples +#' +#' data(keywords) +#' str(keywords) +#' +#' library(lattice) +#' +#' tb <- table(keywords$keyword) +#' +#' barchart(sort(tb), +#' ylab = "Keyword", +#' xlab = "Frequência absoluta") +#' +#' subset(keywords, keyword == c("DBI")) +#' subset(keywords, keyword %in% c("proporção", "contagem")) +#' +NULL diff --git a/data/keywords.rda b/data/keywords.rda new file mode 100644 index 0000000000000000000000000000000000000000..aad0d2e90dd696b5e7aa19a85b8e26f7935b28b0 GIT binary patch literal 2784 zcmZ>Y%CIzaj8qGb%z1Yxm_hXB|11At;N9N~_V53HaA4qA!ok46{D4<qL2mo@72)gq z4lo}0#qYp#)<18%+~f1nH;h7gO*~tKeWlc9&30S9(BIcT@Tu*}CCR~G{Wa=*0~i<> znB5#sWSE>_^;C9XT)>dQz{|kazyJb_lYJ&vH5wW)%n)W^VDMoOY<9?CU|?YKRhlqs z7FSw8Rl|iZ4h+1!AhjUe<?FU=rdGA9`2sal<;$8|O+L*Fe9Gg#;=*MI#swL?3=Ae2 z9Ft~=oSMI?ex;3Pm)TWY1vbZ5nalbE7uY&5FkE0@U^r0_n^!aU<N{rd%p2LVNi5qh zg*aI1ty1e1Tditc;nc>l=U&S>sZTA}QskB}y;jlMxhK~%uyTP*J)g^>Rqra)&S^y` z#pSS+DSCYjI^n!DRN(NjgmRe%2IIyv9w8iTzA@hv&f2O>c{=$%ldO53lTEvUvbDzQ z`gNPmeS9wO@^sxkjZ0h{UsemX8P1%0>1n#RcJqY(ChuF!^Okq&)#NgS2rQ3%Cv|XE z(&^MGc8iS!&&%W=-tz9n+qo=uKcn6UyDY4qoprNS_K>*WWz)k&SGO}ii1`{O8+OFk zYTus_)6?Gqs~z7RmwVJwQ}BkJcb{BuO|ilY^Hm`dUQ*#X8_g`EIn%hG&fF$ax?8`y zeM;anwzNR+nUmQU-nx8>Q>4VZx_q79%lVsnlfH_WDosAKQSlmA!Vdm~2bTGo3W*cu z^eJ&KH+gvV$%ofXuOA$_@#JUI`4)qp(@#$MwykE4WrbDYp3MjM>G7L<40f#!3ZI?J zb>vZ$^yPVbqEDEAb@yJKBCZ*rY4SRR@5=5w6OPV*`M%=+{#Zfbt}Qk5-MZvLl6Oz5 zoA*^f&{;hD&f9-st4ba+t7tN`zc4+v;FyG~t4v|*0}rMg2395cuaD9hVst_$Cj9WK zWoUdpp~s;s`oZtDzjhzY+SIqMBY*CmOY0xkbUmEZF2=QDUFf{bI~R^z6wnAbWXF}O z_VDgImss|g9kUlomWyfm@I}mMzP~ff|JvIVOAo3n5Gh>fbMUByk0#63(zdYTJBl8M zmdw3YRJlBNiZRQFTiaK!6h9~@?WrjB^3#g68QY)#h)H#G3(ah^)nR(KSzUE)8k4L^ z6i1MZR~)b8_NAs}@ADL{Xa+a_m}(^=XyVEtq^0QMa#pF^YMy-U7a5Cn&$}x4WWuWt z_Z({Yet?x#=H;D-*3*g}^-3u{Uq5sDiKDJTlf9PCz3TYmg2kh}Pss)u&+-}PFuj>H zbHf%U9kD_su9OEJFT2mZJea|}-6~S?(wrW-i7$3IcW|wdaCT+tnX#8m_|%M-*O*?e z$k6BU$v;2q^@d41AFU5yoFL>N;-tmVepYOfkw)327hPOml(bZunkBe@IEHg{EM2sq zr-|ctyW2#8+|;`XLc7+t?$V#la+vjWuG4obH=h$O=eb1OWQxNMUD|B2S4&(e@(6cI zBa4@wj7_%;izD0BOHJQ=Is{nM4t!d3_^yE`Yq(y*Stp;#8#pdZf2hl(Vz<R&o7$B< zC$49*&boGYhwFtMR~OB3Rrs0u)zA4Nzta-8m;Al`()oHkd$z3<Z+z9VymljtYxISQ zIxWj@3Yoho3omk8xViDzf{(%*8jd`eyim#0PwusWi*)ctr?}4TtF#_+XRH*_(TFhH z=Gx$Nu#vN2!t%S;W@_eI6B@;GB5t4FeRumd0cEzsw@-8IOr5bhIYC=U>#K;y>29$} zV$7G%bX6JhInSJu=-pYQazZh~ndy3F4$}iA9|h;lJC1LP@m|fXAhxQ|$6=4p5wS%s zo8R8(F_3kWWWBXv$LSe`!UE5F!&)>#`P#ofV@Q`!5#UU56cy}}?P<Eka``;-?eF%- z1is6BXP9#_Az|939uEClMJ<=lY+-T^&I`EC2G`7<Wu2vaC}!oHcY2dHC-S-76*x4- zbCTf}qZ3oabY`qq)<`*Al4!Qj?d}2XrPDH(Ia#otZ1&8abSj<6Po1IAVA7;HLX&hR zo$^+hta358K-{Ly!|U**wH$KtT9ZZBth}A`>9K0a5tj6JTlciZ4Cg*iV_FgD%B9Am zyZ6Z|lhX#p+|yp=&D=Rjl$GhFQ-6i^^+^TByIK=;tZr%D3V3yD!<#2YGaRxE+mrl$ z&UkdVtsv%(MN#5mqlbCZ@>{=8(`j^l`}4x#eC;!;QW-l+Tvlv$j`q|%w>OnzDUa2= z-P4)guGQQ+vwC`i$#Us~$L2`#J-0PnY-KFrE_~p@qX02&Yc5%<G|xr3vXQ$rbM`h) zdiSzpj<n{nBWHv(5Bdl<&25~0`(XMM9_yaDk*j*VPcOcnczDXDB{$pJ(!<_!9&CFz zE7wBpX;`m!vy0}5*Sks|m6yzmyx(WZ9GLCWeR)U8>$^KXid>VPId`YSIql_!n#ZMX zSRT-m^h!8uRCbu>(Y<>rT0XZ=EcTi7ATFIvCUNJCw8ZR#w@)`ODoQclnbD+FwD^p7 z7ca-GrAlf(4w`#^_uUss`}E^;M1haV-}VJIcZ)ZkoGLE%@QhNq-BZQ4+)m44*Xr3C zZf0(O@u0O$kYkf!*URTqUdyt}U7S_%dFK2TvnM=Ru(OI$;B-N`>#uV`9{B<-jn%79 z+&PthZtBAgwJ)lsCH{@ba&7zhy`^OLmSaZSHS@v_h6iRZJ#wjU5sODb-1Z$jstMZ- zcO7P9%ix^YW@_%B$K%DSDl~a!SyqfsnR&O1yWly+I`jU^W%H6B+8CHAN30c=J0X2F zI;1#F@8yGI%XqI%-ue5>5A~@}#1ANPcn8P$?kneyH%>cZ$XvQ;hFj~>EEbOEJdZig zGv_vTv<E0n%*xuZqxYz%xLK~w_l1lqF59gyJk7i*>lS3m$fnY%C6MT$T%-Dc?P;as z<?ht0mKD!$iUc%B_p>a`UUkV)Wy(kWo-><|_lkV>-5{2?r8TL$YspG4o+gcnZ6Dw6 zc^7o~oasH+<!p0~oGH}HUUU1>3_jmyvCmtsyvQrL+`i<rL%^}4Sx$To(;TjH@*4X& zPt#4Fd_1p%X^vD`x#!u47LG|OPJ%5=#aV7F{;yXrpS=9?N8YNtiH*!cD<p+fB1Kh# z&hoBXuwe@8x}{SN3BBGw&+5tHI6ZZlFClUd9XInUaf(mpmyPjQcuJ|P+9dQbd)RMB zxt}cW?th+{clK|`91YI3>yId{``_9de#ZRGmrq9%>kAZ|>k2wQYZqO<!PnXLu0cTA z*F>3(Ez-a>@5zdO{YF=90Y{F!E|Z(*PhJ+#tYgr<y_C`Ej?&%2`ML^yz2Y50JNl-( zz1NpZ7m!`!;V5CyDRD@Xk%dv9_seb-=k+0it?Uu*S{tjZ1eYo025j5<jq%^QhZjVO zv%fn!aWn9>b8R{GLPO@ERBXrd7c*TyR#~MPx;HqODn_|nGuu{ts#(-9N84LORv=(4 zSC^qw!$PNv%ymZs4joO|b~r~O^ca^2-?G}<dHbe6VJVoJ8|cAVdx3SzqTE-n-ra6n z6J6fP^HJewkH<--L#m=|%uGhEegD?Q$4Dlpalf7szgOb@6|uvzFZ@33h_u={M}6*x z@8&H<9G||uUO#)k;Pj=|T$|QzEa>anD|<Stw~$F>LO_GN)Te~)=VHTFZcgo9^j2X4 z*QvK_qR;)V=h5YTrReeM#mmTk2KOAdRPL)1JEQZJ4tu!Vyx-ls>lhPTqVQS)VcF=L yY34@P=jZpW*gmCziF4l5tW1u%^`Z6`|L=LT_2QoYdbL`?|HX@3EdnNhTC@P5r|=*E literal 0 HcmV?d00001 -- GitLab From 3e435f207cdc99313120ed805ab41e2e44c5faec Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Mon, 22 Aug 2016 00:25:02 -0300 Subject: [PATCH 03/10] Atualiza todos os Rd. --- man/BanzattoQd1.2.3.Rd | 9 +++++---- man/BanzattoQd3.2.1.Rd | 6 ++---- man/BanzattoQd3.4.1.Rd | 6 ++---- man/BanzattoQd3.6.1.Rd | 9 ++++----- man/BanzattoQd3.7.1.Rd | 9 ++++----- man/BanzattoQd4.5.2.Rd | 8 +++----- man/BanzattoQd4.7.1.Rd | 9 ++++----- man/BanzattoQd5.2.1.Rd | 7 +++---- man/BanzattoQd5.2.4.Rd | 4 +--- man/BanzattoQd5.3.1.Rd | 10 +++++----- man/BanzattoQd5.3.7.Rd | 10 +++++----- man/BanzattoQd5.5.1.Rd | 7 +++---- man/BanzattoQd6.2.2.Rd | 9 ++++----- man/BanzattoQd6.2.5.Rd | 6 ++---- man/BanzattoQd6.3.4.Rd | 12 ++++++------ man/BanzattoQd6.4.2.Rd | 12 ++++++------ man/BanzattoQd7.2.1.Rd | 7 +++---- man/BanzattoQd7.3.1.Rd | 12 ++++++------ man/BanzattoQd7.3.3.Rd | 6 ++---- man/BanzattoQd8.2.1.Rd | 8 +++----- man/BanzattoQd8.3.1.Rd | 10 ++++------ man/BanzattoQd8.4.1.Rd | 9 ++++----- man/BanzattoQd8.4.3.Rd | 9 ++++----- man/BanzattoQd9.2.1.Rd | 6 ++---- man/BarbinEx1.Rd | 4 +--- man/BarbinEx13.Rd | 9 ++++----- man/BarbinEx14.Rd | 6 ++---- man/BarbinEx16.Rd | 6 ++---- man/BarbinEx17.Rd | 7 +++---- man/BarbinEx18.Rd | 7 +++---- man/BarbinEx3.Rd | 12 ++++++------ man/BarbinEx8.Rd | 6 ++---- man/BarbinEx9.Rd | 9 ++++----- man/BarbinPg104.Rd | 4 +--- man/BarbinPg114.Rd | 10 +++++----- man/BarbinPg125.Rd | 9 ++++----- man/BarbinPg137.Rd | 9 ++++----- man/BarbinPg156.Rd | 7 +++---- man/BarbinPg167.Rd | 7 +++---- man/BarbinPg177.Rd | 7 +++---- man/BarbinPg25.Rd | 6 ++---- man/BarbinPg72.Rd | 6 ++---- man/CostaEx5.7.2.Rd | 9 ++++----- man/CostaEx5.7.3.Rd | 4 +--- man/CostaTb4.Rd | 4 +--- man/CostaTb6.Rd | 4 +--- man/CostaTb7.Rd | 4 +--- man/CostaTb8.Rd | 7 +++---- man/DiasEg10.1.Rd | 7 +++---- man/DiasEg10.2.Rd | 3 +-- man/DiasEg11.1.Rd | 3 +-- man/DiasEg3.2.Rd | 3 +-- man/DiasEg3.6.Rd | 3 +-- man/DiasEg5.1.Rd | 7 +++---- man/DiasEg5.3.Rd | 3 +-- man/DiasEg6.1.Rd | 6 +++--- man/DiasEg6.2.Rd | 6 +++--- man/DiasEg6.3.Rd | 3 +-- man/DiasEg7.1.Rd | 7 +++---- man/DiasEg9.1.Rd | 3 +-- man/DiasEg9.2.Rd | 3 +-- man/DiasEg9.4.Rd | 3 +-- man/DiasEx10.4.10.Rd | 3 +-- man/DiasEx10.4.6.Rd | 4 +--- man/DiasEx10.4.7.Rd | 3 +-- man/DiasEx10.4.8.Rd | 6 +++--- man/DiasEx11.7.8.Rd | 3 +-- man/DiasEx11.7.9.Rd | 3 +-- man/DiasEx3.6.7.Rd | 6 +++--- man/DiasEx6.5.1.Rd | 3 +-- man/DiasEx6.5.10.Rd | 5 ++--- man/DiasEx6.5.9.Rd | 3 +-- man/DiasEx9.6.10.Rd | 3 +-- man/DiasEx9.6.4.Rd | 3 +-- man/DiasEx9.6.6.Rd | 6 +++--- man/DiasEx9.6.7.Rd | 3 +-- man/FariaEg2.9.5.Rd | 8 ++++---- man/FariaEg3.2.4.Rd | 3 +-- man/FariaQd11.4.Rd | 9 ++++----- man/FariaQd11.9.Rd | 6 +++--- man/FariaQd12.5.Rd | 3 +-- man/FariaQd14.2.Rd | 3 +-- man/FariaQd14.3.Rd | 7 +++---- man/FariaQd6.1.Rd | 3 +-- man/FerreiraEg7.1.Rd | 2 +- man/FerreiraEg7.4.Rd | 2 +- man/FerreiraEx7.4.1.Rd | 2 +- man/FerreiraEx9.7.2.Rd | 2 +- man/ManlyTb1.2.Rd | 22 +++++++++++----------- man/ManlyTb1.3.Rd | 16 ++++++++-------- man/ManlyTb1.4.Rd | 8 ++++---- man/ManlyTb1.5.Rd | 22 +++++++++++----------- man/ManlyTb10.2.Rd | 24 ++++++++++++------------ man/ManlyTb10.4.Rd | 26 +++++++++++++------------- man/ManlyTb11.3.Rd | 8 ++++---- man/ManlyTb11.5.Rd | 8 ++++---- man/ManlyTb4.5.Rd | 14 +++++++------- man/ManlyTb6.6.Rd | 10 +++++----- man/ManlyTb6.7.Rd | 19 +++++++++---------- man/ManlyTb9.7.Rd | 18 +++++++++--------- man/ManlyTb9.8.Rd | 22 +++++++++++----------- man/MingotiAnA3.Rd | 2 +- man/MingotiAnA4.Rd | 2 +- man/MingotiAnA6.Rd | 2 +- man/MingotiTb3.10.Rd | 2 +- man/MingotiTb3.7.Rd | 2 +- man/MingotiTb6.1.Rd | 2 +- man/MingotiTb6.8.Rd | 2 +- man/PaulaEg1.12.2.Rd | 18 +++++++++--------- man/PaulaEg1.12.5.Rd | 4 ++-- man/PaulaEg1.12.6.Rd | 6 +++--- man/PaulaEg2.4.3.Rd | 2 +- man/PaulaEg2.8.1.Rd | 6 +++--- man/PaulaEg3.5.1.Rd | 18 +++++++++--------- man/PaulaEg3.5.2.Rd | 20 ++++++++++---------- man/PaulaEg3.6.11a.Rd | 20 ++++++++++---------- man/PaulaEg3.6.11b.Rd | 20 ++++++++++---------- man/PaulaEg3.6.9c.Rd | 20 ++++++++++---------- man/PaulaEg5.2.8a.Rd | 16 ++++++++-------- man/PaulaEg5.5.1.Rd | 10 +++++----- man/PaulaEg5.5.2.Rd | 4 ++-- man/PaulaEg5.5.3.Rd | 14 +++++++------- man/PaulaEx1.13.20.Rd | 2 +- man/PaulaEx2.10.7.Rd | 4 ++-- man/PaulaEx3.7.14.Rd | 12 ++++++------ man/PaulaEx3.7.15.Rd | 14 +++++++------- man/PaulaEx3.7.16.Rd | 8 ++++---- man/PaulaEx3.7.19.Rd | 12 ++++++------ man/PaulaEx3.7.20.Rd | 30 +++++++++++++++--------------- man/PaulaEx3.7.7a.Rd | 6 +++--- man/PaulaEx3.7.7b.Rd | 8 ++++---- man/PaulaEx3.7.7c.Rd | 6 +++--- man/PaulaEx3.7.8.Rd | 4 ++-- man/PaulaEx4.6.15.Rd | 6 +++--- man/PaulaEx4.6.17.Rd | 2 +- man/PaulaEx4.6.20.Rd | 2 +- man/PaulaEx4.6.7.Rd | 4 ++-- man/PaulaEx5.6.13.Rd | 12 ++++++------ man/PaulaEx5.6.14.Rd | 10 +++++----- man/PaulaEx5.6.15.Rd | 18 +++++++++--------- man/PaulaTb1.9.Rd | 2 +- man/PaulaTb3.12.Rd | 20 ++++++++++---------- man/PaulaTb3.20.Rd | 10 +++++----- man/PaulaTb3.21.Rd | 4 ++-- man/PaulaTb4.2.Rd | 2 +- man/PaulaTb4.9.Rd | 2 +- man/PimentelEg4.2.Rd | 5 ++--- man/PimentelEg6.2.Rd | 6 +++--- man/PimentelEg7.3.Rd | 6 +++--- man/PimentelEg7.4.Rd | 6 +++--- man/PimentelEx5.8.4.Rd | 8 ++++---- man/PimentelEx5.8.5.Rd | 5 ++--- man/PimentelEx6.6.3.Rd | 6 +++--- man/PimentelPg142.Rd | 6 +++--- man/PimentelPg267.Rd | 3 ++- man/PimentelPg269.Rd | 8 ++++---- man/PimentelPg382.Rd | 3 +-- man/PimentelPg72.Rd | 7 +++---- man/PimentelPg91.Rd | 5 ++--- man/PimentelTb10.3.1.Rd | 3 +-- man/PimentelTb10.4.1.Rd | 3 +-- man/PimentelTb10.6.1.Rd | 4 ++-- man/PimentelTb11.3.1.Rd | 3 ++- man/PimentelTb12.2.1.Rd | 3 ++- man/PimentelTb12.3.1.Rd | 3 +-- man/PimentelTb12.4.1.Rd | 6 +++--- man/PimentelTb13.5.1.Rd | 6 +++--- man/PimentelTb14.4.1.Rd | 8 ++++---- man/PimentelTb14.5.1.Rd | 3 +-- man/PimentelTb14.7.1.Rd | 3 +-- man/PimentelTb16.2.1.Rd | 3 +-- man/PimentelTb16.3.1.Rd | 6 +++--- man/PimentelTb17.3.1.Rd | 3 +-- man/PimentelTb17.4.1.Rd | 3 +-- man/PimentelTb18.2.1.Rd | 7 +++---- man/PimentelTb20.2.1.Rd | 3 +-- man/PimentelTb21.5.1.Rd | 3 +-- man/PimentelTb5.3.1.Rd | 3 +-- man/PimentelTb6.3.1.Rd | 6 +++--- man/PimentelTb7.2.1.Rd | 6 +++--- man/PimentelTb7.6.1.Rd | 7 +++---- man/PimentelTb7.8.1.Rd | 3 ++- man/PimentelTb8.3.1.Rd | 6 +++--- man/PimentelTb9.2.1.Rd | 3 +-- man/PimentelTb9.3.1.Rd | 3 ++- man/PimentelTb9.4.1.Rd | 3 +-- man/RamalhoEg11.10.Rd | 8 +++----- man/RamalhoEg11.13.Rd | 7 +++---- man/RamalhoEg11.4.Rd | 4 +--- man/RamalhoEg12.10.Rd | 7 +++---- man/RamalhoEg13.2.Rd | 7 +++---- man/RamalhoEg4.3.Rd | 7 +++---- man/RamalhoEg4.7.Rd | 4 +--- man/RamalhoEg7.8.Rd | 7 +++---- man/RamalhoEg8.1.Rd | 7 +++---- man/RamalhoEg8.8.Rd | 7 +++---- man/RamalhoEx1.7.Rd | 4 +--- man/RamalhoEx12.2.Rd | 7 +++---- man/RamalhoEx13.1.Rd | 4 +--- man/RamalhoEx13.2.Rd | 4 +--- man/RamalhoEx13.3.Rd | 7 +++---- man/RamalhoEx3.1.Rd | 7 +++---- man/RamalhoEx4.1.Rd | 4 +--- man/RamalhoEx4.2.Rd | 4 +--- man/RamalhoEx7.10.Rd | 4 +--- man/RamalhoEx8.1.Rd | 7 +++---- man/RamalhoEx8.2.Rd | 4 +--- man/RamalhoTb1.2.Rd | 6 ++---- man/RamalhoTb11.1.Rd | 4 +--- man/RamalhoTb11.17.Rd | 4 +--- man/RamalhoTb12.8.Rd | 7 +++---- man/RamalhoTb13.1.Rd | 4 +--- man/RamalhoTb13.11.Rd | 4 +--- man/RamalhoTb13.13.Rd | 7 +++---- man/RamalhoTb13.15.Rd | 4 +--- man/RamalhoTb13.6.Rd | 8 ++++---- man/RamalhoTb3.1.Rd | 4 +--- man/RamalhoTb3.4.Rd | 4 +--- man/RamalhoTb3.6.Rd | 4 +--- man/RamalhoTb7.1.Rd | 4 +--- man/RamalhoTb8.12.Rd | 7 +++---- man/StorckEg2.3.5.Rd | 4 +--- man/StorckTb101.Rd | 7 +++---- man/StorckTb2.Rd | 4 +--- man/StorckTb56.Rd | 4 +--- man/StorckTb60.Rd | 4 +--- man/StorckTb67.Rd | 7 +++---- man/StorckTb74.Rd | 8 ++++---- man/StorckTb8.Rd | 4 +--- man/VieiraEx7.3.Rd | 7 +++---- man/VieiraEx7.5.Rd | 6 +++--- man/VieiraEx8.3.Rd | 6 +++--- man/VieiraPg50.1.Rd | 3 +-- man/VieiraPg50.2.Rd | 3 +-- man/VieiraPg57.1.Rd | 3 +-- man/VieiraPg57.2.Rd | 3 +-- man/VieiraTb4.1.Rd | 3 +-- man/VieiraTb5.3.Rd | 3 +-- man/VieiraTb7.2.Rd | 6 +++--- man/VieiraTb7.7.Rd | 6 +++--- man/VieiraTb8.5.Rd | 6 +++--- man/keywords.Rd | 40 ++++++++++++++++++++++++++++++++++++++++ 242 files changed, 757 insertions(+), 895 deletions(-) create mode 100644 man/keywords.Rd diff --git a/man/BanzattoQd1.2.3.Rd b/man/BanzattoQd1.2.3.Rd index c18969b7..a4e09994 100644 --- a/man/BanzattoQd1.2.3.Rd +++ b/man/BanzattoQd1.2.3.Rd @@ -2,11 +2,11 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd1.2.3} \alias{BanzattoQd1.2.3} -\title{Di\enc{â}{a}metro \enc{à}{a} Altura do Peito de \emph{Eucalyptus saligna}} +\title{Di\enc{â}{a}metro \enc{à}{a} Altura do Peito de + \emph{Eucalyptus saligna}} \format{Um vetor numérico com 20 elementos.} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 1.2.3 pág. 3) +BANZATTO; KRONKA (2013), Quadro 1.2.3, pág. 3. } \description{ Valores de diâmetro à altura do peito (DAP, cm) de uma @@ -14,6 +14,7 @@ Valores de diâmetro à altura do peito (DAP, cm) de uma povoamento com 15 anos de idade. } \examples{ + data(BanzattoQd1.2.3) hist(BanzattoQd1.2.3, prob = TRUE, @@ -30,5 +31,5 @@ sd(BanzattoQd1.2.3) fivenum(BanzattoQd1.2.3) } -\keyword{amostra} +\keyword{AAS} diff --git a/man/BanzattoQd3.2.1.Rd b/man/BanzattoQd3.2.1.Rd index bed7c762..b9847b73 100644 --- a/man/BanzattoQd3.2.1.Rd +++ b/man/BanzattoQd3.2.1.Rd @@ -2,7 +2,7 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd3.2.1} \alias{BanzattoQd3.2.1} -\title{Controle de pulg\enc{ã}{a}o na cultura de pepino} +\title{Controle de Pulg\enc{ã}{a}o na Cultura de Pepino} \format{Um \code{data.frame} com 30 observações e 3 variáveis, em que \describe{ @@ -18,9 +18,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.2.1 pág. - 44) +BANZATTO; KRONKA (2013), Quadro 3.2.1, pág. 44. } \description{ Dados de um experimento visando controle de pulgão diff --git a/man/BanzattoQd3.4.1.Rd b/man/BanzattoQd3.4.1.Rd index e02b60f9..2b07d020 100644 --- a/man/BanzattoQd3.4.1.Rd +++ b/man/BanzattoQd3.4.1.Rd @@ -3,7 +3,7 @@ \name{BanzattoQd3.4.1} \alias{BanzattoQd3.4.1} \title{Produtividades de Cultivares de Mandioca} -\format{Um \code{data.frame} com 25 observações e 3 variáveis. +\format{Um \code{data.frame} com 25 observações e 3 variáveis, em que \describe{ @@ -18,9 +18,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.4.1 pág. - 50) +BANZATTO; KRONKA (2013), Quadro 3.4.1, pág. 50. } \description{ Produção de mandioca em experimento de competição de diff --git a/man/BanzattoQd3.6.1.Rd b/man/BanzattoQd3.6.1.Rd index 0e9561a7..6fe0ef49 100644 --- a/man/BanzattoQd3.6.1.Rd +++ b/man/BanzattoQd3.6.1.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd3.6.1} \alias{BanzattoQd3.6.1} -\title{Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca em Cultivares de Sorgo} -\format{Um \code{data.frame} com 30 observações e 3 variáveis. +\title{Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca em Cultivares de + Sorgo} +\format{Um \code{data.frame} com 30 observações e 3 variáveis, em que \describe{ @@ -17,9 +18,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.6.1 pág. - 57) +BANZATTO; KRONKA (2013), Quadro 3.6.1, pág. 57. } \description{ Experimento em delineamento inteiramente casualizado diff --git a/man/BanzattoQd3.7.1.Rd b/man/BanzattoQd3.7.1.Rd index e642fcee..d5d774c8 100644 --- a/man/BanzattoQd3.7.1.Rd +++ b/man/BanzattoQd3.7.1.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd3.7.1} \alias{BanzattoQd3.7.1} -\title{Composi\enc{çã}{ca}o do Substrato na Altura de \emph{Pinus oocarpa}} -\format{Um \code{data.frame} com 20 observações e 3 variáveis. +\title{Composi\enc{çã}{ca}o do Substrato na Altura de \emph{Pinus + oocarpa}} +\format{Um \code{data.frame} com 20 observações e 3 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 3.7.1 pág. - 64) +BANZATTO; KRONKA (2013), Quadro 3.7.1, pág. 64. } \description{ Dados de experimento para estudo do efeito de 5 diff --git a/man/BanzattoQd4.5.2.Rd b/man/BanzattoQd4.5.2.Rd index 81bfd57e..08d36f27 100644 --- a/man/BanzattoQd4.5.2.Rd +++ b/man/BanzattoQd4.5.2.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd4.5.2} \alias{BanzattoQd4.5.2} -\title{Efeito do Promalin sobre Furtos de Macieira} -\format{Um \code{data.frame} com 20 observações e 3 variáveis. +\title{Efeito do Promalin sobre a Produçaõ de Frutos de Macieira} +\format{Um \code{data.frame} com 20 observações e 3 variáveis, em que \describe{ @@ -20,9 +20,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.5.2 - pág. 84) +BANZATTO; KRONKA (2013), Quadro 4.5.2, pág. 84. Mestriner, J. C. (1980). Estudos dos efeitos do promalin sobre frutos de macieiras (\emph{Malus} ssp) cultivares Brasil e diff --git a/man/BanzattoQd4.7.1.Rd b/man/BanzattoQd4.7.1.Rd index 987c5aa8..3cbf9bf8 100644 --- a/man/BanzattoQd4.7.1.Rd +++ b/man/BanzattoQd4.7.1.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd4.7.1} \alias{BanzattoQd4.7.1} -\title{Compara\enc{çã}{ca}o de M\enc{é}{e}todos de Semeadura do Mamoeiro} -\format{Um \code{data.frame} com 24 observações e 3 variáveis. +\title{Compara\enc{çã}{ca}o de M\enc{é}{e}todos de Semeadura do + Mamoeiro} +\format{Um \code{data.frame} com 24 observações e 3 variáveis, em que \describe{ @@ -18,9 +19,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 4.7.1 - pág. 93) +BANZATTO; KRONKA (2013), Quadro 4.7.1, pág. 93. Ruiz, P. R. N. (1977). Estudo comparativo entre diferentes métodos de semeadura na cultura do mamoeiro (\emph{Carica papaya} diff --git a/man/BanzattoQd5.2.1.Rd b/man/BanzattoQd5.2.1.Rd index 8a32295a..1b8af3f2 100644 --- a/man/BanzattoQd5.2.1.Rd +++ b/man/BanzattoQd5.2.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd5.2.1} \alias{BanzattoQd5.2.1} -\title{Peneira e Densidade de Plantio na Produ\enc{çã}{ca}o de Amendoim} +\title{Peneira e Densidade de Plantio na Produ\enc{çã}{ca}o de + Amendoim} \format{Um \code{data.frame} com 27 observações e 4 variáveis, em que \describe{ @@ -27,9 +28,7 @@ das linhas centrais foram consideradas como bordadura, fazendo-se as avaliações apenas no comprimento restante das duas linhas centrais, o que resultou em uma área útil de 6 m\eqn{^2}.} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.2.1, - pág. 102) +BANZATTO; KRONKA (2013), Quadro 5.2.1, pág. 102. } \description{ Dados de um experimento fatorial que estudou o efeito de diff --git a/man/BanzattoQd5.2.4.Rd b/man/BanzattoQd5.2.4.Rd index f19ed67b..e7350398 100644 --- a/man/BanzattoQd5.2.4.Rd +++ b/man/BanzattoQd5.2.4.Rd @@ -21,9 +21,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.2.4, - pág. 107) +BANZATTO; KRONKA (2013), Quadro 5.2.4, pág. 107. } \description{ Experimento em esquema fatorial 3 \eqn{\times} 2 para diff --git a/man/BanzattoQd5.3.1.Rd b/man/BanzattoQd5.3.1.Rd index 52661b26..8253665c 100644 --- a/man/BanzattoQd5.3.1.Rd +++ b/man/BanzattoQd5.3.1.Rd @@ -2,8 +2,10 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd5.3.1} \alias{BanzattoQd5.3.1} -\title{Produ\enc{çã}{ca}o de Caf\enc{é}{e} em Fun\enc{çã}{ca}o de Aduba\enc{çã}{ca}o NPK} -\format{Um \code{data.frame} com 48 observações e 5 variáveis. +\title{Produ\enc{çã}{ca}o de Caf\enc{é}{e} em Fun\enc{çã}{ca}o de + Aduba\enc{çã}{ca}o NPK} +\format{Um \code{data.frame} com 48 observações e 5 variáveis, em que + \describe{ \item{\code{N}}{Variável numérica que indica ausência (0) ou @@ -24,9 +26,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.3.1, - pág. 113) +BANZATTO; KRONKA (2013), Quadro 5.3.1, pág. 113. } \description{ Resultados de um experimento em arranjo fatorial triplo diff --git a/man/BanzattoQd5.3.7.Rd b/man/BanzattoQd5.3.7.Rd index 5d172acd..abc5aa6a 100644 --- a/man/BanzattoQd5.3.7.Rd +++ b/man/BanzattoQd5.3.7.Rd @@ -2,8 +2,10 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd5.3.7} \alias{BanzattoQd5.3.7} -\title{Efici\enc{ê}{e}ncia na Utiliza\enc{çã}{ca}o de P por Cultivares de trigo} -\format{Um \code{data.frame} com 48 observações e 5 variáveis. +\title{Efici\enc{ê}{e}ncia na Utiliza\enc{çã}{ca}o de P por + Cultivares de Trigo} +\format{Um \code{data.frame} com 48 observações e 5 variáveis, em que + \describe{ \item{\code{cult}}{Cultivares de trigo usadas no experimento: BR 20 @@ -24,9 +26,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.3.7, - pág. 120) +BANZATTO; KRONKA (2013), Quadro 5.3.7, pág. 120. } \description{ Experimento em delineamento inteiramente casualizado que diff --git a/man/BanzattoQd5.5.1.Rd b/man/BanzattoQd5.5.1.Rd index 59236ded..3d9be148 100644 --- a/man/BanzattoQd5.5.1.Rd +++ b/man/BanzattoQd5.5.1.Rd @@ -4,7 +4,8 @@ \alias{BanzattoQd5.5.1} \title{Aduba\enc{çã}{ca}o Mineral no Milho com Uso de Confundimento} \format{Um \code{data.frame} com 27 observações e 4 variáveis, em que - \describe{ + +\describe{ \item{\code{N}}{Níveis codificados de nitrogênio (N) que representam 0, 30 e 60 kg ha\eqn{^{-1}}. A fonte do N é o sulfato de amônio @@ -32,9 +33,7 @@ consideradas as 4 linhas centrais com 8 metros de comprimento (por desconsiderar 1 m em cada extremidade), perfazendo 32 m\eqn{^{2}}. O híbrido de milho utilizado foi o HMD-7974.} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 5.5.1, - pág. 131) +BANZATTO; KRONKA (2013), Quadro 5.5.1, pág. 131. Vilalta, O. A. (1972). Avaliação da produção de milho (\emph{Zea mays} L.) em função da adubação NPK em um latossolo diff --git a/man/BanzattoQd6.2.2.Rd b/man/BanzattoQd6.2.2.Rd index 376679fe..bd7dc1cb 100644 --- a/man/BanzattoQd6.2.2.Rd +++ b/man/BanzattoQd6.2.2.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd6.2.2} \alias{BanzattoQd6.2.2} -\title{Espa\enc{ç}{c}amento de Plantio na Produ\enc{çã}{ca}o de Cana-de-a\enc{çú}{cu}car} -\format{Um \code{data.frame} com 40 observações e 4 variáveis. +\title{Espa\enc{ç}{c}amento de Plantio na Produ\enc{çã}{ca}o de + Cana-de-a\enc{çú}{cu}car} +\format{Um \code{data.frame} com 40 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.2.2, - pág. 138) +BANZATTO; KRONKA (2013), Quadro 6.2.2, pág. 138. } \description{ O experimento avaliou o efeito do espaçamento de plantio diff --git a/man/BanzattoQd6.2.5.Rd b/man/BanzattoQd6.2.5.Rd index a7ae695f..63020df6 100644 --- a/man/BanzattoQd6.2.5.Rd +++ b/man/BanzattoQd6.2.5.Rd @@ -3,7 +3,7 @@ \name{BanzattoQd6.2.5} \alias{BanzattoQd6.2.5} \title{Fontes e Doses para Aduba\enc{çã}{ca}o Nitrogenada no Milho} -\format{Um \code{data.frame} com 48 observações e 4 variáveis. +\format{Um \code{data.frame} com 48 observações e 4 variáveis, em que \describe{ @@ -20,9 +20,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.2.5, - pág. 144) +BANZATTO; KRONKA (2013), Quadro 6.2.5, pág. 144. } \description{ Experimento que estudou a produção de milho como função diff --git a/man/BanzattoQd6.3.4.Rd b/man/BanzattoQd6.3.4.Rd index f6359ac8..9d5153f0 100644 --- a/man/BanzattoQd6.3.4.Rd +++ b/man/BanzattoQd6.3.4.Rd @@ -2,9 +2,11 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd6.3.4} \alias{BanzattoQd6.3.4} -\title{\enc{É}{E}pocas de Plantio e Colheita na Produ\enc{çã}{ca}o de Beterraba} -\format{Um \code{data.frame} com 72 observações e 5 variáveis. - \describe{ +\title{\enc{É}{E}pocas de Plantio e Colheita na Produ\enc{çã}{ca}o de + Beterraba} +\format{Um \code{data.frame} com 72 observações e 5 variáveis, em que + +\describe{ \item{\code{data}}{Fator de níveis ordinais que representa as datas de plantio de beterraba. Os níveis do fator data foram @@ -26,9 +28,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.3.4, - pág. 156) +BANZATTO; KRONKA (2013), Quadro 6.3.4, pág. 156. } \description{ Experimento estudar o efeito de datas de plantio, épocas diff --git a/man/BanzattoQd6.4.2.Rd b/man/BanzattoQd6.4.2.Rd index e236ce70..259e19e4 100644 --- a/man/BanzattoQd6.4.2.Rd +++ b/man/BanzattoQd6.4.2.Rd @@ -2,9 +2,11 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd6.4.2} \alias{BanzattoQd6.4.2} -\title{\enc{É}{E}poca de Plantio e Aduba\enc{çã}{ca}o Nitrogenada em Beterraba} -\format{Um \code{data.frame} com 80 observações e 4 variáveis. - \describe{ +\title{\enc{É}{E}poca de Plantio e Aduba\enc{çã}{ca}o Nitrogenada em + Beterraba} +\format{Um \code{data.frame} com 80 observações e 4 variáveis, em que + +\describe{ \item{\code{nitro}}{Fator de níveis métricos que correspondem à quantidade de nitrogênio aplicada, em libras por acre.} @@ -30,9 +32,7 @@ Na figura abaixo, tem-se a organização dos 4 blocos, bem como dos \if{html}{\figure{BanzattoQd6-4-2.png}{options: width="250px"}} \if{latex}{\figure{BanzattoQd6-4-2.png}{options: width=1.75in}}} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 6.4.2, - pág. 163) +BANZATTO; KRONKA (2013), Quadro 6.4.2, pág. 163. } \description{ Experimento em delineamento de blocos casualizados cujos diff --git a/man/BanzattoQd7.2.1.Rd b/man/BanzattoQd7.2.1.Rd index c9a529d3..95f9e4cf 100644 --- a/man/BanzattoQd7.2.1.Rd +++ b/man/BanzattoQd7.2.1.Rd @@ -3,7 +3,7 @@ \name{BanzattoQd7.2.1} \alias{BanzattoQd7.2.1} \title{Efeito do Gesso no Peso de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o} -\format{Um \code{data.frame} com 28 observações e 3 variáveis. +\format{Um \code{data.frame} com 28 observações e 3 variáveis, em que \describe{ @@ -15,9 +15,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.2.1, - pág. 170) +BANZATTO; KRONKA (2013), Quadro 7.2.1, pág. 170. Ragazzi, D. (1979). Efeito de doses de gesso na cultura do feijoeiro (\emph{Phaseolus vulgaris} L.). Trabalho de Conclusão de Curso @@ -46,4 +44,5 @@ xyplot(peso ~ gesso, data = BanzattoQd7.2.1, } \keyword{DIC} +\keyword{REG} diff --git a/man/BanzattoQd7.3.1.Rd b/man/BanzattoQd7.3.1.Rd index 43eae95b..2fa01d66 100644 --- a/man/BanzattoQd7.3.1.Rd +++ b/man/BanzattoQd7.3.1.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd7.3.1} \alias{BanzattoQd7.3.1} -\title{Di\enc{â}{a}metro e Altura de Tubetes na Forma\enc{çã}{ca}o de Mudas de Eucalipto} -\format{Um \code{data.frame} com 27 observações e 4 variáveis. +\title{Di\enc{â}{a}metro e Altura de Tubetes na Forma\enc{çã}{ca}o de + Mudas de Eucalipto} +\format{Um \code{data.frame} com 27 observações e 4 variáveis, em que \describe{ @@ -18,9 +19,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.3.1, - pág. 177) +BANZATTO; KRONKA (2013), Quadro 7.3.1, pág. 177. } \description{ Experimento fatorial 3 \eqn{\times} 3 que avaliou o @@ -39,7 +38,8 @@ str(BanzattoQd7.3.1) xtabs(~at + dt, data = BanzattoQd7.3.1) -with(BanzattoQd7.3.1, addmargins(tapply(alt, list(at, dt), FUN = mean))) +with(BanzattoQd7.3.1, + addmargins(tapply(alt, list(at, dt), FUN = mean))) xyplot(alt ~ at, data = BanzattoQd7.3.1, groups = dt, type = c("p", "a", "g"), diff --git a/man/BanzattoQd7.3.3.Rd b/man/BanzattoQd7.3.3.Rd index 3b20eb68..893359d2 100644 --- a/man/BanzattoQd7.3.3.Rd +++ b/man/BanzattoQd7.3.3.Rd @@ -3,7 +3,7 @@ \name{BanzattoQd7.3.3} \alias{BanzattoQd7.3.3} \title{Experimento Fatorial com Fatores Qualitativos e Quantitativos} -\format{Um \code{data.frame} com 32 observações e 4 variáveis. +\format{Um \code{data.frame} com 32 observações e 4 variáveis, em que \describe{ @@ -18,9 +18,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 7.3.3, - pág. 182) +BANZATTO; KRONKA (2013), Quadro 7.3.3, pág. 182. } \description{ Dados fictícios de um experimento fatorial duplo com um diff --git a/man/BanzattoQd8.2.1.Rd b/man/BanzattoQd8.2.1.Rd index fc662485..184659d3 100644 --- a/man/BanzattoQd8.2.1.Rd +++ b/man/BanzattoQd8.2.1.Rd @@ -3,7 +3,8 @@ \name{BanzattoQd8.2.1} \alias{BanzattoQd8.2.1} \title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Batata} -\format{Um \code{data.frame} com 160 observações e 4 variáveis. +\format{Um \code{data.frame} com 160 observações e 4 variáveis, em + que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.2.1, - pág. 190) +BANZATTO; KRONKA (2013), Quadro 8.2.1, pág. 190. Filgueira, F. A. R. (1991). Interação genótipo ambiente em batata (\emph{Solanum tuberosum} L. spp \emph{tuberosum}). Tese @@ -58,6 +57,5 @@ xyplot(prod ~ cult | exper, data = BanzattoQd8.2.1, ylab = expression("Produção de tubérculos"~(t~ha^{-1}))) } -\keyword{DBC} \keyword{GE} diff --git a/man/BanzattoQd8.3.1.Rd b/man/BanzattoQd8.3.1.Rd index 02ae4151..f38b3003 100644 --- a/man/BanzattoQd8.3.1.Rd +++ b/man/BanzattoQd8.3.1.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd8.3.1} \alias{BanzattoQd8.3.1} -\title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos de Batata} -\format{Um \code{data.frame} com 40 observações e 3 variáveis. +\title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos + de Batata} +\format{Um \code{data.frame} com 40 observações e 3 variáveis, em que \describe{ @@ -25,9 +26,7 @@ Esse \code{data.frame} não possuí o valor individual de cada parcelas residuais em cada experimento estão disponíveis no atributo \code{"qmr"} do objeto.} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.3.1, - pág. 196) +BANZATTO; KRONKA (2013), Quadro 8.3.1, pág. 196. Filgueira, F. A. R. (1991). Interação genótipo ambiente em batata (\emph{Solanum tuberosum} L. spp \emph{tuberosum}). Tese @@ -64,6 +63,5 @@ xyplot(prod ~ genot, groups = exper, data = BanzattoQd8.3.1, "Produção total de tubérculos de 4 parcelas"~(t~ha^{-1}))) } -\keyword{DBC} \keyword{GE} diff --git a/man/BanzattoQd8.4.1.Rd b/man/BanzattoQd8.4.1.Rd index 8fda9435..5d0d88fa 100644 --- a/man/BanzattoQd8.4.1.Rd +++ b/man/BanzattoQd8.4.1.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd8.4.1} \alias{BanzattoQd8.4.1} -\title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos de Cebola} -\format{Um \code{data.frame} com 60 observações e 3 variáveis. +\title{Grupo de Ensaios de Competi\enc{çã}{ca}o de Gen\enc{ó}{o}tipos + de Cebola} +\format{Um \code{data.frame} com 60 observações e 3 variáveis, em que \describe{ @@ -18,9 +19,7 @@ }} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.4.1, - pág. 200) +BANZATTO; KRONKA (2013), Quadro 8.4.1, pág. 200. Santos, G. M. (2003). Adaptabilidade e estabilidade de genótipos de cebola. Tese (Doutorado em Genética e Melhoramento de diff --git a/man/BanzattoQd8.4.3.Rd b/man/BanzattoQd8.4.3.Rd index eee482c8..9dd5a1fe 100644 --- a/man/BanzattoQd8.4.3.Rd +++ b/man/BanzattoQd8.4.3.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Banzatto.R \name{BanzattoQd8.4.3} \alias{BanzattoQd8.4.3} -\title{Grupo de Experimentos de Aduba\enc{çã}{ca}o Nitrogenada em Milho} -\format{Um \code{data.frame} com 24 observações e 3 variáveis. +\title{Grupo de Experimentos de Aduba\enc{çã}{ca}o Nitrogenada em + Milho} +\format{Um \code{data.frame} com 24 observações e 3 variáveis, em que \describe{ @@ -23,9 +24,7 @@ O \code{data.frame} possui um atributo com os quadrados médios residuais em cada experimento.} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 8.4.3, - pág. 202) +BANZATTO; KRONKA (2013), Quadro 8.4.3, pág. 202. } \description{ Dados referentes à produção de milho em grãos de ensaios diff --git a/man/BanzattoQd9.2.1.Rd b/man/BanzattoQd9.2.1.Rd index 5cc1aecd..2957946e 100644 --- a/man/BanzattoQd9.2.1.Rd +++ b/man/BanzattoQd9.2.1.Rd @@ -3,7 +3,7 @@ \name{BanzattoQd9.2.1} \alias{BanzattoQd9.2.1} \title{Produ\enc{çã}{ca}o de Variedades de Milho} -\format{Um \code{data.frame} com 24 observações e 6 variáveis. +\format{Um \code{data.frame} com 24 observações e 6 variáveis, em que \describe{ @@ -30,9 +30,7 @@ Os fatores A e B são fictícios pois foram criados apenas para fatorial 3 \eqn{\times} 2 ao invés de ter um único fator de 6 níveis.} \source{ -Banzatto, D. A., Kronka, S. D. (2013). Experimentação - Agrícola (4th ed.). Jaboticabal, SP: Funep. (Quadro 9.2.1, - pág. 206) +BANZATTO; KRONKA (2013), Quadro 9.2.1, pág. 206. } \description{ Resultados de um experimento para avaliação da produção diff --git a/man/BarbinEx1.Rd b/man/BarbinEx1.Rd index 01a918ed..80fb90c1 100644 --- a/man/BarbinEx1.Rd +++ b/man/BarbinEx1.Rd @@ -5,9 +5,7 @@ \title{Altura de \emph{Pinus elliottii} aos 10 anos de idade} \format{Um vetor com 50 elementos de valor numérico.} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 1, pág. 199) +BARBIN (2013), Exercício 1, pág. 199. } \description{ Os dados referem-se à altura (m) de \emph{Pinus diff --git a/man/BarbinEx13.Rd b/man/BarbinEx13.Rd index 48bc4f38..ff07a2f9 100644 --- a/man/BarbinEx13.Rd +++ b/man/BarbinEx13.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Barbin.R \name{BarbinEx13} \alias{BarbinEx13} -\title{Di\enc{â}{a}metro M\enc{é}{e}dio do Tronco de Esp\enc{é}{e}cies de Eucalipto} -\format{Um \code{data.frame} com 24 observações e 4 variáveis. +\title{Di\enc{â}{a}metro M\enc{é}{e}dio do Tronco de + Esp\enc{é}{e}cies de Eucalipto} +\format{Um \code{data.frame} com 24 observações e 4 variáveis, em que \describe{ @@ -19,9 +20,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 13, pág. 206) +BARBIN (2013), Exercício 13, pág. 206. } \description{ Diâmetro médio (cm), aos 5 anos de idade, de plantas diff --git a/man/BarbinEx14.Rd b/man/BarbinEx14.Rd index e42ab786..9853be60 100644 --- a/man/BarbinEx14.Rd +++ b/man/BarbinEx14.Rd @@ -3,7 +3,7 @@ \name{BarbinEx14} \alias{BarbinEx14} \title{Produ\enc{çã}{ca}o de Milho em Ensaio Fatorial de NPK} -\format{Um \code{data.frame} com 24 observações e 5 variáveis. +\format{Um \code{data.frame} com 24 observações e 5 variáveis, em que \describe{ @@ -22,9 +22,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 14, pág. 206) +BARBIN (2013), Exercício 14, pág. 206. } \description{ Ensaio fatorial de adubação NPK, fatorial \eqn{2^3}, com diff --git a/man/BarbinEx16.Rd b/man/BarbinEx16.Rd index 33d70c91..f68382d5 100644 --- a/man/BarbinEx16.Rd +++ b/man/BarbinEx16.Rd @@ -4,7 +4,7 @@ \alias{BarbinEx16} \title{Efeito de Sistemas de Plantio na Produtividade de Cana-de-a\enc{çú}{cu}car} -\format{Um \code{data.frame} com 40 observações e 4 variáveis. +\format{Um \code{data.frame} com 40 observações e 4 variáveis, em que \describe{ @@ -24,9 +24,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 16, pág. 208) +BARBIN (2013), Exercício 16, pág. 208. } \description{ Produtividade de cana-de-açúcar, cultivar CB-43-5, diff --git a/man/BarbinEx17.Rd b/man/BarbinEx17.Rd index ebbcba16..8a36ec11 100644 --- a/man/BarbinEx17.Rd +++ b/man/BarbinEx17.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Barbin.R \name{BarbinEx17} \alias{BarbinEx17} -\title{Efeito do Espa\enc{ç}{c}amento na Produtividade de Laranjeira Val\enc{ê}{e}ncia} +\title{Efeito do Espa\enc{ç}{c}amento na Produtividade de Laranjeira + Val\enc{ê}{e}ncia} \format{Um \code{data.frame} com 100 observações e 4 variáveis, em que @@ -21,9 +22,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 17, pág. 209) +BARBIN (2013), Exercício 17, pág. 209. } \description{ Dados de produtividade de laranja, em kg por planta, de diff --git a/man/BarbinEx18.Rd b/man/BarbinEx18.Rd index 878fd0c5..4ce0df12 100644 --- a/man/BarbinEx18.Rd +++ b/man/BarbinEx18.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Barbin.R \name{BarbinEx18} \alias{BarbinEx18} -\title{Altura de Plantas de Esp\enc{é}{e}cies de Eucalipto em V\enc{á}{a}rios Locais} +\title{Altura de Plantas de Esp\enc{é}{e}cies de Eucalipto em + V\enc{á}{a}rios Locais} \format{Um \code{data.frame} com 100 observações e 4 variáveis, em que @@ -22,9 +23,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 18, pág. 210) +BARBIN (2013), Exercício 18, pág. 210. } \description{ Dados referentes à altura de plantas de eucalipto, com 3 diff --git a/man/BarbinEx3.Rd b/man/BarbinEx3.Rd index ee51ead2..d99c5d07 100644 --- a/man/BarbinEx3.Rd +++ b/man/BarbinEx3.Rd @@ -2,20 +2,20 @@ % Please edit documentation in R/Barbin.R \name{BarbinEx3} \alias{BarbinEx3} -\title{Podrid\enc{ã}{a}o Mole de Manga em Fun\enc{çã}{ca}o do Tratamento T\enc{é}{e}rmico} -\format{Um \code{data.frame} com 28 observações e 2 variáveis. +\title{Podrid\enc{ã}{a}o Mole de Manga em Fun\enc{çã}{ca}o do + Tratamento T\enc{é}{e}rmico} +\format{Um \code{data.frame} com 28 observações e 2 variáveis, em que \describe{ -\item{\code{tterm}}{Fator categórico que indica o tratamento térmico.} +\item{\code{tterm}}{Fator categórico que indica o tratamento + térmico.} \item{\code{nota}}{Nota atribuída a podridão mole de manga, valor resultante da média de 6 frutos avaliados.} }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 3, pág. 119) +BARBIN (2013), Exercício 3, pág. 119. } \description{ Os dados referem-se as notas (médias de 6 frutos) diff --git a/man/BarbinEx8.Rd b/man/BarbinEx8.Rd index 3406d049..36509af2 100644 --- a/man/BarbinEx8.Rd +++ b/man/BarbinEx8.Rd @@ -3,7 +3,7 @@ \name{BarbinEx8} \alias{BarbinEx8} \title{Controle Qu\enc{í}{i}mico do Damping-off em Eucalipto} -\format{Um \code{data.frame} com 45 observações e 3 variáveis. +\format{Um \code{data.frame} com 45 observações e 3 variáveis, em que \describe{ @@ -19,9 +19,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 8, pág. 202) +BARBIN (2013), Exercício 8, pág. 202. Krugner, T. L. Controle químico do "damping-off" em eucalipto. Piracicaba, 1971. 60p. Dissertação (Mestrado) - Escola diff --git a/man/BarbinEx9.Rd b/man/BarbinEx9.Rd index d053f44c..f34ad3e9 100644 --- a/man/BarbinEx9.Rd +++ b/man/BarbinEx9.Rd @@ -3,8 +3,9 @@ \name{BarbinEx9} \alias{BarbinEx10} \alias{BarbinEx9} -\title{Ensaio de Competi\enc{çã}{ca}o de Clones de Laranja Pera-do-Rio} -\format{Um \code{data.frame} com 78 observações e 4 variáveis. +\title{Ensaio de Competi\enc{çã}{ca}o de Clones de Laranja + Pera-do-Rio} +\format{Um \code{data.frame} com 78 observações e 4 variáveis, em que \describe{ @@ -21,9 +22,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (Exercício 9, pág. 203) +BARBIN (2013), Exercício 9, pág. 203. } \description{ Ensaio de competição de 13 clones de laranja Pera-do-Rio diff --git a/man/BarbinPg104.Rd b/man/BarbinPg104.Rd index df6f1787..fd9ddac5 100644 --- a/man/BarbinPg104.Rd +++ b/man/BarbinPg104.Rd @@ -21,9 +21,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 104) +BARBIN (2013), pág. 104. } \description{ Experimento em delineamento quadrado latino que avaliou diff --git a/man/BarbinPg114.Rd b/man/BarbinPg114.Rd index eb275e4d..45311904 100644 --- a/man/BarbinPg114.Rd +++ b/man/BarbinPg114.Rd @@ -2,8 +2,10 @@ % Please edit documentation in R/Barbin.R \name{BarbinPg114} \alias{BarbinPg114} -\title{Influ\enc{ê}{e}ncia do Aparelho e Operador na Medi\enc{çã}{ca}o de \enc{Á}{A}rvores} -\format{Um \code{data.frame} com 200 observações e 4 variáveis. +\title{Influ\enc{ê}{e}ncia do Aparelho e Operador na + Medi\enc{çã}{ca}o de \enc{Á}{A}rvores} +\format{Um \code{data.frame} com 200 observações e 4 variáveis, em + que \describe{ @@ -24,9 +26,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 114) +BARBIN (2013), pág. 114. Simões, J. W., Mello, H. A., Barbin, D. (1967). Eficiência dos aparelhos e e influência do operador na medição de altura total diff --git a/man/BarbinPg125.Rd b/man/BarbinPg125.Rd index 14e22854..c0f2ea00 100644 --- a/man/BarbinPg125.Rd +++ b/man/BarbinPg125.Rd @@ -3,7 +3,7 @@ \name{BarbinPg125} \alias{BarbinPg125} \title{Aduba\enc{çã}{ca}o NPK no Cafeeiro} -\format{Um \code{data.frame} com 48 observações e 5 variáveis. +\format{Um \code{data.frame} com 48 observações e 5 variáveis, em que \describe{ @@ -12,7 +12,8 @@ \item{\code{P}}{Inteiro que codifica dois níveis de fósforo (0 e 1).} -\item{\code{K}}{Inteiro que codifica dois níveis de potássio (0 e 1).} +\item{\code{K}}{Inteiro que codifica dois níveis de potássio (0 e + 1).} \item{\code{bloc}}{Fator de níveis categóricos considerado para controle local.} @@ -23,9 +24,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 125) +BARBIN (2013), pág. 125). } \description{ Experimento no o delineamento de blocos casualizados que diff --git a/man/BarbinPg137.Rd b/man/BarbinPg137.Rd index 50cc02ed..09567b9e 100644 --- a/man/BarbinPg137.Rd +++ b/man/BarbinPg137.Rd @@ -2,8 +2,9 @@ % Please edit documentation in R/Barbin.R \name{BarbinPg137} \alias{BarbinPg137} -\title{Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Algod\enc{ã}{a}o Herb\enc{á}{a}ceo} -\format{Um \code{data.frame} com 54 observações e 6 variáveis. +\title{Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de + Algod\enc{ã}{a}o Herb\enc{á}{a}ceo} +\format{Um \code{data.frame} com 54 observações e 6 variáveis, em que \describe{ \item{\code{N}}{Dose de nitrogênio (kg ha\eqn{^{-1}}) usada na @@ -26,9 +27,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 137) +BARBIN (2013), pág. 137. Cavalcanti, F. B. (1977). A adubação mineral na cultura do algodão (\emph{Gossypium hirsutum} L.) no Estado de diff --git a/man/BarbinPg156.Rd b/man/BarbinPg156.Rd index 2a3da52f..b5394f90 100644 --- a/man/BarbinPg156.Rd +++ b/man/BarbinPg156.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Barbin.R \name{BarbinPg156} \alias{BarbinPg156} -\title{Aplica\enc{çã}{ca}o de Aduba\enc{çã}{ca}o Fosfatada na Produ\enc{çã}{ca}o de Milho} +\title{Aplica\enc{çã}{ca}o de Aduba\enc{çã}{ca}o Fosfatada na + Produ\enc{çã}{ca}o de Milho} \format{Um \code{data.frame} com 48 observações e 4 variáveis, em que \describe{ @@ -21,9 +22,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 156) +BARBIN (2013), pág. 156. } \description{ Dados de um ensaio de adubação fosfatada em milho, diff --git a/man/BarbinPg167.Rd b/man/BarbinPg167.Rd index b985fd41..20948f97 100644 --- a/man/BarbinPg167.Rd +++ b/man/BarbinPg167.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Barbin.R \name{BarbinPg167} \alias{BarbinPg167} -\title{Produ\enc{çã}{ca}o de Porta-enxertos para Laranjeira em V\enc{á}{a}rias Safras} +\title{Produ\enc{çã}{ca}o de Porta-enxertos para Laranjeira em + V\enc{á}{a}rias Safras} \format{Um \code{data.frame} com 90 observações e 4 variáveis, em que \describe{ @@ -21,9 +22,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 167) +BARBIN (2013), pág. 167. } \description{ Dados de produção de laranja de um ensaio de competição diff --git a/man/BarbinPg177.Rd b/man/BarbinPg177.Rd index e2499146..116d6e2a 100644 --- a/man/BarbinPg177.Rd +++ b/man/BarbinPg177.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Barbin.R \name{BarbinPg177} \alias{BarbinPg177} -\title{Altura de Prog\enc{ê}{e}nies de \emph{E. grandis} em Tr\enc{ê}{e}s Locais} +\title{Altura de Prog\enc{ê}{e}nies de \emph{E. grandis} em + Tr\enc{ê}{e}s Locais} \format{Um \code{data.frame} com 72 observações e 4 variáveis, em que \describe{ @@ -21,9 +22,7 @@ }} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 177) +BARBIN (2013), pág. 177. } \description{ Dados de experimento que mediu a altura (m) de árvores diff --git a/man/BarbinPg25.Rd b/man/BarbinPg25.Rd index 86265ff6..685e9679 100644 --- a/man/BarbinPg25.Rd +++ b/man/BarbinPg25.Rd @@ -3,7 +3,7 @@ \name{BarbinPg25} \alias{BarbinPg25} \title{Enraizamento de Estacas de P\enc{ê}{e}ssego} -\format{Um \code{data.frame} com 20 observações e 2 variáveis. +\format{Um \code{data.frame} com 20 observações e 2 variáveis, em que \describe{ @@ -19,9 +19,7 @@ O atributo \code{missings} é um vetor com números que indicam a posição das observações consideradas perdidas para se ilustrar a análise do experimento com número não igual de repetições.} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 25) +BARBIN (2013), pág. 25. Sambão, J. C., Sampaio, V. R., Barbin, D. (1982). Enraizamento de estacas herbáceas de pessegueiro (\emph{Prunus persica} diff --git a/man/BarbinPg72.Rd b/man/BarbinPg72.Rd index 854d2655..9b4a0ce1 100644 --- a/man/BarbinPg72.Rd +++ b/man/BarbinPg72.Rd @@ -3,7 +3,7 @@ \name{BarbinPg72} \alias{BarbinPg72} \title{Produ\enc{çã}{ca}o de Laranjeira sob Diferentes Porta-enxertos} -\format{Um \code{data.frame} com 27 observações e 3 variáveis. +\format{Um \code{data.frame} com 27 observações e 3 variáveis, em que \describe{ @@ -21,9 +21,7 @@ O atributo \code{missings} é um vetor com o número das observações consideradas como perdidas para ilustrar como fazer a análise do experimento desbalanceado.} \source{ -Barbin, D. (2013). Planejamento e Análise Estatística de - Experimentos Agronômicos (2nd ed.). Londrina, PR: - Mecenas. (pág. 72) +BARBIN (2013), pág. 72. Teófilo Sobrinho, J. (1972). Comportamento da laranjeira valência (\emph{Citrus sinensis} L., Osbeck) sob diferentes diff --git a/man/CostaEx5.7.2.Rd b/man/CostaEx5.7.2.Rd index 4ab2a807..285097f9 100644 --- a/man/CostaEx5.7.2.Rd +++ b/man/CostaEx5.7.2.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Costa.R \name{CostaEx5.7.2} \alias{CostaEx5.7.2} -\title{Densidade do Solo ao Longo do Perfil em Zonas de Compacta\enc{çã}{ca}o} +\title{Densidade do Solo ao Longo do Perfil em Zonas de + Compacta\enc{çã}{ca}o} \format{Um \code{data.frame} com 10 observações e 2 variáveis. \describe{ @@ -15,9 +16,7 @@ }} \source{ -Costa, J. R. (2003). Técnicas experimentais aplicadas às - ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa - Agrobiologia. (Exemplo 5.7.2.1, pág. 90) +Costa (2013), Exemplo 5.7.2.1, pág. 90. } \description{ Os dados são resultados de um estudo feito em zonas de @@ -38,5 +37,5 @@ xyplot(dens ~ prof, data = CostaEx5.7.2, ylab = expression("Densidade do solo"~(g~cm^{-3}))) } -\keyword{TODO} +\keyword{RL} diff --git a/man/CostaEx5.7.3.Rd b/man/CostaEx5.7.3.Rd index 2d67d759..e8faaf98 100644 --- a/man/CostaEx5.7.3.Rd +++ b/man/CostaEx5.7.3.Rd @@ -16,9 +16,7 @@ }} \source{ -Costa, J. R. (2003). Técnicas experimentais aplicadas às - ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa - Agrobiologia. (Exemplo 5.7.3.1, pág. 95) +Costa (2013), Exemplo 5.7.3.1, pág. 95. } \description{ Experimento instalado em delineamento inteiramente diff --git a/man/CostaTb4.Rd b/man/CostaTb4.Rd index f29c7d88..cfe304d4 100644 --- a/man/CostaTb4.Rd +++ b/man/CostaTb4.Rd @@ -18,9 +18,7 @@ }} \source{ -Costa, J. R. (2003). Técnicas experimentais aplicadas às - ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa - Agrobiologia. (Tabela 4, pág. 58) +Costa (2013), Tabela 4, pág. 58. } \description{ Resultados de um experimento conduzido em casa de diff --git a/man/CostaTb6.Rd b/man/CostaTb6.Rd index ecc865f2..50d57d8d 100644 --- a/man/CostaTb6.Rd +++ b/man/CostaTb6.Rd @@ -20,9 +20,7 @@ }} \source{ -Costa, J. R. (2003). Técnicas experimentais aplicadas às - ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa - Agrobiologia. (Tabela 6 pág. 63) +Costa (2013), Tabela 6 pág. 63. } \description{ Experimento instalado em delineamento de blocos diff --git a/man/CostaTb7.Rd b/man/CostaTb7.Rd index 1b3c53f4..253b9965 100644 --- a/man/CostaTb7.Rd +++ b/man/CostaTb7.Rd @@ -22,9 +22,7 @@ }} \source{ -Costa, J. R. (2003). Técnicas experimentais aplicadas às - ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa - Agrobiologia. (Tabela 7, pág. 68) +Costa (2013), Tabela 7, pág. 68. } \description{ Experimento fatorial que avaliou o peso do colmo de duas diff --git a/man/CostaTb8.Rd b/man/CostaTb8.Rd index 2755356e..45c8d175 100644 --- a/man/CostaTb8.Rd +++ b/man/CostaTb8.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Costa.R \name{CostaTb8} \alias{CostaTb8} -\title{Irriga\enc{çã}{ca}o no Tamanho de Frutos de Variedades de Banana} +\title{Irriga\enc{çã}{ca}o no Tamanho de Frutos de Variedades de + Banana} \format{Um \code{data.frame} com 32 observações e 4 variáveis. \describe{ @@ -25,9 +26,7 @@ }} \source{ -Costa, J. R. (2003). Técnicas experimentais aplicadas às - ciências agrárias (Documentos 163). Seropédica, RJ: Embrapa - Agrobiologia. (Tabela 8, pág. 76) +Costa (2013), Tabela 8, pág. 76. } \description{ Experimento em parcelas subdivididas que estudou o diff --git a/man/DiasEg10.1.Rd b/man/DiasEg10.1.Rd index eb13d7e3..0e11eda6 100644 --- a/man/DiasEg10.1.Rd +++ b/man/DiasEg10.1.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Dias.R \name{DiasEg10.1} \alias{DiasEg10.1} -\title{Subst\enc{â}{a}ncias Alelo\enc{á}{a}ticas no Percentual de Germina\enc{çã}{ca}o de - Sementes} +\title{Subst\enc{â}{a}ncias Alelo\enc{á}{a}ticas no Percentual de + Germina\enc{çã}{ca}o de Sementes} \format{Um \code{data.frame} com 40 observações e 4 variáveis, em que \describe{ @@ -20,8 +20,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 10.1, pág. 269) +BARROS; DIAS (2009), Exemplo 10.1, pág. 269. } \description{ Experimento em delineamento inteiramente casualizado diff --git a/man/DiasEg10.2.Rd b/man/DiasEg10.2.Rd index 5ca57903..73571962 100644 --- a/man/DiasEg10.2.Rd +++ b/man/DiasEg10.2.Rd @@ -20,8 +20,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 10.2, pág. 286) +BARROS; DIAS (2009), Exemplo 10.2, pág. 286. } \description{ Experimento em delineamento inteiramente casualizado diff --git a/man/DiasEg11.1.Rd b/man/DiasEg11.1.Rd index 65ca0575..37dad19c 100644 --- a/man/DiasEg11.1.Rd +++ b/man/DiasEg11.1.Rd @@ -20,8 +20,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 11.1, pág. 305) +BARROS; DIAS (2009), Exemplo 11.1, pág. 305. } \description{ Resultados de experimentos em 3 sítios, em delineamento diff --git a/man/DiasEg3.2.Rd b/man/DiasEg3.2.Rd index 59449008..d7f755fe 100644 --- a/man/DiasEg3.2.Rd +++ b/man/DiasEg3.2.Rd @@ -6,8 +6,7 @@ \format{Vetor com 43 observações que são o número de frutos produzidos por plantas de cacaueiro.} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. +BARROS; DIAS (2009), Exemplo 3.2. } \description{ Amostra aleatória do número de frutos produzidos por diff --git a/man/DiasEg3.6.Rd b/man/DiasEg3.6.Rd index 1d78070c..b1b3b258 100644 --- a/man/DiasEg3.6.Rd +++ b/man/DiasEg3.6.Rd @@ -5,8 +5,7 @@ \title{Alturas de plantas de milho} \format{Vetor com 100 observações da altura (cm).} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. +BARROS; DIAS (2009), Exemplo 3.6. } \description{ Amostras aleatória da alturas de plantas de milho. diff --git a/man/DiasEg5.1.Rd b/man/DiasEg5.1.Rd index f7ed1156..2feb77b3 100644 --- a/man/DiasEg5.1.Rd +++ b/man/DiasEg5.1.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Dias.R \name{DiasEg5.1} \alias{DiasEg5.1} -\title{N\enc{ú}{u}mero de Ovos Eclodidos de Nemat\enc{ó}{o}ides Ap\enc{ó}{o}s Aplica\enc{çã}{ca}o de - Nematicidas Naturais} +\title{N\enc{ú}{u}mero de Ovos Eclodidos de Nemat\enc{ó}{o}ides + Ap\enc{ó}{o}s Aplica\enc{çã}{ca}o de Nematicidas Naturais} \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que \describe{ @@ -16,8 +16,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 5.1, pág. 130) +BARROS; DIAS (2009), Exemplo 5.1, pág. 130. } \description{ Resultados de um experimento em delineamento diff --git a/man/DiasEg5.3.Rd b/man/DiasEg5.3.Rd index 0ba9144a..7803af7d 100644 --- a/man/DiasEg5.3.Rd +++ b/man/DiasEg5.3.Rd @@ -16,8 +16,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 11, pág. 321) +BARROS; DIAS (2009), Exercício 9, Cap. 11, pág. 321. } \description{ Resultados de um experimento em delineamento diff --git a/man/DiasEg6.1.Rd b/man/DiasEg6.1.Rd index aa4be4ac..23243474 100644 --- a/man/DiasEg6.1.Rd +++ b/man/DiasEg6.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Dias.R \name{DiasEg6.1} \alias{DiasEg6.1} -\title{Ganhos de Produ\enc{çã}{ca}o de Arroz nos Ciclos de Sele\enc{çã}{ca}o} +\title{Ganhos de Produ\enc{çã}{ca}o de Arroz nos Ciclos de + Sele\enc{çã}{ca}o} \format{Um \code{data.frame} com 6 observações e 2 variáveis, em que \describe{ @@ -14,8 +15,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 6.1, pág. 157) +BARROS; DIAS (2009), Exemplo 6.1, pág. 157. } \description{ Amostra com 6 pares de observações representanto os diff --git a/man/DiasEg6.2.Rd b/man/DiasEg6.2.Rd index 9032e163..c5fc4334 100644 --- a/man/DiasEg6.2.Rd +++ b/man/DiasEg6.2.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Dias.R \name{DiasEg6.2} \alias{DiasEg6.2} -\title{Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Feij\enc{ã}{a}o} +\title{Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de + Feij\enc{ã}{a}o} \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que \describe{ @@ -18,8 +19,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 6.2, pág. 164) +BARROS; DIAS (2009), Exemplo 6.2, pág. 164. } \description{ Experimento instalado em delineamento de blocos diff --git a/man/DiasEg6.3.Rd b/man/DiasEg6.3.Rd index 1c8dc243..622a3863 100644 --- a/man/DiasEg6.3.Rd +++ b/man/DiasEg6.3.Rd @@ -16,8 +16,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 6.3, pág. 173) +BARROS; DIAS (2009), Exemplo 6.3, pág. 173. } \description{ Foram avaliados 7 clones de cacaueiros a fim determinar diff --git a/man/DiasEg7.1.Rd b/man/DiasEg7.1.Rd index 851dce4f..37f89d45 100644 --- a/man/DiasEg7.1.Rd +++ b/man/DiasEg7.1.Rd @@ -10,15 +10,14 @@ \item{\code{luz}}{Fator métrico que identifica, em escala codificada, a quantidade de luz aplicada.} -\item{\code{agua}}{Fator métrico que identifica, em escala codificada, - a quantidade de água aplicada.} +\item{\code{agua}}{Fator métrico que identifica, em escala + codificada, a quantidade de água aplicada.} \item{\code{prod}}{Produção de tomateiros.} }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 7.1, pág. 187) +BARROS; DIAS (2009), Exemplo 7.1, pág. 187. } \description{ Resultados de um experimento que avaliou o efeito da diff --git a/man/DiasEg9.1.Rd b/man/DiasEg9.1.Rd index f5f60817..d8194539 100644 --- a/man/DiasEg9.1.Rd +++ b/man/DiasEg9.1.Rd @@ -16,8 +16,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 9.1, pág. 222) +BARROS; DIAS (2009), Exemplo 9.1, pág. 222. } \description{ Em um ensaio em delineamento inteiramente casualizado diff --git a/man/DiasEg9.2.Rd b/man/DiasEg9.2.Rd index 7ea9501f..44d4fc78 100644 --- a/man/DiasEg9.2.Rd +++ b/man/DiasEg9.2.Rd @@ -20,8 +20,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 9.2, pág. 231) +BARROS; DIAS (2009), Exemplo 9.2, pág. 231. } \description{ Dados de produção de cacau úmido (kg/planta) obtidos de diff --git a/man/DiasEg9.4.Rd b/man/DiasEg9.4.Rd index 2b9c8a34..7f16f691 100644 --- a/man/DiasEg9.4.Rd +++ b/man/DiasEg9.4.Rd @@ -20,8 +20,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exemplo 9.4, pág.247) +BARROS; DIAS (2009), Exemplo 9.4, pág. 247. } \description{ Dados de produção de cacau de 5 cultivares em um diff --git a/man/DiasEx10.4.10.Rd b/man/DiasEx10.4.10.Rd index 6f69e85d..4a7f3756 100644 --- a/man/DiasEx10.4.10.Rd +++ b/man/DiasEx10.4.10.Rd @@ -22,8 +22,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 10, pág. 296) +BARROS; DIAS (2009), Exercício 10, Cap. 10, pág. 296. } \description{ Dados refentes à produção de 3 clones diff --git a/man/DiasEx10.4.6.Rd b/man/DiasEx10.4.6.Rd index a27f287e..9bb9bedf 100644 --- a/man/DiasEx10.4.6.Rd +++ b/man/DiasEx10.4.6.Rd @@ -15,9 +15,7 @@ \item{\code{prod}}{Produtividade.} }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 10.4, Cap. 10, - pág. 294) +BARROS; DIAS (2009), Exercício 10.4, Cap. 10, pág. 294. } \description{ Ensaio de competição de batata doce, instalado em diff --git a/man/DiasEx10.4.7.Rd b/man/DiasEx10.4.7.Rd index dd135f51..617177c5 100644 --- a/man/DiasEx10.4.7.Rd +++ b/man/DiasEx10.4.7.Rd @@ -24,8 +24,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 10, pág. 295) +BARROS; DIAS (2009), Exercício 7, Cap. 10, pág. 295. } \description{ Em um experimento em delineamento inteiramente diff --git a/man/DiasEx10.4.8.Rd b/man/DiasEx10.4.8.Rd index f56e043f..e7d25912 100644 --- a/man/DiasEx10.4.8.Rd +++ b/man/DiasEx10.4.8.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Dias.R \name{DiasEx10.4.8} \alias{DiasEx10.4.8} -\title{Teores de Mat\enc{é}{e}ria Seca de Gramineas em Fun\enc{çã}{ca}o da Calagem} +\title{Teores de Mat\enc{é}{e}ria Seca de Gramineas em + Fun\enc{çã}{ca}o da Calagem} \format{Um \code{data.frame} com 36 observações e 4 variáveis, em que \describe{ @@ -20,8 +21,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 8, Cap. 10, pág. 295) +BARROS; DIAS (2009), Exercício 8, Cap. 10, pág. 295. } \description{ Em um ensaio em delineamento de blocos casualizados foi diff --git a/man/DiasEx11.7.8.Rd b/man/DiasEx11.7.8.Rd index 2c229485..2cf522fb 100644 --- a/man/DiasEx11.7.8.Rd +++ b/man/DiasEx11.7.8.Rd @@ -16,8 +16,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 8, Cap. 11, pág. 321 +BARROS; DIAS (2009), Exercício 8, Cap. 11, pág. 321. } \description{ Resultados de um grupo de experimento de competiação de diff --git a/man/DiasEx11.7.9.Rd b/man/DiasEx11.7.9.Rd index 3003a5c8..d75af191 100644 --- a/man/DiasEx11.7.9.Rd +++ b/man/DiasEx11.7.9.Rd @@ -20,8 +20,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 11, pág. 321) +BARROS; DIAS (2009), Exercício 9, Cap. 11, pág. 321. } \description{ Resultados de ensaio de competição de cultivares de diff --git a/man/DiasEx3.6.7.Rd b/man/DiasEx3.6.7.Rd index cce46aa4..eb78a06f 100644 --- a/man/DiasEx3.6.7.Rd +++ b/man/DiasEx3.6.7.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Dias.R \name{DiasEx3.6.7} \alias{DiasEx3.6.7} -\title{Percentual de Germina\enc{çã}{ca}o de Lotes de Sementes de Tomate} +\title{Percentual de Germina\enc{çã}{ca}o de Lotes de Sementes de + Tomate} \format{Um \code{data.frame} com 2 observações e 1 variável, em que \describe{ @@ -14,8 +15,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 7.6, pág.102) +BARROS; DIAS (2009), (Exercício 7, Cap. 7.6, pág. 102. } \description{ Percentuais de germinação de 2 lotes de sementes de diff --git a/man/DiasEx6.5.1.Rd b/man/DiasEx6.5.1.Rd index db169588..b9d14579 100644 --- a/man/DiasEx6.5.1.Rd +++ b/man/DiasEx6.5.1.Rd @@ -13,8 +13,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 1, Cap. 6, pág. 179) +BARROS; DIAS (2009), Exercício 1, Cap. 6, pág. 179. } \description{ Dados referentes ao peso em função da idade de codornas. diff --git a/man/DiasEx6.5.10.Rd b/man/DiasEx6.5.10.Rd index ad801bd8..868f3bf2 100644 --- a/man/DiasEx6.5.10.Rd +++ b/man/DiasEx6.5.10.Rd @@ -13,8 +13,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 7, pág. 181) +BARROS; DIAS (2009), Exercício 10, Cap. 7, pág. 181. } \description{ Dados referentes a 8 pares de valores de produção @@ -31,6 +30,6 @@ xyplot(prod ~ diam, data = DiasEx6.5.10, type = c("p", "r"), xlab = "Produção (gramas)", ylab = "Diâmetro (cm)") } -\keyword{ASS} +\keyword{AAS} \keyword{RL} diff --git a/man/DiasEx6.5.9.Rd b/man/DiasEx6.5.9.Rd index da23792e..1fd961f0 100644 --- a/man/DiasEx6.5.9.Rd +++ b/man/DiasEx6.5.9.Rd @@ -13,8 +13,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 9, Cap. 6, pág. 181) +BARROS; DIAS (2009), Exercício 9, Cap. 6, pág. 181. library(lattice) diff --git a/man/DiasEx9.6.10.Rd b/man/DiasEx9.6.10.Rd index ce92dff1..08dd9c13 100644 --- a/man/DiasEx9.6.10.Rd +++ b/man/DiasEx9.6.10.Rd @@ -18,8 +18,7 @@ \item{\code{prod}}{Produtividade em sacas beneficiadas.} }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 10, Cap. 9, pág. 261) +BARROS; DIAS (2009), Exercício 10, Cap. 9, pág. 261. } \description{ Experimento de competição de cultivares de café diff --git a/man/DiasEx9.6.4.Rd b/man/DiasEx9.6.4.Rd index 00af1293..8bd31d46 100644 --- a/man/DiasEx9.6.4.Rd +++ b/man/DiasEx9.6.4.Rd @@ -17,8 +17,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 4, Cap. 9, pág. 260) +BARROS; DIAS (2009), Exercício 4, Cap. 9, pág. 260. } \description{ Experimento instalado em delineamento inteiramente diff --git a/man/DiasEx9.6.6.Rd b/man/DiasEx9.6.6.Rd index fc5a8512..7b1fb3db 100644 --- a/man/DiasEx9.6.6.Rd +++ b/man/DiasEx9.6.6.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Dias.R \name{DiasEx9.6.6} \alias{DiasEx9.6.6} -\title{Teores de S\enc{ó}{o}lidos Sol\enc{ú}{u}veis Totais da Poupa de Frutos} +\title{Teores de S\enc{ó}{o}lidos Sol\enc{ú}{u}veis Totais da Poupa + de Frutos} \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que \describe{ @@ -16,8 +17,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 6, Cap. 9, pág. 260) +BARROS; DIAS (2009), Exercício 6, Cap. 9, pág. 260. } \description{ Experimento em delineamento inteiramente casualizado, diff --git a/man/DiasEx9.6.7.Rd b/man/DiasEx9.6.7.Rd index 74547ce5..4483c980 100644 --- a/man/DiasEx9.6.7.Rd +++ b/man/DiasEx9.6.7.Rd @@ -18,8 +18,7 @@ }} \source{ -Dias, L. A. S., Barros, W. S. (2009). Biometria - Experimental. Viçosa, MG: UFV. (Exercício 7, Cap. 9, pág. 261) +BARROS; DIAS (2009), Exercício 7, Cap. 9, pág. 261. } \description{ Resultados de um experimento em delineamento de blocos diff --git a/man/FariaEg2.9.5.Rd b/man/FariaEg2.9.5.Rd index 3dbe708e..add9ffac 100644 --- a/man/FariaEg2.9.5.Rd +++ b/man/FariaEg2.9.5.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Faria.R \name{FariaEg2.9.5} \alias{FariaEg2.9.5} -\title{Varia\enc{çã}{ca}o de M\enc{é}{e}todos para a Determina\enc{çã}{ca}o da CTC do Solo} +\title{Varia\enc{çã}{ca}o de M\enc{é}{e}todos para a + Determina\enc{çã}{ca}o da CTC do Solo} \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que \describe{ @@ -14,8 +15,7 @@ }} \source{ -Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) - Ilhéus - BA: UESC. (Exemplo 2.9.5, pág 39) +FARIA (2009), Exemplo 2.9.5, pág 39. } \description{ Dois métodos de CTC do solo são usados em uma amostra de @@ -36,5 +36,5 @@ aggregate(ctc ~ metod, data = FariaEg2.9.5, xyplot(ctc ~ metod, data = FariaEg2.9.5) } -\keyword{ASS} +\keyword{AAS} diff --git a/man/FariaEg3.2.4.Rd b/man/FariaEg3.2.4.Rd index 32bc868b..9110f5c4 100644 --- a/man/FariaEg3.2.4.Rd +++ b/man/FariaEg3.2.4.Rd @@ -17,8 +17,7 @@ }} \source{ -Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) - Ilhéus, BA: UESC. (Tabela 3.2.4, pág 46) +FARIA (2009), Tabela 3.2.4, pág 46. } \description{ Experimento em delineamento inteiramente casualizado que diff --git a/man/FariaQd11.4.Rd b/man/FariaQd11.4.Rd index 7aca6f2d..2f146b48 100644 --- a/man/FariaQd11.4.Rd +++ b/man/FariaQd11.4.Rd @@ -2,9 +2,9 @@ % Please edit documentation in R/Faria.R \name{FariaQd11.4} \alias{FariaQd11.4} -\title{Produ\enc{çã}{ca}o de Batatas em Fun\enc{çã}{ca}o da Calagem e Aduba\enc{çã}{ca}o} -\format{Um \code{data.frame} com 16 observações e 4 variáveis, em - que +\title{Produ\enc{çã}{ca}o de Batatas em Fun\enc{çã}{ca}o da Calagem e + Aduba\enc{çã}{ca}o} +\format{Um \code{data.frame} com 16 observações e 4 variáveis, em que \describe{ @@ -21,8 +21,7 @@ }} \source{ -Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) - Ilhéus - BA: UESC. (Quadro 11.4, pág. 134) +FARIA (2009), Quadro 11.4, pág. 134. } \description{ Experimento montado em delineamento inteiramente diff --git a/man/FariaQd11.9.Rd b/man/FariaQd11.9.Rd index 58b8af7e..08361ca9 100644 --- a/man/FariaQd11.9.Rd +++ b/man/FariaQd11.9.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Faria.R \name{FariaQd11.9} \alias{FariaQd11.9} -\title{Qualidade de Mudas em Fun\enc{çã}{ca}o do Recipiente da Esp\enc{é}{e}cie} +\title{Qualidade de Mudas em Fun\enc{çã}{ca}o do Recipiente da + Esp\enc{é}{e}cie} \format{Um \code{data.frame} com 12 observações e 4 variáveis, em que \describe{ @@ -20,8 +21,7 @@ }} \source{ -Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) - Ilhéus - BA: UESC. (Quadro 11.9, pág 145) +FARIA (2009), Quadro 11.9, pág 145. } \description{ Experimento montado no delineamento inteiramente diff --git a/man/FariaQd12.5.Rd b/man/FariaQd12.5.Rd index a4d64b0e..e031f4bd 100644 --- a/man/FariaQd12.5.Rd +++ b/man/FariaQd12.5.Rd @@ -25,8 +25,7 @@ As parcelas da testemunha, que não receberam aplicação de TVC, exibiram um valor 0 para a colonização das vassouras-de-bruxa.} \source{ -Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) - Ilhéus - BA: UESC. ( Quadro 12.5, pág. 159) +FARIA (2009), Quadro 12.5, pág. 159. } \description{ Os dados referem-se a contagem da colonização de um diff --git a/man/FariaQd14.2.Rd b/man/FariaQd14.2.Rd index e81a38ec..a8719ed6 100644 --- a/man/FariaQd14.2.Rd +++ b/man/FariaQd14.2.Rd @@ -16,8 +16,7 @@ }} \source{ -Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) - Ilhéus - BA: UESC. (Quadro 14.2 pág. 198) +FARIA (2009), Quadro 14.2 pág. 198. } \description{ Os dados abaixo são provenientes de um ensaio em que diff --git a/man/FariaQd14.3.Rd b/man/FariaQd14.3.Rd index 99a05cc5..df57bea0 100644 --- a/man/FariaQd14.3.Rd +++ b/man/FariaQd14.3.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Faria.R \name{FariaQd14.3} \alias{FariaQd14.3} -\title{Aduba\enc{çã}{ca}o com F\enc{ó}{o}sforo na Produ\enc{çã}{ca}o de Mat\enc{é}{e}ria Seca de Parte - A\enc{é}{e}rea de Milho} +\title{Aduba\enc{çã}{ca}o com F\enc{ó}{o}sforo na Produ\enc{çã}{ca}o + de Mat\enc{é}{e}ria Seca de Parte A\enc{é}{e}rea de Milho} \format{Um \code{data.frame} com 25 observações e 3 variáveis, em que \describe{ @@ -19,8 +19,7 @@ }} \source{ -Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) - Ilhéus - BA: UESC. (Quadro 14.3 pág. 200) +FARIA (2009), Quadro 14.3 pág. 200. } \description{ Os dados abaixo são provenientes de um ensaio diff --git a/man/FariaQd6.1.Rd b/man/FariaQd6.1.Rd index 4c73247f..82238643 100644 --- a/man/FariaQd6.1.Rd +++ b/man/FariaQd6.1.Rd @@ -17,8 +17,7 @@ }} \source{ -Faria, J. C. (2009). Notas de aulas expandidas (10th ed.) - Ilhéus, BA: UESC. (Tabela 6.1 pág 76) +FARIA (2009), Tabela 6.1 pág 76. } \description{ Produção de milho, em kg 100 m\eqn{^2} em um experimento diff --git a/man/FerreiraEg7.1.Rd b/man/FerreiraEg7.1.Rd index 920bdc3e..aab1bc24 100644 --- a/man/FerreiraEg7.1.Rd +++ b/man/FerreiraEg7.1.Rd @@ -46,7 +46,7 @@ boxplot(proteina ~ amostra, data = FerreiraEg7.1, axes = FALSE) box() axis(side = 2, col.axis = 4) -mtext(side = 2, text = "Proteínas em g/dl", line = 3, col = 4) +mtext(side = 2, text = "Proteínas em g/dl", line = 3, col = 4) par(new = TRUE, mar = c(4, 5, 4, 5)) boxplot(peroxido ~ amostra, data = FerreiraEg7.1, xlim = c(0.5, 2.5), border = 2, diff --git a/man/FerreiraEg7.4.Rd b/man/FerreiraEg7.4.Rd index ffc25559..223dc718 100644 --- a/man/FerreiraEg7.4.Rd +++ b/man/FerreiraEg7.4.Rd @@ -42,7 +42,7 @@ with(FerreiraEg7.4, { box() axis(side = 2, col.axis = 4) mtext(side = 2, text = "Produtividade em t/ha", - line = 3, col = 4) + line = 3, col = 4) par(new = TRUE, mar = c(4, 5, 4, 5)) plot.default(y = altura, xlab = "", ylab = "", x = jitter(as.numeric(varie), factor = 0.5) + 0.1, diff --git a/man/FerreiraEx7.4.1.Rd b/man/FerreiraEx7.4.1.Rd index 7539d8f1..41797b55 100644 --- a/man/FerreiraEx7.4.1.Rd +++ b/man/FerreiraEx7.4.1.Rd @@ -42,7 +42,7 @@ with(FerreiraEx7.4.1, { axes = FALSE) box() axis(side = 2, col.axis = 4) - mtext(side = 2, text = "Peso", line = 3, col = 4) + mtext(side = 2, text = "Peso", line = 3, col = 4) par(new = TRUE, mar = c(4, 5, 4, 5)) plot.default(y = teor, xlab = "", ylab = "", x = jitter(as.numeric(fase), factor = 0.5) + 0.15, diff --git a/man/FerreiraEx9.7.2.Rd b/man/FerreiraEx9.7.2.Rd index d0852cb5..db6eaeab 100644 --- a/man/FerreiraEx9.7.2.Rd +++ b/man/FerreiraEx9.7.2.Rd @@ -58,5 +58,5 @@ Bussab, W. O., Miazaki, É. S., Andrade, D. F. (1990). Introdução à análise de agrupamentos. São Paulo, SP: ABE. } -\keyword{agrupamento} +\keyword{AnaAgrup} diff --git a/man/ManlyTb1.2.Rd b/man/ManlyTb1.2.Rd index 88bbce91..06050c5d 100644 --- a/man/ManlyTb1.2.Rd +++ b/man/ManlyTb1.2.Rd @@ -3,7 +3,7 @@ \name{ManlyTb1.2} \alias{ManlyTb1.2} \title{Cr\enc{â}{a}nios eg\enc{í}{i}pcios} -\format{Um \code{data.frame} com os tamanhos de 30 crânios para cada +\format{Um \code{data.frame} com os tamanhos de 30 crânios para cada período de tempo, com quatro variáveis. \describe{ @@ -24,11 +24,11 @@ A figura abaixo descreve as medidas do crânio. \if{html}{\figure{ManlyTb1-2.jpg}{options: width="250px"}} \if{latex}{\figure{ManlyTb1-2.jpg}{options: width=1.75in}}} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução. Porto Alegre, RS: Bookman (pg 16) } \description{ -Medidas de crânios egípcios masculinos em cinco períodos +Medidas de crânios egípcios masculinos em cinco períodos de tempo. Medidas tomadas em milímetros. } \examples{ @@ -37,20 +37,20 @@ data(ManlyTb1.2) require(lattice) require(reshape2) -splom(~ManlyTb1.2[2:5] | grup, data = ManlyTb1.2, - layout=c(3,2), +splom(~ManlyTb1.2[2:5] | grup, data = ManlyTb1.2, + layout=c(3,2), pscales = 0, varnames = c("x1", "x2","x3", "x4"), main = "Gráfico de dispersão das medidas de crânio para cada período") - + ManlyTb1.2long <- melt(ManlyTb1.2, id.vars = "grup") - + bwplot(value ~grup | variable, data = ManlyTb1.2long, - scales = list(relation = "free"), - ylab = "", + scales = list(relation = "free"), + ylab = "", main = "Boxplot das medições de crânio em cada período" ) - + } -\keyword{Afd} +\keyword{AnaFat} diff --git a/man/ManlyTb1.3.Rd b/man/ManlyTb1.3.Rd index ebf0b351..248e40fc 100644 --- a/man/ManlyTb1.3.Rd +++ b/man/ManlyTb1.3.Rd @@ -20,32 +20,32 @@ \item{\code{dg0.4}}{Frequência 0.4 em demobilidade gênica PGi (porcentagem).} \item{\code{dg0.6}}{Frequência 0.6 em demobilidade gênica PGi.} - + \item{\code{dg0.8}}{Frequência 0.8 em demobilidade gênica PGi.} \item{\code{dg1}}{Frequência 1 em demobilidade gênica PGi.} - + \item{\code{dg1.16}}{Frequência 1.16 em demobilidade gênica PGi.} \item{\code{dg1.3}}{Frequência 1.3 em demobilidade gênica PGi.} - + }} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução. Porto Alegre, RS: Bookman (pg 19) } \description{ -Estudo de colônias de borboletas do tipo \emph{Euphydryas -editha} na Califórnia e em Oregon, EUA, com variáveis ambientais e +Estudo de colônias de borboletas do tipo \emph{Euphydryas +editha} na Califórnia e em Oregon, EUA, com variáveis ambientais e frequências gênicas. } \examples{ data(ManlyTb1.3) -pairs(~ alt + precip + tempmax + tempmin + dg0.4 + dg0.6 + dg0.8 + +pairs(~ alt + precip + tempmax + tempmin + dg0.4 + dg0.6 + dg0.8 + dg1 + dg1.16 + dg1.3, data = ManlyTb1.3, cex.labels = 1.4, main="Matriz de gráficos de dispersão") } -\keyword{CP} +\keyword{AnaComPrin} diff --git a/man/ManlyTb1.4.Rd b/man/ManlyTb1.4.Rd index 44e6f42d..8146fc45 100644 --- a/man/ManlyTb1.4.Rd +++ b/man/ManlyTb1.4.Rd @@ -3,7 +3,7 @@ \name{ManlyTb1.4} \alias{ManlyTb1.4} \title{C\enc{ã}{a}es pr\enc{é}{e}-hist\enc{ó}{o}ricos da Tail\enc{â}{a}ndia} -\format{Um \code{data.frame} com 7 grupos caninos e 6 variáveis. +\format{Um \code{data.frame} com 7 grupos caninos e 6 variáveis. \describe{ @@ -26,7 +26,7 @@ Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução. Porto Alegre, RS: Bookman (pg 21) } \description{ -Estudo em ancestrais de cães da Tailândia, +Estudo em ancestrais de cães da Tailândia, através de medições das mandíbulas. } \examples{ @@ -35,8 +35,8 @@ através de medições das mandíbulas. data(ManlyTb1.4) pairs(~largm + altm + comppm + largpm + comppt + comppq, - data = ManlyTb1.4, + data = ManlyTb1.4, main="Gráfico de dispersão para as medições da mandíbula") } -\keyword{AnaClust} +\keyword{AnaAgrup} diff --git a/man/ManlyTb1.5.Rd b/man/ManlyTb1.5.Rd index ff5fd211..2c4dd6cc 100644 --- a/man/ManlyTb1.5.Rd +++ b/man/ManlyTb1.5.Rd @@ -9,38 +9,38 @@ \item{\code{pais}}{Identificação do país.} -\item{\code{grup}}{Grupo econômico ao qual pertencente o país: União +\item{\code{grup}}{Grupo econômico ao qual pertencente o país: União Europeia (UE); Área europeia de livre comércio (AELC); Leste; Outro} -\item{\code{afp}}{Porcentagem da população ativa empregada na agricultura, +\item{\code{afp}}{Porcentagem da população ativa empregada na agricultura, florestal e pesca.} \item{\code{mep}}{Porcentagem empregada na mineração e exploração de pedreiras.} \item{\code{fab}}{Porcentagem empregada nas fábricas.} -\item{\code{fea}}{Porcentagem empregada nas áreas de fornecimento de +\item{\code{fea}}{Porcentagem empregada nas áreas de fornecimento de energia e água.} \item{\code{con}}{Porcentagem empregada na construção.} - + \item{\code{ser}}{Porcentagem empregada na área de serviços.} - + \item{\code{fin}}{Porcentagem empregada na área de finanças.} - + \item{\code{ssp}}{Porcentagem empregada na área de serviços sociais e pessoais.} -\item{\code{tc}}{Porcentagem empregada nas áreas de transportes e +\item{\code{tc}}{Porcentagem empregada nas áreas de transportes e comunicações.} }} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução. Porto Alegre, RS: Bookman (pg 22) } \description{ -Porcentagens da força de trabalho de empregados para nove +Porcentagens da força de trabalho de empregados para nove diferentes campos de trabalho em 30 países europeus } \examples{ @@ -48,9 +48,9 @@ diferentes campos de trabalho em 30 países europeus data(ManlyTb1.5) pairs(~afp + mep + fab + fea + con + ser + fin + ssp + tc, - data = ManlyTb1.5, + data = ManlyTb1.5, main="Matriz das variáveis de força de trabalho" ) } -\keyword{AnaClust} +\keyword{AnaAgrup} diff --git a/man/ManlyTb10.2.Rd b/man/ManlyTb10.2.Rd index c2309743..30b71947 100644 --- a/man/ManlyTb10.2.Rd +++ b/man/ManlyTb10.2.Rd @@ -6,22 +6,22 @@ \format{Um \code{data.frame} com 151 linhas e 8 variáveis. \describe{ -\item{\code{ser}}{Porcentagem de solo com enriquecimento constante de +\item{\code{ser}}{Porcentagem de solo com enriquecimento constante de calcário.} -\item{\code{spc}}{Porcentagem de solo de prado com cálcio na água +\item{\code{spc}}{Porcentagem de solo de prado com cálcio na água subterrânea.} -\item{\code{smc}}{Porcentagem de solo com matriz de coral sob +\item{\code{smc}}{Porcentagem de solo com matriz de coral sob condições de enriquecimento constante de calcário.} -\item{\code{sao}}{Porcentagem de solos aluvial e orgânico adjacentes +\item{\code{sao}}{Porcentagem de solos aluvial e orgânico adjacentes a rios e solo orgânico salino na costa.} -\item{\code{dfe}}{Porcentagem de floresta decídua estacional com +\item{\code{dfe}}{Porcentagem de floresta decídua estacional com ervas de folhas largas.} -\item{\code{flab}}{Porcentagem de floresta de locais altos e baixos +\item{\code{flab}}{Porcentagem de floresta de locais altos e baixos coberta com água e plantas herbáceas em lugares úmidos e pântano.} \item{\code{fpc}}{Porcentagem de floresta palma de cohune.} @@ -29,22 +29,22 @@ coberta com água e plantas herbáceas em lugares úmidos e pântano.} \item{\code{fm}}{Porcentagem de floresta mista.} }} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução.Porto Alegre, RS: Bookman (pg 167 à 170) } \description{ -Estudo no distrito de Corozal, em Belize, com 4 variáveis -de solo e 4 variáveis de vegetação registradas para quadrados +Estudo no distrito de Corozal, em Belize, com 4 variáveis +de solo e 4 variáveis de vegetação registradas para quadrados de 2,5 x 2,5 km. } \examples{ data(ManlyTb10.2) pairs(~ ser + spc + smc + sao + fde + flab + fpc + fm, - data = ManlyTb10.2, + data = ManlyTb10.2, main="Matriz de gráficos para as variáveis de solo") - + } -\keyword{ACC} +\keyword{AnaCorCan} diff --git a/man/ManlyTb10.4.Rd b/man/ManlyTb10.4.Rd index 2def3911..c3c0ee1f 100644 --- a/man/ManlyTb10.4.Rd +++ b/man/ManlyTb10.4.Rd @@ -8,7 +8,7 @@ \describe{ \item{\code{pais}}{Identificação do país.} -\item{\code{cv}}{Consumo de carne vermelha medida em gramas por +\item{\code{cv}}{Consumo de carne vermelha medida em gramas por pessoa por dia.} \item{\code{cb}}{Consumo de carne branca.} @@ -20,14 +20,14 @@ pessoa por dia.} \item{\code{peixe}}{Consumo de peixe.} \item{\code{cere}}{Consumo por cereais.} - + \item{\code{carb}}{Consumo de carboidratos.} \item{\code{gnl}}{Consumo de grãos, nozes e sementes oleaginosas.} - + \item{\code{fv}}{Consumo de frutas e vegetais.} -\item{\code{agr}}{Porcentagem da população ativa empregada na +\item{\code{agr}}{Porcentagem da população ativa empregada na agricultura, florestal e pesca.} \item{\code{min}}{Mineração e exploração de pedreiras.} @@ -37,34 +37,34 @@ agricultura, florestal e pesca.} \item{\code{fea}}{Fornecimento de energia e água.} \item{\code{con}}{Construção.} - + \item{\code{ser}}{Serviços.} - + \item{\code{fin}}{Finanças.} - + \item{\code{ssp}}{Serviços sociais e pessoais.} \item{\code{tc}}{Transportes e comunicações.} }} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução. Porto Alegre, RS: Bookman (pg 175) } \description{ -Dados referentes a consumo de proteína e força de trabalho +Dados referentes a consumo de proteína e força de trabalho em países europeus. } \examples{ data(ManlyTb10.4) -pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnl+ agr + +pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnl+ agr + min + fab + fea + con + ser + fin + ssp + tc, - data = ManlyTb10.4, - main = "Matriz de gráficos para as variáveis de força de trabalho + data = ManlyTb10.4, + main = "Matriz de gráficos para as variáveis de força de trabalho e consumo de proteínas diárias" ) } -\keyword{ACC} +\keyword{AnaCorCan} diff --git a/man/ManlyTb11.3.Rd b/man/ManlyTb11.3.Rd index 2b7651ae..f8407a67 100644 --- a/man/ManlyTb11.3.Rd +++ b/man/ManlyTb11.3.Rd @@ -3,10 +3,10 @@ \name{ManlyTb11.3} \alias{ManlyTb11.3} \title{Dist\enc{â}{a}ncias rodovi\enc{á}{a}rias} -\format{Uma matriz (13x13) com as distâncias rodoviárias entre as +\format{Uma matriz (13x13) com as distâncias rodoviárias entre as cidades da ilha Sul da Nova Zelândia.} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução. Porto Alegre, RS: Bookman (pg 182) } \description{ @@ -19,8 +19,8 @@ data(ManlyTb11.3) require(lattice) -levelplot(ManlyTb11.3, xlab = "", ylab = "", main = "Gráfico das +levelplot(ManlyTb11.3, xlab = "", ylab = "", main = "Gráfico das distâncias rodoviárias", scales = list(x = list(rot=90))) } -\keyword{EM} +\keyword{TODO} diff --git a/man/ManlyTb11.5.Rd b/man/ManlyTb11.5.Rd index ea45c372..629a059f 100644 --- a/man/ManlyTb11.5.Rd +++ b/man/ManlyTb11.5.Rd @@ -6,11 +6,11 @@ \format{Uma matriz com os números de votos discordantes entre 15 parlamentares de Nova Jersey.} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução. Porto Alegre, RS: Bookman (pg 185) } \description{ -Número de votos discordantes entre os parlamentares de +Número de votos discordantes entre os parlamentares de Nova Jersey em leis referentes a problemas ambientais } \examples{ @@ -19,8 +19,8 @@ data(ManlyTb11.5) require(lattice) -levelplot(ManlyTb11.5, xlab = "", ylab = "", main = "Gráfico das +levelplot(ManlyTb11.5, xlab = "", ylab = "", main = "Gráfico das distâncias entre parlamentares", scales = list(x = list(rot=90))) } -\keyword{EM} +\keyword{TODO} diff --git a/man/ManlyTb4.5.Rd b/man/ManlyTb4.5.Rd index 5a9332bd..2b0c497f 100644 --- a/man/ManlyTb4.5.Rd +++ b/man/ManlyTb4.5.Rd @@ -24,19 +24,19 @@ \item{\code{compptm}}{Comprimento do primeiro ao terceiro molar (mm).} \item{\code{comppqp}}{Comprimento do primeiro ao quarto pré-molar (mm).} - + \item{\code{largci}}{Largura do canino inferior (mm).} -\item{\code{sexo}}{Código para sexo, (1 para masculino, 2 para feminino +\item{\code{sexo}}{Código para sexo, (1 para masculino, 2 para feminino e caso contrário é desconhecido} }} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução. Porto Alegre, RS: Bookman (pg 67 à 69) } \description{ -Estudo em ancestrais de cães da Tailândia, +Estudo em ancestrais de cães da Tailândia, através de medições da mandíbula. } \examples{ @@ -51,13 +51,13 @@ bwplot(value ~grup | variable, data = ManlyTb4.5long, scales = c(list(relation = "free"), list(x=list(draw=FALSE))), ylab = "", main = "Boxplot de entre os grupo das medições da mandíbula", - par.settings = list( box.umbrella=list(col = c(1,2,3,4,6)), - box.dot=list(col = c(1,2,3,4,6)), + par.settings = list( box.umbrella=list(col = c(1,2,3,4,6)), + box.dot=list(col = c(1,2,3,4,6)), box.rectangle = list(col = c(1,2,3,4,6))), key = list(points = list(col=c(1,2,3,4,6), pch=19), space = "top", columns=2, - text=list(c("Caes modernos da Tailandia", "Chacais dourados", "Cuons", + text=list(c("Caes modernos da Tailandia", "Chacais dourados", "Cuons", "Lobos indianos", "Caes pre-historicos tailandeses")))) } \keyword{TS} diff --git a/man/ManlyTb6.6.Rd b/man/ManlyTb6.6.Rd index 1eb62169..60979e52 100644 --- a/man/ManlyTb6.6.Rd +++ b/man/ManlyTb6.6.Rd @@ -11,14 +11,14 @@ A figura apresentada descreve as cinco variáveis, correspondentes às dimensões das taças. \if{html}{\figure{ManlyTb6-6.jpg}{options: width="250px"}} -\if{latex}{\figure{ManlyTb6-6.jpg}{options: width=1.75in}} +\if{latex}{\figure{ManlyTb6-6.jpg}{options: width=1.75in}} }} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução. Porto Alegre, RS: Bookman (pg 101) } \description{ -Dimensões de 25 taças de cerâmicas escavadas de lugares +Dimensões de 25 taças de cerâmicas escavadas de lugares pré-históricos na Tailândia. } \examples{ @@ -26,8 +26,8 @@ pré-históricos na Tailândia. data(ManlyTb6.6) pairs(~ x1 + x2 + x3 + x4 + x5 + x6, - data = ManlyTb6.6, + data = ManlyTb6.6, main="Matriz de diapersão para as variáveis de medida das taças") } -\keyword{AnaComp} +\keyword{AnaComPrin} diff --git a/man/ManlyTb6.7.Rd b/man/ManlyTb6.7.Rd index df51bf62..e0f22e58 100644 --- a/man/ManlyTb6.7.Rd +++ b/man/ManlyTb6.7.Rd @@ -20,13 +20,13 @@ \item{\code{peixe}}{Consumo de peixe.} \item{\code{cere}}{Consumo por cereais.} - + \item{\code{carb}}{Consumo de carboidratos.} \item{\code{gnso}}{Consumo de grãos, nozes e sementes oleaginosas.} - + \item{\code{fv}}{Consumo de frutas e vegetais.} - + \item{\code{total}}{Total de consumo do país.} }} @@ -34,14 +34,14 @@ Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução. Porto Alegre, RS: Bookman (pg 103) -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados - uma introdução. Porto Alegre, RS: Bookman (pg 103) } \description{ Estimativas do consumo médio de proteínas de diferentes fontes de alimentos para os habitantes de 25 países europeus. Medida em gramas por pessoa por dia -Estimativas dos consumos médios de proteínas de diferentes -fontes de alimentos para habitantes de 25 países europeus. +Estimativas dos consumos médios de proteínas de diferentes +fontes de alimentos para habitantes de 25 países europeus. Consumos registrados em gramas por pessoa por dia. } \examples{ @@ -49,15 +49,14 @@ Consumos registrados em gramas por pessoa por dia. data(ManlyTb6.7) pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnso + fv, - data = ManlyTb6.7, + data = ManlyTb6.7, main="Matriz das variáveis de consumo de proteína") data(ManlyTb6.7) pairs(~ cv + cb + ovo + leite + peixe + cere + carb + gnso + fv, - data = ManlyTb6.7, + data = ManlyTb6.7, main="Matriz das variáveis de consumo de proteína") } -\keyword{AnaComp} -\keyword{CP} +\keyword{AnaComPrin} diff --git a/man/ManlyTb9.7.Rd b/man/ManlyTb9.7.Rd index 658aef8d..5cd632f7 100644 --- a/man/ManlyTb9.7.Rd +++ b/man/ManlyTb9.7.Rd @@ -3,7 +3,7 @@ \name{ManlyTb9.7} \alias{ManlyTb9.7} \title{Esp\enc{é}{e}cies de plantas em lotes} -\format{Um \code{data.frame} com 25 espécie de plantas com 18 +\format{Um \code{data.frame} com 25 espécie de plantas com 18 variáveis \describe{ @@ -45,14 +45,14 @@ variáveis \item{\code{l17}}{Medidas de abundância das espécies no lote 17.} }} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução. Porto Alegre, RS: Bookman (pg 152) } \description{ Estudo de 25 espécies de plantas em 17 lotes de um prado -de pastagem na Reserva Natural em Steneryd na Suécia. Cada valor na -tabela é a soma dos valores cobertos em um intervalo de 0 a 5 por -nove quadrantes de amostra, de modo que um valor 45 corresponde à +de pastagem na Reserva Natural em Steneryd na Suécia. Cada valor na +tabela é a soma dos valores cobertos em um intervalo de 0 a 5 por +nove quadrantes de amostra, de modo que um valor 45 corresponde à completa cobertura pela espécie. } \examples{ @@ -61,11 +61,11 @@ data(ManlyTb9.7) euclid <- as.matrix(dist(ManlyTb9.7[,-1])) -heatmap(euclid, - margins= c(6,6), - labRow = ManlyTb9.7$esp, +heatmap(euclid, + margins= c(6,6), + labRow = ManlyTb9.7$esp, labCol = ManlyTb9.7$esp, main = "Heatmap para a matriz de distâncias para as 25 espécies") } -\keyword{AnaClust} +\keyword{AnaAgrup} diff --git a/man/ManlyTb9.8.Rd b/man/ManlyTb9.8.Rd index c804148e..dbf8d599 100644 --- a/man/ManlyTb9.8.Rd +++ b/man/ManlyTb9.8.Rd @@ -87,20 +87,20 @@ \item{\code{obj37}}{Presença (1) ou ausência (0) do objeto 37.} \item{\code{obj38}}{Presença (1) ou ausência (0) do objeto 38.} - + }} \source{ -Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- +Manly, B. J. F. (2005). Métodos Estatísticos Multivariados- uma introdução. Porto Alegre, RS: Bookman (pg 153 e 154) } \description{ -Conjunto de dados referentes a bens de túmulos de um -cemitério em Bannadi, nordeste da Tailândia. São registros de -presença ou ausência de 38 diferentes artigos em cada um dos 46 +Conjunto de dados referentes a bens de túmulos de um +cemitério em Bannadi, nordeste da Tailândia. São registros de +presença ou ausência de 38 diferentes artigos em cada um dos 46 túmulos, com informação adicional sobre se os restos mortais eram de -um adulto masculino, feminino ou criança. Os sepultamentos estão na +um adulto masculino, feminino ou criança. Os sepultamentos estão na ordem de riqueza de diferentes bens (totais variando de 0 a 11), e os -bens estão na ordem de frequência de ocorrência (totais variando de +bens estão na ordem de frequência de ocorrência (totais variando de 1 a 18). } \examples{ @@ -109,10 +109,10 @@ data(ManlyTb9.8) matdist <- as.matrix(dist(ManlyTb9.8[,-c(1,2)], method = "binary")) ### Mapa de calor para a matriz de dissimilaridades. -heatmap(matdist, - margins= c(6,6), - labRow = ManlyTb9.8$sep, +heatmap(matdist, + margins= c(6,6), + labRow = ManlyTb9.8$sep, labCol = ManlyTb9.8$sep) } -\keyword{AnaClust} +\keyword{AnaAgrup} diff --git a/man/MingotiAnA3.Rd b/man/MingotiAnA3.Rd index acb09dad..c0cb052c 100644 --- a/man/MingotiAnA3.Rd +++ b/man/MingotiAnA3.Rd @@ -48,5 +48,5 @@ bwplot(inst~rendpc|loc, data=MingotiAnA3, } -\keyword{AnaComp} +\keyword{AnaComPrin} diff --git a/man/MingotiAnA4.Rd b/man/MingotiAnA4.Rd index ac4d4d46..c686e054 100644 --- a/man/MingotiAnA4.Rd +++ b/man/MingotiAnA4.Rd @@ -44,5 +44,5 @@ scatterplotMatrix(~ x1 + x2 + x3 + x4 | grp, data=MingotiAnA4, main = "Dispersão das variáveis de medidas para os dois grupos") } -\keyword{AnaComp} +\keyword{AnaComPrin} diff --git a/man/MingotiAnA6.Rd b/man/MingotiAnA6.Rd index 19933058..cefc0f2e 100644 --- a/man/MingotiAnA6.Rd +++ b/man/MingotiAnA6.Rd @@ -54,5 +54,5 @@ scatterplotMatrix(~ testp + testc + anexp | grupo, data=MingotiAnA6, main="Dispersão das variáveis de medidas para os dois grupos") } -\keyword{AnaComp} +\keyword{AnaComPrin} diff --git a/man/MingotiTb3.10.Rd b/man/MingotiTb3.10.Rd index 276c1a3f..c68f21e9 100644 --- a/man/MingotiTb3.10.Rd +++ b/man/MingotiTb3.10.Rd @@ -33,5 +33,5 @@ library(lattice) bwplot(peso~maq, data = MingotiTb3.10, xlab = "Máquina") } -\keyword{AnaComp} +\keyword{AnaComPrin} diff --git a/man/MingotiTb3.7.Rd b/man/MingotiTb3.7.Rd index e12e4d22..1c5d15b9 100644 --- a/man/MingotiTb3.7.Rd +++ b/man/MingotiTb3.7.Rd @@ -38,5 +38,5 @@ scatterplotMatrix(~ amst + areia + sed + arg + morg, data = MingotiTb3.7, main = "Matriz de gráficos de dispersão") } -\keyword{AnaComp} +\keyword{AnaComPrin} diff --git a/man/MingotiTb6.1.Rd b/man/MingotiTb6.1.Rd index 4fc19df5..b8156bbe 100644 --- a/man/MingotiTb6.1.Rd +++ b/man/MingotiTb6.1.Rd @@ -36,5 +36,5 @@ xyplot(renda ~ idade, ylab="Renda mensal") } -\keyword{AnaClust} +\keyword{AnaAgrup} diff --git a/man/MingotiTb6.8.Rd b/man/MingotiTb6.8.Rd index 990448be..cc94692c 100644 --- a/man/MingotiTb6.8.Rd +++ b/man/MingotiTb6.8.Rd @@ -43,5 +43,5 @@ data(MingotiTb6.8) pairs(MingotiTb6.8) } -\keyword{AnaClust} +\keyword{AnaAgrup} diff --git a/man/PaulaEg1.12.2.Rd b/man/PaulaEg1.12.2.Rd index 801f79be..f44cf806 100644 --- a/man/PaulaEg1.12.2.Rd +++ b/man/PaulaEg1.12.2.Rd @@ -12,10 +12,10 @@ \item{\code{sexo}}{Sexo do paciente (masculino, feminino).} -\item{\code{hl}}{Intensidade da célula histiócitos-linfócitos (ausente, +\item{\code{hl}}{Intensidade da célula histiócitos-linfócitos (ausente, discreta, moderada, intensa).} -\item{\code{ff}}{Intensidade da célula fibrose-frouxa (ausente, +\item{\code{ff}}{Intensidade da célula fibrose-frouxa (ausente, discreta, moderada, intensa).} }} @@ -24,7 +24,7 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Eg 1.12.2, p?g. 85) } \description{ -Um total de 175 pacientes com processo infecioso +Um total de 175 pacientes com processo infecioso pulmonar atendidos no hospital no período acima foram classificados por algumas variáveis. } @@ -35,20 +35,20 @@ data(PaulaEg1.12.2) str(PaulaEg1.12.2) library(lattice) -bwplot(idade ~ hl | tipo, +bwplot(idade ~ hl | tipo, data = PaulaEg1.12.2, ylab = "Idade", xlab = "Intensidade da célula histiócitos-linfócitos") -bwplot(idade ~ ff | tipo, +bwplot(idade ~ ff | tipo, data = PaulaEg1.12.2, ylab = "Idade", xlab = "Intensidade da célula fibrose-frouxa") - -barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl), -auto.key=list(space="top", columns=2, + +barchart(table(PaulaEg1.12.2$tipo,PaulaEg1.12.2$hl), +auto.key=list(space="top", columns=2, cex.title=1, - rectangles = TRUE, + rectangles = TRUE, points=FALSE)) } diff --git a/man/PaulaEg1.12.5.Rd b/man/PaulaEg1.12.5.Rd index cbf05dd5..ffd519fd 100644 --- a/man/PaulaEg1.12.5.Rd +++ b/man/PaulaEg1.12.5.Rd @@ -24,8 +24,8 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Eg 1.12.5, p?g. 94) } \description{ -Dados referentes ao consumo de combustível em 48 estados - norte-americanos. O interesse nesse estudo é tentar explicar o +Dados referentes ao consumo de combustível em 48 estados + norte-americanos. O interesse nesse estudo é tentar explicar o consumo de combustível com base em variáveis econômicas. } \examples{ diff --git a/man/PaulaEg1.12.6.Rd b/man/PaulaEg1.12.6.Rd index a7d05aaa..63c388c6 100644 --- a/man/PaulaEg1.12.6.Rd +++ b/man/PaulaEg1.12.6.Rd @@ -21,9 +21,9 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Eg 1.12.6, p?g. 97) } \description{ -Dados referentes ao salário anual de uma - amostra aleatória de 220 executivos (145 homens e 75 mulheres). O - salário será relacionado com as variáveis: sexo, anos de experiência +Dados referentes ao salário anual de uma + amostra aleatória de 220 executivos (145 homens e 75 mulheres). O + salário será relacionado com as variáveis: sexo, anos de experiência no cargo e posição na empresa. } \examples{ diff --git a/man/PaulaEg2.4.3.Rd b/man/PaulaEg2.4.3.Rd index 1d160f83..e87bd746 100644 --- a/man/PaulaEg2.4.3.Rd +++ b/man/PaulaEg2.4.3.Rd @@ -29,7 +29,7 @@ Dados referentes aos valores pagos de seguros individuais por danos com acidentes pessoais no período de janeiro de 1998 a junho de 1999 (18 meses). O estudo completo (Jong e Heller, 2008) contém o acompanhamento dos seguros desde - 1989. No período considerado aqui foram pagos 769 seguros, sendo + 1989. No período considerado aqui foram pagos 769 seguros, sendo armazenadas as informações: se houve representação legal, tempo operacional para pagamento e mês em que ocorreu o acidente. diff --git a/man/PaulaEg2.8.1.Rd b/man/PaulaEg2.8.1.Rd index 6d6957a7..36c9e718 100644 --- a/man/PaulaEg2.8.1.Rd +++ b/man/PaulaEg2.8.1.Rd @@ -8,7 +8,7 @@ \item{\code{semana}}{Semana da avaliação.} -\item{\code{tipo}}{Tipo de snack avaliado. Os níveis representam as +\item{\code{tipo}}{Tipo de snack avaliado. Os níveis representam as seguintes configurações: \code{A}: 22\% de gordura, 0\% de óleo de canola, \code{B}: 0\% de gordura, 22\% de óleo de canola, \code{C}: 17\% de gordura, @@ -30,8 +30,8 @@ Dados de um experimento desenvolvido pelo Departamento ácidos graxos, foram comparados ao longo de 20 semanas. Nesse novo produto a gordura vegetal hidrogenada, responsável pela fixação do aroma do produto, foi substituída, totalmente ou - parcialmente, por óleo de canola. Ao todo foram produzidas 750 - observações, referentes a 15 avaliações para cada tipo de snack + parcialmente, por óleo de canola. Ao todo foram produzidas 750 + observações, referentes a 15 avaliações para cada tipo de snack a cada 2 semanas. } \examples{ diff --git a/man/PaulaEg3.5.1.Rd b/man/PaulaEg3.5.1.Rd index 6e75a440..17de00e8 100644 --- a/man/PaulaEg3.5.1.Rd +++ b/man/PaulaEg3.5.1.Rd @@ -8,7 +8,7 @@ \describe{ \item{sexo}{Sexo do camundongo (macho = 1 e fêmea = 0).} - + \item{trat}{Identifica a presença ou não do tratamento (sim = 1 e não = 0).} \item{casos}{Número inteiro que identifica a quantidade de casos @@ -18,15 +18,15 @@ }} \source{ -Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Eg 3.5.1 pág. 201) } \description{ Dados de um experimento realizado para avaliar - o possível efeito cancerígeno do fungicida Avadex. Foram utilizados - 403 camundongos. Desses, 65 receberam o fungicida e foram acompanhados - durante 85 semanas, verificando-se o desenvolvimento ou não de tumor - cancerígeno. Os demais animais não receberam o fungicida (grupo controle) + o possível efeito cancerígeno do fungicida Avadex. Foram utilizados + 403 camundongos. Desses, 65 receberam o fungicida e foram acompanhados + durante 85 semanas, verificando-se o desenvolvimento ou não de tumor + cancerígeno. Os demais animais não receberam o fungicida (grupo controle) e também foram acompanhados pelo mesmo período. } \examples{ @@ -38,11 +38,11 @@ data(PaulaEg3.5.1) barchart(casos/exp ~ trat | sexo, data = PaulaEg3.5.1, xlab="Grupo", ylab="Proporção de casos", scales=list(x=list(labels=c("Controle","Tratado"))), - strip=strip.custom(var.name="Sexo", + strip=strip.custom(var.name="Sexo", factor.levels=c(" Fêmea", "Macho"), - strip.levels=rep(TRUE,2)), + strip.levels=rep(TRUE,2)), main="Associação entre fungicida e desenvolvimento de tumor") } -\keyword{GLM} +\keyword{MLG} \keyword{binarios} diff --git a/man/PaulaEg3.5.2.Rd b/man/PaulaEg3.5.2.Rd index d513e8b0..945658d9 100644 --- a/man/PaulaEg3.5.2.Rd +++ b/man/PaulaEg3.5.2.Rd @@ -10,19 +10,19 @@ \item{dose}{Dose de extrato vegetal aplicada (em partes por milhão).} \item{emb}{Número observado de embriões mortos.} - + }} \source{ -Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Eg 3.5.2 pág. 203) } \description{ -Dados de um experimento conduzido para avaliar o efeito de - diversos extratos vegetais na mortalidade de embriões de - \emph{Biomphalaria Glabrata}. Para o extrato vegetal aquoso frio de +Dados de um experimento conduzido para avaliar o efeito de + diversos extratos vegetais na mortalidade de embriões de + \emph{Biomphalaria Glabrata}. Para o extrato vegetal aquoso frio de folhas de \emph{P. Hyrsiflora} foram consideradas 7 amostras, sendo - que em cada uma delas 50 embriões foram submetidos a uma particular - dose do extrato vegetal, registrando-se, após o vigésimo dia, o + que em cada uma delas 50 embriões foram submetidos a uma particular + dose do extrato vegetal, registrando-se, após o vigésimo dia, o número de embriões mortos. } \examples{ @@ -33,12 +33,12 @@ data(PaulaEg3.5.2) str(PaulaEg3.5.2) -barchart(emb/(sum(emb)) ~ dose, data = PaulaEg3.5.2, +barchart(emb/(sum(emb)) ~ dose, data = PaulaEg3.5.2, stack=TRUE, col= "lightblue", - xlab="Dose (em ppm)", ylab="Proporção de embriões mortos", + xlab="Dose (em ppm)", ylab="Proporção de embriões mortos", main="Efeito de extrato vegetal") } -\keyword{GLM} +\keyword{MLG} \keyword{binarios} diff --git a/man/PaulaEg3.6.11a.Rd b/man/PaulaEg3.6.11a.Rd index e72afba9..61be2768 100644 --- a/man/PaulaEg3.6.11a.Rd +++ b/man/PaulaEg3.6.11a.Rd @@ -8,21 +8,21 @@ \describe{ \item{mortos}{Quantidade observada de besouros mortos.} - + \item{exp}{Quantidade de besouros expostos a cada dose.} \item{dose}{Dose de disulfeto de carbono gasoso à qual os besouros foram expostos.} - + }} \source{ -Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Eg 3.6.11a pág. 237) } \description{ -Dados de um estudo sobre o efeito da exposição de - besouros adultos a diferentes doses de disulfeto de carbono gasoso - \emph{(CS2)}, durante cinco horas. Foram registrados os números +Dados de um estudo sobre o efeito da exposição de + besouros adultos a diferentes doses de disulfeto de carbono gasoso + \emph{(CS2)}, durante cinco horas. Foram registrados os números de besouros mortos. } \examples{ @@ -33,13 +33,13 @@ data(PaulaEg3.6.11a) str(PaulaEg3.6.11a) -xyplot(mortos/(sum(mortos)) ~ dose, data = PaulaEg3.6.11a, +xyplot(mortos/(sum(mortos)) ~ dose, data = PaulaEg3.6.11a, type = "o", - xlab = "Dose de disulfeto de carbono gasoso", - ylab = "Proporção de besouros mortos", + xlab = "Dose de disulfeto de carbono gasoso", + ylab = "Proporção de besouros mortos", main = expression("Exposição de besouros a"~CS[2])) } -\keyword{GLM} +\keyword{MLG} \keyword{binarios} diff --git a/man/PaulaEg3.6.11b.Rd b/man/PaulaEg3.6.11b.Rd index 701e73f6..02c1d03e 100644 --- a/man/PaulaEg3.6.11b.Rd +++ b/man/PaulaEg3.6.11b.Rd @@ -8,19 +8,19 @@ \describe{ \item{menst}{Número de garotas menstruando.} - + \item{entre}{Número de garotas entrevistadas.} \item{idade}{Idade media.} - + }} \source{ -Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Eg 3.6.11b pág. 241) } \description{ -Dados de um estudo em que se investigou a idade do início - da menstruação em 3918 garotas de Varsóvia. Para 25 médias de +Dados de um estudo em que se investigou a idade do início + da menstruação em 3918 garotas de Varsóvia. Para 25 médias de idade foram observadas a ocorrência ou não do início de períodos de menstruação nas adolescentes. } @@ -30,12 +30,12 @@ library(lattice) data(PaulaEg3.6.11b) - -xyplot((menst/entre) ~ idade, data = PaulaEg3.6.11b, + +xyplot((menst/entre) ~ idade, data = PaulaEg3.6.11b, type = c("p","a"), - xlab = "Idade média", - ylab = "Meninas menstruando/Entrevistadas", + xlab = "Idade média", + ylab = "Meninas menstruando/Entrevistadas", main = "Idade do início da menstruação em garotas de Varsóvia.") } -\keyword{GLM} +\keyword{MLG} diff --git a/man/PaulaEg3.6.9c.Rd b/man/PaulaEg3.6.9c.Rd index ca52b281..e7c0df3e 100644 --- a/man/PaulaEg3.6.9c.Rd +++ b/man/PaulaEg3.6.9c.Rd @@ -7,9 +7,9 @@ \describe{ -\item{pref}{Preferência do comprador por um tipo de automóvel (1 = americano, +\item{pref}{Preferência do comprador por um tipo de automóvel (1 = americano, 0 = japonês).} - + \item{idade}{Idade do comprador (em anos).} \item{sexo}{Sexo do comprador (0 = masculino; 1 = feminino).} @@ -18,14 +18,14 @@ }} \source{ -Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Eg 3.6.9c pág. 231) } \description{ Dados sobre a preferência de consumidores americanos com - relação a automóveis. Uma amostra aleatória de 263 consumidores foi - considerada. As seguintes variáveis foram observadas para cada - comprador: preferência quanto ao tipo de automóvel, idade, sexo e + relação a automóveis. Uma amostra aleatória de 263 consumidores foi + considerada. As seguintes variáveis foram observadas para cada + comprador: preferência quanto ao tipo de automóvel, idade, sexo e estado civil. } \examples{ @@ -36,13 +36,13 @@ data(PaulaEg3.6.9c) str(PaulaEg3.6.9c) -bwplot(idade ~ pref, data = PaulaEg3.6.9c, +bwplot(idade ~ pref, data = PaulaEg3.6.9c, type="p", - xlab="Preferência - Japonês e Americano", - ylab="Idade do Comprador", + xlab="Preferência - Japonês e Americano", + ylab="Idade do Comprador", main="Preferência") } -\keyword{GLM} +\keyword{MLG} \keyword{binarios} diff --git a/man/PaulaEg5.2.8a.Rd b/man/PaulaEg5.2.8a.Rd index 62e6f30b..572f7438 100644 --- a/man/PaulaEg5.2.8a.Rd +++ b/man/PaulaEg5.2.8a.Rd @@ -14,10 +14,10 @@ \item{\code{esp14}}{Número de ácaros coletados da espécie 14.} -\item{\code{placa}}{Número de partes da placa de esterco onde +\item{\code{placa}}{Número de partes da placa de esterco onde foram coletados os ácaros. (1 ou 6)} -\item{\code{posic}}{Posição na placa de esterco onde foram coletados +\item{\code{posic}}{Posição na placa de esterco onde foram coletados os ácaros (central ou lateral).} \item{\code{reg}}{Região onde a placa de esterco foi coletada (São @@ -32,12 +32,12 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Exemplo 5.2.8a, pág. 359) } \description{ -Dados de um experimento desenvolvido para estudar - a distribuição do número de ácaros em placas de esterco de gado - bovino no estado de São Paulo, obtidos por Paula e Tavares, 1992. - Essas placas são depósitos de ovos da mosca do chifre - (\emph{Haematobia irritans}), uma das pragas mais importantes da - pecuária brasileira. Os ácaros são inimigos naturais da mosca do +Dados de um experimento desenvolvido para estudar + a distribuição do número de ácaros em placas de esterco de gado + bovino no estado de São Paulo, obtidos por Paula e Tavares, 1992. + Essas placas são depósitos de ovos da mosca do chifre + (\emph{Haematobia irritans}), uma das pragas mais importantes da + pecuária brasileira. Os ácaros são inimigos naturais da mosca do chifre, uma vez que se alimentam de ovos e larvas dessas moscas. } \examples{ diff --git a/man/PaulaEg5.5.1.Rd b/man/PaulaEg5.5.1.Rd index 63d1f038..704be989 100644 --- a/man/PaulaEg5.5.1.Rd +++ b/man/PaulaEg5.5.1.Rd @@ -8,8 +8,8 @@ \item{\code{indiv}}{Identificação do indivíduo.} -\item{\code{period}}{Período de observação (1 = antes do tratamento, - 2 = primeiro período após o tratamento, 3 = segundo período após +\item{\code{period}}{Período de observação (1 = antes do tratamento, + 2 = primeiro período após o tratamento, 3 = segundo período após o tratamento e 4 = terceiro período após o tratamento).} \item{\code{seman}}{Número de semanas em cada período.} @@ -25,11 +25,11 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.1, pág. 379) } \description{ -Dados apresentados em Diggle, Liang e Zeger (1994), +Dados apresentados em Diggle, Liang e Zeger (1994), referentes a um ensaio clínico com 59 indivíduos epilépticos, aleatorizados de modo que cada um recebesse uma droga antiepiléptica (progabide) ou placebo. - Os dados de cada indivíduo consistem do número de ataques + Os dados de cada indivíduo consistem do número de ataques epilépticos num período de oito semanas antes do tratamento, além do número de ataques em cada período de duas semanas, num total de quatro períodos após o tratamento. O interesse do estudo é @@ -47,7 +47,7 @@ xyplot(ataq ~ period | trat, groups = indiv, data = PaulaEg5.5.1, type = c("p", "a"), xlab = "Período", ylab = "Número de ataques epilépticos") - + } \references{ Diggle, P. J.; Liang, K. Y. e Zeger, S. L. (1994). diff --git a/man/PaulaEg5.5.2.Rd b/man/PaulaEg5.5.2.Rd index dfce09c0..25bcecc4 100644 --- a/man/PaulaEg5.5.2.Rd +++ b/man/PaulaEg5.5.2.Rd @@ -40,7 +40,7 @@ Estudo discutido em Myers, Montgomery e Vining (2002) data(PaulaEg5.5.2) str(PaulaEg5.5.2) - + library(latticeExtra) tb <- with(PaulaEg5.5.2, table(nivel, trat, sexo, cond)) @@ -57,7 +57,7 @@ useOuterStrips( columns = 2, cex.title = 1) ) ) - + } \references{ Myers, R.H.; Montgomery, D. C.; Vining, G. G. (2002). diff --git a/man/PaulaEg5.5.3.Rd b/man/PaulaEg5.5.3.Rd index a8c4f5db..7e51b643 100644 --- a/man/PaulaEg5.5.3.Rd +++ b/man/PaulaEg5.5.3.Rd @@ -22,11 +22,11 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Exemplo 5.5.3, pág. 390) } \description{ -Dados de um ensaio clínico realizado com 109 indivíduos, +Dados de um ensaio clínico realizado com 109 indivíduos, distribuídos de forma aleatória para receberem um líquido tipo A (34 indivíduos), um líquido tipo B (36 indivíduos) ou um - líquido controle (39 indivíduos). Placas dentárias foram - avaliadas e classificadas segundo um escore no início do + líquido controle (39 indivíduos). Placas dentárias foram + avaliadas e classificadas segundo um escore no início do tratamento, após 3 e 6 meses. } \examples{ @@ -36,13 +36,13 @@ data(PaulaEg5.5.3) require(lattice) xyplot(escore ~ period | trat, groups = volunt, - xlab = 'Período', ylab = 'Escore', type = c("p", "a"), + xlab = 'Período', ylab = 'Escore', type = c("p", "a"), data = PaulaEg5.5.3) - + } \references{ -Hadgu, A. e Koch, G. (1999). Application of generalized -estimating equations to a dental randomized clinical trial. Journal +Hadgu, A. e Koch, G. (1999). Application of generalized +estimating equations to a dental randomized clinical trial. Journal of Biopharmaceutical Statistics 9, 161-178. } \keyword{quase-verossimilhança} diff --git a/man/PaulaEx1.13.20.Rd b/man/PaulaEx1.13.20.Rd index 690ee5bd..65017b9c 100644 --- a/man/PaulaEx1.13.20.Rd +++ b/man/PaulaEx1.13.20.Rd @@ -27,7 +27,7 @@ Paula, G. A. (2004). Modelos de regressão: com apoio pág. 110) } \description{ -Dados referentes a vendas de um tipo de telhado de madeira +Dados referentes a vendas de um tipo de telhado de madeira em 26 filiais de uma rede de lojas de construção. Um dos objetivos do estudo é tentar prever o número esperado de telhados vendidos dadas as demais variáveis registradas. diff --git a/man/PaulaEx2.10.7.Rd b/man/PaulaEx2.10.7.Rd index b4e08d5a..6af2016e 100644 --- a/man/PaulaEx2.10.7.Rd +++ b/man/PaulaEx2.10.7.Rd @@ -36,7 +36,7 @@ str(PaulaEx2.10.7) library(lattice) xyplot(tempo ~ volt, groups = temp, - data = PaulaEx2.10.7, + data = PaulaEx2.10.7, type = c("p", "g", "a"), auto.key = list( corner = c(0.9, 0.9), @@ -71,5 +71,5 @@ xyplot(tempo[, "C.Variação"] ~ factor(trat), Lawless, J. F. (1982). Statistical Models and Methods for Lifetime Data. John Wiley, New York. } -\keyword{positivos-assimétricos} +\keyword{positivo-assimétrico} diff --git a/man/PaulaEx3.7.14.Rd b/man/PaulaEx3.7.14.Rd index 09e7eb8a..9eb7eb52 100644 --- a/man/PaulaEx3.7.14.Rd +++ b/man/PaulaEx3.7.14.Rd @@ -19,7 +19,7 @@ t = 1,2,3,4,5.} }} \source{ Paula, G. A. (2004). Modelos de regressão: com apoio - computacional. São Paulo, SP: IME-USP. + computacional. São Paulo, SP: IME-USP. (Exercício 3.7.14, página 272) } \description{ @@ -33,18 +33,18 @@ data(PaulaEx3.7.14) PaulaEx3.7.14$temp <- as.factor(PaulaEx3.7.14$temp) -xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o", - auto.key = TRUE, xlab = "Tempos", +xyplot(nit~temp, groups = equip, data = PaulaEx3.7.14, type = "o", + auto.key = TRUE, xlab = "Tempos", ylab = "N° de equipamentos operantes", main = "Confiabilidade dos equipamentos") } \references{ -Lawless, J. F. (1982). Statistical Models and Methods for +Lawless, J. F. (1982). Statistical Models and Methods for Lifetime Data. John Wiley & Sons, New York. (Página 389) -Efron, B. (1988). Logistic regression, survival analysis, +Efron, B. (1988). Logistic regression, survival analysis, and the Kaplan-Meier curve. J. Amer. Stat. Assoc., 83. (Páginas 414-425) } -\keyword{RLAS} +\keyword{sobrevivencia} diff --git a/man/PaulaEx3.7.15.Rd b/man/PaulaEx3.7.15.Rd index c5a5b638..0fa0bb47 100644 --- a/man/PaulaEx3.7.15.Rd +++ b/man/PaulaEx3.7.15.Rd @@ -17,7 +17,7 @@ \item{\code{tesc}}{Tempo de escolaridade (em anos).} -\item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau, +\item{\code{gesc}}{Grau de escolaridade (0 = nenhum, 1 = segundo grau, 2 = técnico, 3 = universitário, 4 = mestrado, 5 = doutorado).} \item{\code{cur}}{Checkup Regular (1 = sim, 2 = não).} @@ -34,7 +34,7 @@ \item{\code{iupmen}}{Idade do último período menstrual.} -\item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada, +\item{\code{ec}}{Estado civil (1 = casada, 2 = divorciada, 3 = separada, 4 = viúva, 5 = solteira).} }} @@ -57,22 +57,22 @@ data(PaulaEx3.7.15) str(PaulaEx3.7.15) PaulaEx3.7.15 <- transform( - PaulaEx3.7.15, + PaulaEx3.7.15, PaulaEx3.7.15$est <- as.factor(PaulaEx3.7.15$est), PaulaEx3.7.15$diag <- as.factor(PaulaEx3.7.15$diag), PaulaEx3.7.15$cur <- as.factor(PaulaEx3.7.15$cur), PaulaEx3.7.15$ec <- as.factor(PaulaEx3.7.15$ec) ) # Libra para Kg -PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592 +PaulaEx3.7.15$peso <- PaulaEx3.7.15$peso*0.453592 -pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens +pairs(~ idade + diag + tesc + gesc + cur + ipg + idmens + numab + numfi + peso + idupmens + ec, - data = PaulaEx3.7.15, + data = PaulaEx3.7.15, main = "Matriz de gráficos de dispersão - tumor benigno na mama") } \references{ -Hosmer, D. W. e Lemeshow, S. (1989). +Hosmer, D. W. e Lemeshow, S. (1989). Applied Logistic Regression. John Wiley, New York. (Capítulo.7) } \keyword{RL} diff --git a/man/PaulaEx3.7.16.Rd b/man/PaulaEx3.7.16.Rd index 2c50ba66..cc0e2e6d 100644 --- a/man/PaulaEx3.7.16.Rd +++ b/man/PaulaEx3.7.16.Rd @@ -3,11 +3,11 @@ \name{PaulaEx3.7.16} \alias{PaulaEx3.7.16} \title{Experimento de toxicidade} -\format{Um \code{data.frame} com 4 variáveis. +\format{Um \code{data.frame} com 4 variáveis. \describe{ -\item{\code{conc}}{Concentração (R = rotenine, +\item{\code{conc}}{Concentração (R = rotenine, D = deguelin e M = mistura).} \item{\code{dose}}{Dose aplicada da concentração.} @@ -19,7 +19,7 @@ D = deguelin e M = mistura).} }} \source{ Paula, G. A. (2004). Modelos de regressão: com apoio - computacional. São Paulo, SP: IME-USP. + computacional. São Paulo, SP: IME-USP. (Exercício 3.7.14, pág. 274 e 275) } \description{ @@ -40,7 +40,7 @@ auto.key = TRUE, ylab = "Proporção de insetos mortos", xlab = "Dose", main = "Sobrevivência dos insetos expostos a toxina") } \references{ -Morgan, B. J. T. (1992). Analysis of Quantal Response Data. +Morgan, B. J. T. (1992). Analysis of Quantal Response Data. Chapman and Hall, London. (Página 90) } \keyword{binomial} diff --git a/man/PaulaEx3.7.19.Rd b/man/PaulaEx3.7.19.Rd index 1afbc50f..4ce207ce 100644 --- a/man/PaulaEx3.7.19.Rd +++ b/man/PaulaEx3.7.19.Rd @@ -9,7 +9,7 @@ \item{\code{idade}}{Idade (<30 anos ou +30).} -\item{\code{ncigar}}{Número de cigarros consumidos por dia +\item{\code{ncigar}}{Número de cigarros consumidos por dia (< 5 ou +5).} \item{\code{tgest}}{Tempo de gestação (<= 260 dias ou >260).} @@ -21,12 +21,12 @@ }} \source{ Paula, G. A. (2004). Modelos de regressão: com apoio - computacional. São Paulo, SP: IME-USP. + computacional. São Paulo, SP: IME-USP. (Exercício 3.7.19, página 276) } \description{ -Estudo com gestantes fumantes, no qual as participantes -foram classificadas segundo os fatores de idade, número de cigarros +Estudo com gestantes fumantes, no qual as participantes +foram classificadas segundo os fatores de idade, número de cigarros consumidos, tempo de gestação, e a condição (sobrevivência) da criança. } \examples{ @@ -35,7 +35,7 @@ data(PaulaEx3.7.19) require(vcd) -# Paciente que sobreviveram +# Paciente que sobreviveram ss <- xtabs(sobres ~ idade + ncigar + tgest, PaulaEx3.7.19) # Paciente que não sobreviveram @@ -54,7 +54,7 @@ mosaic(ns, tgest = "Tempo de gestação"))) } \references{ -Agresti A. (1990). Categorical Data Analysis. John Wiley, +Agresti A. (1990). Categorical Data Analysis. John Wiley, New York. (página 253)) } \keyword{ML} diff --git a/man/PaulaEx3.7.20.Rd b/man/PaulaEx3.7.20.Rd index a91b8e71..3697b642 100644 --- a/man/PaulaEx3.7.20.Rd +++ b/man/PaulaEx3.7.20.Rd @@ -3,13 +3,13 @@ \name{PaulaEx3.7.20} \alias{PaulaEx3.7.20} \title{Pacientes com leucemia} -\format{Um \code{data.frame} com 51 pacientes e +\format{Um \code{data.frame} com 51 pacientes e \describe{ \item{\code{idade}}{Idade do paciente (em anos).} -\item{\code{mdd}}{Mancha diferencial da doença (em porcentagem).} +\item{\code{mdd}}{Mancha diferencial da doença (em porcentagem).} \item{\code{if}}{Infiltração na medula (em porcentagem).} @@ -21,19 +21,19 @@ \item{\code{trat}}{Tratamento (1 = satisfatório, 0 = não satisfatório).} -\item{\code{tsobre}}{Tempo de sobrevivência (em meses).} +\item{\code{tsobre}}{Tempo de sobrevivência (em meses).} -\item{\code{sit}}{Situação (1 = sobrevivente, 0 = não sobrevivente).} +\item{\code{sit}}{Situação (1 = sobrevivente, 0 = não sobrevivente).} }} \source{ Paula, G. A. (2004). Modelos de regressão: com apoio - computacional. São Paulo, SP: IME-USP. + computacional. São Paulo, SP: IME-USP. (Exercício 3.7.19, página 276) } \description{ -Estudo com 51 pacientes adultos, -previamente diagnosticados com um tipo agudo de leucemia, que -receberam um tipo de tratamento sendo verificada, após certo +Estudo com 51 pacientes adultos, +previamente diagnosticados com um tipo agudo de leucemia, que +receberam um tipo de tratamento sendo verificada, após certo período, a eficiência ou não do tratamento. } \examples{ @@ -53,19 +53,19 @@ PaulaEx3.7.20 <- transform( require(car) -scatterplotMatrix(~ idade + mdd + im + cl + md + tmax + trat +scatterplotMatrix(~ idade + mdd + im + cl + md + tmax + trat + tsobre + sit, - spread = FALSE, - pch = 20, + spread = FALSE, + pch = 20, lwd = 2, - smooth = TRUE, - data = PaulaEx3.7.20, + smooth = TRUE, + data = PaulaEx3.7.20, cex = 1.5, main = "Matriz de gráficos de dispersão - Leucemia") } \references{ -Everitt, B. S. (1994). -A Handbook of Statistical Analysis using S-Plus. +Everitt, B. S. (1994). +A Handbook of Statistical Analysis using S-Plus. Chapman and Hall, London. (Página 253) } \keyword{ML} diff --git a/man/PaulaEx3.7.7a.Rd b/man/PaulaEx3.7.7a.Rd index b4d87d8f..fe3e29ac 100644 --- a/man/PaulaEx3.7.7a.Rd +++ b/man/PaulaEx3.7.7a.Rd @@ -18,9 +18,9 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Ex 3.7.7a, pág. 269) } \description{ -Experimento de dose-resposta conduzido para avaliar a +Experimento de dose-resposta conduzido para avaliar a influência dos extratos vegetais "aquoso frio de folhas", "aquoso - frio de frutos" e de um extrato químico, respectivamente, na morte + frio de frutos" e de um extrato químico, respectivamente, na morte de um determinado tipo de caramujo. } \examples{ @@ -36,7 +36,7 @@ data = PaulaEx3.7.7a, xlab = "Dose", type = c("o"), ylab = "Proporção de mortos", -auto.key = list(space="top", columns=2, +auto.key = list(space="top", columns=2, title="Caramujos", cex.title=1, lines=TRUE, points=FALSE)) diff --git a/man/PaulaEx3.7.7b.Rd b/man/PaulaEx3.7.7b.Rd index eb092ff7..f3ef5674 100644 --- a/man/PaulaEx3.7.7b.Rd +++ b/man/PaulaEx3.7.7b.Rd @@ -18,9 +18,9 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Ex 3.7.7b, pág. 269) } \description{ -Experimento de dose-resposta conduzido para avaliar a +Experimento de dose-resposta conduzido para avaliar a influência dos extratos vegetais "aquoso frio de folhas", "aquoso - frio de frutos" e de um extrato químico, respectivamente, na morte + frio de frutos" e de um extrato químico, respectivamente, na morte de um determinado tipo de caramujo. } \examples{ @@ -30,13 +30,13 @@ data(PaulaEx3.7.7b) str(PaulaEx3.7.7b) library(lattice) - + xyplot(PaulaEx3.7.7b$cmort/PaulaEx3.7.7b$cexp ~ dose, data = PaulaEx3.7.7b, xlab = "Dose", type = c("o"), ylab = "Proporção de mortos", - auto.key = list(space="top", columns=2, + auto.key = list(space="top", columns=2, title="Caramujos", cex.title=1, lines=TRUE, points=FALSE)) diff --git a/man/PaulaEx3.7.7c.Rd b/man/PaulaEx3.7.7c.Rd index 5f55199f..b0d69962 100644 --- a/man/PaulaEx3.7.7c.Rd +++ b/man/PaulaEx3.7.7c.Rd @@ -18,9 +18,9 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Ex 3.7.7c, pág. 269) } \description{ -Experimento de dose-resposta conduzido para avaliar a +Experimento de dose-resposta conduzido para avaliar a influência dos extratos vegetais "aquoso frio de folhas", "aquoso - frio de frutos" e de um extrato químico, respectivamente, na morte + frio de frutos" e de um extrato químico, respectivamente, na morte de um determinado tipo de caramujo. } \examples{ @@ -36,7 +36,7 @@ xyplot(PaulaEx3.7.7c$cmort/PaulaEx3.7.7c$cexp ~ dose, xlab = "Dose", type = c("o"), ylab = "Proporção de mortos", - auto.key = list(space="top", columns=2, + auto.key = list(space="top", columns=2, title="Caramujos", cex.title=1, lines=TRUE, points=FALSE)) diff --git a/man/PaulaEx3.7.8.Rd b/man/PaulaEx3.7.8.Rd index 85cfef05..f5371bea 100644 --- a/man/PaulaEx3.7.8.Rd +++ b/man/PaulaEx3.7.8.Rd @@ -22,8 +22,8 @@ Paula, G. A. (2004). Modelos de regressão: com apoio } \description{ Dados referentes a um experimento desenvolvido para avaliar - a germinação de um determinado tipo de semente. A tabela abaixo - apresenta o número de sementes que germinaram após cinco dias para + a germinação de um determinado tipo de semente. A tabela abaixo + apresenta o número de sementes que germinaram após cinco dias para cada 100 sementes submetidas a cada condição experimental. } \examples{ diff --git a/man/PaulaEx4.6.15.Rd b/man/PaulaEx4.6.15.Rd index eed92d6b..709cad96 100644 --- a/man/PaulaEx4.6.15.Rd +++ b/man/PaulaEx4.6.15.Rd @@ -29,8 +29,8 @@ Paula, G. A. (2004). Modelos de regressão: com apoio \description{ Dados referentes a um estudo realizado em 1990 com recrutas americanos em que a variável de interesse era o número de - infecções de ouvido. Além disso, foram coletadas as seguintes - informações sobre os recrutas: hábito de nadar, local em que + infecções de ouvido. Além disso, foram coletadas as seguintes + informações sobre os recrutas: hábito de nadar, local em que costuma nadar, idade e sexo. } \examples{ @@ -59,7 +59,7 @@ xyplot(ninfec[, "var"] ~ ninfec[, "mu"], }) library(latticeExtra) -useOuterStrips( +useOuterStrips( xyplot(ninfec ~ idade | habito + local, groups = sexo, data = PaulaEx4.6.15, diff --git a/man/PaulaEx4.6.17.Rd b/man/PaulaEx4.6.17.Rd index f160646f..68e5ec60 100644 --- a/man/PaulaEx4.6.17.Rd +++ b/man/PaulaEx4.6.17.Rd @@ -45,7 +45,7 @@ ftable(xt) plot(xt) library(latticeExtra) -useOuterStrips( +useOuterStrips( xyplot(nind ~ maciez | prefer + usom, groups = temp, data = PaulaEx4.6.17, diff --git a/man/PaulaEx4.6.20.Rd b/man/PaulaEx4.6.20.Rd index 5e91626d..e1be9310 100644 --- a/man/PaulaEx4.6.20.Rd +++ b/man/PaulaEx4.6.20.Rd @@ -9,7 +9,7 @@ \item{\code{dose}}{Dosagem de \emph{Nitrofen} aplicada, em mg/l.} \item{\code{novos}}{Número de ovos de \emph{Ceriodaphnia dubia} - eclodidos após 3 ninhadas.} + eclodidos após 3 ninhadas.} }} \source{ diff --git a/man/PaulaEx4.6.7.Rd b/man/PaulaEx4.6.7.Rd index 34d03f90..78b4064d 100644 --- a/man/PaulaEx4.6.7.Rd +++ b/man/PaulaEx4.6.7.Rd @@ -28,10 +28,10 @@ str(PaulaEx4.6.7) library(lattice) xyplot(nfalhas ~ comp, data = PaulaEx4.6.7, - type = c("p", "g", "smooth"), xlab = "Comprimento", ylab = + type = c("p", "g", "smooth"), xlab = "Comprimento", ylab = "Número de falhas") -histogram( ~nfalhas/comp, data = PaulaEx4.6.7, +histogram( ~nfalhas/comp, data = PaulaEx4.6.7, xlab = "Número de falhas por metro de tecido", ylab = "Frequência") } diff --git a/man/PaulaEx5.6.13.Rd b/man/PaulaEx5.6.13.Rd index b1cdf53a..09eec181 100644 --- a/man/PaulaEx5.6.13.Rd +++ b/man/PaulaEx5.6.13.Rd @@ -10,7 +10,7 @@ \item{\code{dia}}{Dia de aplicação (1, 2 ou 3).} -\item{\code{metod}}{Método utilizado: (1 = pincel, 2 = rolo e +\item{\code{metod}}{Método utilizado: (1 = pincel, 2 = rolo e 3 = spray.} \item{\code{mistur}}{Tipo de mistura do pigmento (1, 2, 3 ou 4).} @@ -23,10 +23,10 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Exercício 5.6.13, pág. 400) } \description{ -Um experimento foi conduzido para avaliar a dispersão - de quatro diferentes pigmentos numa pintura. O procedimento - consistiu em preparar cada mistura e aplicá-las num painel usando - três métodos diferentes. O experimento é repetido em três dias distintos +Um experimento foi conduzido para avaliar a dispersão + de quatro diferentes pigmentos numa pintura. O procedimento + consistiu em preparar cada mistura e aplicá-las num painel usando + três métodos diferentes. O experimento é repetido em três dias distintos e a resposta é a porcentagem de reflectância do pigmento. } \examples{ @@ -42,7 +42,7 @@ xyplot(reflec ~ mistur, groups = metod, auto.key = list(title = 'Método'), } \references{ Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002). -Generalized Linear Models: With Applications in Engineering and the +Generalized Linear Models: With Applications in Engineering and the Sciences. John Wiley, New York. } \keyword{quase-verossimilhança} diff --git a/man/PaulaEx5.6.14.Rd b/man/PaulaEx5.6.14.Rd index bf8db091..a5506a1b 100644 --- a/man/PaulaEx5.6.14.Rd +++ b/man/PaulaEx5.6.14.Rd @@ -25,9 +25,9 @@ computacional. São Paulo, SP: IME-USP. (Exercício 5.6.14, pág. 401) } \description{ Dados referentes a um experimento em que 30 ratos tiveram - uma condição de leucemia induzida, sendo submetidos, posteriormente, - a três drogas quimioterápicas. Foram coletadas de cada animal a - quantidade de células brancas, a quantidade de células vermelhas + uma condição de leucemia induzida, sendo submetidos, posteriormente, + a três drogas quimioterápicas. Foram coletadas de cada animal a + quantidade de células brancas, a quantidade de células vermelhas e o número de colônias de células cancerosas, em três períodos diferentes. } \examples{ @@ -38,11 +38,11 @@ data(PaulaEx5.6.14) xyplot(celucanc ~ period, groups = rato, type = c("p", "g", "a"), data = PaulaEx5.6.14) - + } \references{ Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002). -Generalized Linear Models: With Applications in Engineering and the +Generalized Linear Models: With Applications in Engineering and the Sciences. John Wiley, New York. } \keyword{quase-verossimilhança} diff --git a/man/PaulaEx5.6.15.Rd b/man/PaulaEx5.6.15.Rd index ab8ed592..2bbbf8ef 100644 --- a/man/PaulaEx5.6.15.Rd +++ b/man/PaulaEx5.6.15.Rd @@ -8,7 +8,7 @@ \item{\code{pacient}}{Identificação do paciente.} -\item{\code{period}}{Momento em que o paciente foi avaliado (1 = início +\item{\code{period}}{Momento em que o paciente foi avaliado (1 = início do mês, 2 = após 1 mês, 3 = após 2 meses e 4 = após 3 meses.} \item{\code{sexo}}{Sexo (1 = masculino e 0 = feminino).} @@ -17,7 +17,7 @@ do mês, 2 = após 1 mês, 3 = após 2 meses e 4 = após 3 meses.} \item{\code{trat}}{Tratamento aplicado placebo ou Auronofin).} -\item{\code{result}}{Avaliação do paciente classificada em +\item{\code{result}}{Avaliação do paciente classificada em bom e regular ou ruim.} }} @@ -26,10 +26,10 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Exercício 5.6.14, pág. 401) } \description{ -Ensaio clínico em que 20 pacientes com artrite +Ensaio clínico em que 20 pacientes com artrite foram aleatorizados, de modo que 10 receberam o medicamento auronofin e os outros 10 receberam placebo. São consideradas como - variáveis explicativas sexo e idade, além do tipo do tratamento. Os + variáveis explicativas sexo e idade, além do tipo do tratamento. Os pacientes foram consultados e avaliados em 4 ocasiões. } \examples{ @@ -38,19 +38,19 @@ library(lattice) data(PaulaEx5.6.15) -barchart(table(PaulaEx5.6.15$result,PaulaEx5.6.15$trat, PaulaEx5.6.15$period), - auto.key = list(space="top", - columns = 4, cex.title = 1, rectangles = TRUE, points=FALSE, +barchart(table(PaulaEx5.6.15$result,PaulaEx5.6.15$trat, PaulaEx5.6.15$period), + auto.key = list(space="top", + columns = 4, cex.title = 1, rectangles = TRUE, points=FALSE, title = "Período"), scales = list(y = list(relation = "free"), x = list(alternating = FALSE)), - horizontal = FALSE, beside = FALSE, stack = FALSE, + horizontal = FALSE, beside = FALSE, stack = FALSE, xlab = "Resultado", ylab = "Frequência absoluta") } \references{ Myers, R.H.; Montgomery, D. C. e Vining, G. G. (2002). -Generalized Linear Models: With Applications in Engineering and the +Generalized Linear Models: With Applications in Engineering and the Sciences. John Wiley, New York. } \keyword{quase-verossimilhança} diff --git a/man/PaulaTb1.9.Rd b/man/PaulaTb1.9.Rd index 937bed8b..620caa79 100644 --- a/man/PaulaTb1.9.Rd +++ b/man/PaulaTb1.9.Rd @@ -16,7 +16,7 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Tabela 1.9, pág. 88) } \description{ -Número de bactérias sobreviventes em amostras de um +Número de bactérias sobreviventes em amostras de um produto alimentício segundo o tempo de exposição do produto a uma temperatura de 300°F. } diff --git a/man/PaulaTb3.12.Rd b/man/PaulaTb3.12.Rd index 7ece9003..908b7a45 100644 --- a/man/PaulaTb3.12.Rd +++ b/man/PaulaTb3.12.Rd @@ -8,22 +8,22 @@ \describe{ \item{vol}{Logaritmo do volume de ar inspirado.} - + \item{razao}{Logaritmo da razão de ar inspirado.} \item{resp}{Ocorrência ou não de compressão de vaso (ocorrência = 1 e ausência = 0).} - + }} \source{ -Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Tb 3.12 pág. 227) } \description{ -Dados de um experimento desenvolvido para +Dados de um experimento desenvolvido para avaliar a influência da quantidade de ar inspirado na ocorrência de vaso-constrição na pele dos dedos da mão. A resposta é a ocorrência - (1) ou ausência (0) de compressão de vasos e as covariáveis são o + (1) ou ausência (0) de compressão de vasos e as covariáveis são o volume e a razão de ar inspirado. } \examples{ @@ -34,18 +34,18 @@ data(PaulaTb3.12) str(PaulaTb3.12) -bwplot(vol ~ resp, data = PaulaTb3.12, +bwplot(vol ~ resp, data = PaulaTb3.12, type=c("p","a"), xlab="Vaso-constrição", ylab="Volume de ar inspirado", - scales=list(x=list(labels=c("Ausência","Ocorrência"))), + scales=list(x=list(labels=c("Ausência","Ocorrência"))), main="Ocorrência de vaso-constrição") -bwplot(razao ~ resp, data = PaulaTb3.12, +bwplot(razao ~ resp, data = PaulaTb3.12, type=c("p","a"), xlab=" Vaso-constrição", ylab="Razão de ar inspirado", - scales=list(x=list(labels=c("Ausência","Ocorrência"))), + scales=list(x=list(labels=c("Ausência","Ocorrência"))), main="Ocorrência de vaso-constrição") } -\keyword{GLM} +\keyword{MLG} \keyword{binarios} diff --git a/man/PaulaTb3.20.Rd b/man/PaulaTb3.20.Rd index 3a698214..eec0c353 100644 --- a/man/PaulaTb3.20.Rd +++ b/man/PaulaTb3.20.Rd @@ -8,7 +8,7 @@ \describe{ \item{mortos}{Número de insetos mortos.} - + \item{exp}{Número de insetos expostos aos inseticidas.} \item{dose}{Dose aplicada dos inseticidas.} @@ -17,7 +17,7 @@ }} \source{ -Paula, G. A. (2004). Modelos de regressão: com apoio computacional. +Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Tb 3.20 pág. 246) } \description{ @@ -35,9 +35,9 @@ str(PaulaTb3.20) xyplot(mortos/(sum(mortos)) ~ dose, data = PaulaTb3.20, auto.key = TRUE, type = c("p","a"), groups= inset, - xlab = "Dose de inseticida aplicada", - ylab = "Proporção de insetos mortos", + xlab = "Dose de inseticida aplicada", + ylab = "Proporção de insetos mortos", main = "Aplicações de inseticidas") } -\keyword{GLM} +\keyword{MLG} diff --git a/man/PaulaTb3.21.Rd b/man/PaulaTb3.21.Rd index a9600e5e..2735b5ae 100644 --- a/man/PaulaTb3.21.Rd +++ b/man/PaulaTb3.21.Rd @@ -20,8 +20,8 @@ Paula, G. A. (2004). Modelos de regressão: com apoio computacional. São Paulo, SP: IME-USP. (Tb 3.21, pág. 257) } \description{ -Experimento com duas espécies de *rotifers*, um tipo - microscópio de invertebrado aquático. São apresentados pra cada +Experimento com duas espécies de *rotifers*, um tipo + microscópio de invertebrado aquático. São apresentados pra cada espécie a densidade relativa da substância, o número de *rotifers* expostos e o número de *rotifers* em suspensão. } diff --git a/man/PaulaTb4.2.Rd b/man/PaulaTb4.2.Rd index 23fbae7f..fdeb773b 100644 --- a/man/PaulaTb4.2.Rd +++ b/man/PaulaTb4.2.Rd @@ -9,7 +9,7 @@ \item{\code{nmortes}}{Número de casos de morte por câncer de pulmão.} -\item{\code{tpessoas}}{Total de anos de exposição (somado para toda a +\item{\code{tpessoas}}{Total de anos de exposição (somado para toda a amostra).} \item{\code{cmdc}}{Consumo médio diário de cigarros, dividido em diff --git a/man/PaulaTb4.9.Rd b/man/PaulaTb4.9.Rd index 794c1ceb..6ec206f0 100644 --- a/man/PaulaTb4.9.Rd +++ b/man/PaulaTb4.9.Rd @@ -11,7 +11,7 @@ \item{\code{ano}}{Fator com quatro níveis que representa o ano de fabricação do navio (entre 1960 e 1964 (\code{60-64}), entre 1965 - e 1969 (\code{65-69}), entre 1970 e 1974 (\code{70-74}) e + e 1969 (\code{65-69}), entre 1970 e 1974 (\code{70-74}) e entre 1975 e 1979 (\code{75-79})).} \item{\code{peri}}{Fator com dois níveis que representa o período de diff --git a/man/PimentelEg4.2.Rd b/man/PimentelEg4.2.Rd index 9807a18e..7d35a0bf 100644 --- a/man/PimentelEg4.2.Rd +++ b/man/PimentelEg4.2.Rd @@ -2,7 +2,7 @@ % Please edit documentation in R/Pimentel.R \name{PimentelEg4.2} \alias{PimentelEg4.2} -\title{Alimenta\enc{çã}{ca}o de porcos} +\title{Alimenta\enc{çã}{ca}o de Porcos} \format{Um \code{data.frame} com 20 observações e 2 variáveis, em que \describe{ @@ -15,8 +15,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. +PIMENTEL-GOMES (2009). } \description{ Experimento (fictício) de alimentação de porcos em que diff --git a/man/PimentelEg6.2.Rd b/man/PimentelEg6.2.Rd index db85a232..29a6818d 100644 --- a/man/PimentelEg6.2.Rd +++ b/man/PimentelEg6.2.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelEg6.2} \alias{PimentelEg6.2} -\title{Ensaio de Competi\enc{çã}{ca}o de Variedades de Cana-de-a\enc{çú}{cu}car} +\title{Ensaio de Competi\enc{çã}{ca}o de Variedades de + Cana-de-a\enc{çú}{cu}car} \format{Um \code{data.frame} com 25 observações e 4 variáveis, em que \describe{ @@ -21,8 +22,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 6.2, pág. 96) +PIMENTEL-GOMES (2009), Exemplo 6.2, pág. 96. } \description{ Experimento de competição de variedades de diff --git a/man/PimentelEg7.3.Rd b/man/PimentelEg7.3.Rd index 948842aa..da4a1bd0 100644 --- a/man/PimentelEg7.3.Rd +++ b/man/PimentelEg7.3.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelEg7.3} \alias{PimentelEg7.3} -\title{Experimento Fatorial de Aduba\enc{çã}{ca}o Mineral e com Vinha\enc{ç}{c}a} +\title{Experimento Fatorial de Aduba\enc{çã}{ca}o Mineral e com + Vinha\enc{ç}{c}a} \format{Um \code{data.frame} com 16 observações e 4 variáveis, em que \describe{ @@ -22,8 +23,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 7.3, pág. 119) +PIMENTEL-GOMES (2009), Exemplo 7.3, pág. 119. } \description{ Experimento fatorial, \eqn{2^{2}}, em que os fatores diff --git a/man/PimentelEg7.4.Rd b/man/PimentelEg7.4.Rd index ebfc999d..c8fdcb4d 100644 --- a/man/PimentelEg7.4.Rd +++ b/man/PimentelEg7.4.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelEg7.4} \alias{PimentelEg7.4} -\title{Experimento de Aduba\enc{çã}{ca}o com Torta de Filtro e Adubo Mineral} +\title{Experimento de Aduba\enc{çã}{ca}o com Torta de Filtro e Adubo + Mineral} \format{Um \code{data.frame} com 16 observações e 4 variáveis, em que \describe{ @@ -24,8 +25,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Exemplo 7.4, pág. 120) +PIMENTEL-GOMES (2009), Exemplo 7.4, pág. 120. } \description{ Experimento fatorial 2\eqn{^{2}} em que os fatores eram diff --git a/man/PimentelEx5.8.4.Rd b/man/PimentelEx5.8.4.Rd index 7513b5bf..7f17560b 100644 --- a/man/PimentelEx5.8.4.Rd +++ b/man/PimentelEx5.8.4.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelEx5.8.4} \alias{PimentelEx5.8.4} -\title{Dados de Produ\enc{çã}{ca}o de Cana-planta em Ensaio de Variedades} +\title{Dados de Produ\enc{çã}{ca}o de Cana-planta em Ensaio de + Variedades} \format{Um \code{data.frame} com 28 observações e 3 variáveis, em que \describe{ @@ -12,13 +13,12 @@ \item{\code{variedade}}{Fator de 7 níveis qualitativos, que são as variedades cana-de-açúcar.} - + \item{\code{prod}}{Dados de produção de cana-planta.} }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. +PIMENTEL-GOMES (2009). } \description{ Experimento em blocos casualizados realizado pela diff --git a/man/PimentelEx5.8.5.Rd b/man/PimentelEx5.8.5.Rd index 58ecd069..63ea7ae4 100644 --- a/man/PimentelEx5.8.5.Rd +++ b/man/PimentelEx5.8.5.Rd @@ -12,13 +12,12 @@ \item{\code{variedade}}{Fator de 6 níveis qualitativos, que são os diferentes tipos de mandioca.} - + \item{\code{prod}}{Produção de mandioca, em t ha\eqn{^{-1}}.} }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. +PIMENTEL-GOMES (2009). } \description{ Experimento em blocos ao acaso, realizado pelo Instituto diff --git a/man/PimentelEx6.6.3.Rd b/man/PimentelEx6.6.3.Rd index baa9671c..8140bf22 100644 --- a/man/PimentelEx6.6.3.Rd +++ b/man/PimentelEx6.6.3.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelEx6.6.3} \alias{PimentelEx6.6.3} -\title{Efeito da Idade de Castra\enc{çã}{ca}o no Ganho de Peso de Su\enc{í}{i}nos} +\title{Efeito da Idade de Castra\enc{çã}{ca}o no Ganho de Peso de + Su\enc{í}{i}nos} \format{Um \code{data.frame} com 16 observações e 4 variáveis, em que \describe{ @@ -24,8 +25,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Exercício 6.6.3, página 110) +PIMENTEL-GOMES (2009), Exercício 6.6.3, página 110. } \description{ Ensaio de alimentação de suínos, no qual foi usado um diff --git a/man/PimentelPg142.Rd b/man/PimentelPg142.Rd index 44d26d90..dd3c022b 100644 --- a/man/PimentelPg142.Rd +++ b/man/PimentelPg142.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelPg142} \alias{PimentelPg142} -\title{Grupo de Experimentos Fatoriais de Aduba\enc{çã}{ca}o de Algod\enc{ã}{a}o} +\title{Grupo de Experimentos Fatoriais de Aduba\enc{çã}{ca}o de + Algod\enc{ã}{a}o} \format{Um \code{data.frame} com 100 observações e 6 variáveis, em que @@ -32,8 +33,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Página 142) +PIMENTEL-GOMES (2009), página 142. } \description{ Grupo de experimentos de adubação de algodão, todos em diff --git a/man/PimentelPg267.Rd b/man/PimentelPg267.Rd index 71083216..f209d261 100644 --- a/man/PimentelPg267.Rd +++ b/man/PimentelPg267.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelPg267} \alias{PimentelPg267} -\title{Percentual de Sorgo na Ra\enc{çã}{ca}o para Desenvolvimento de Pintos} +\title{Percentual de Sorgo na Ra\enc{çã}{ca}o para Desenvolvimento de + Pintos} \format{Um \code{data.frame} com 16 observações e 4 variáveis, em que \describe{ diff --git a/man/PimentelPg269.Rd b/man/PimentelPg269.Rd index a58c5776..20205c5d 100644 --- a/man/PimentelPg269.Rd +++ b/man/PimentelPg269.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelPg269} \alias{PimentelPg269} -\title{Influ\enc{ê}{e}ncia da Case\enc{í}{i}na Iodada na Nutri\enc{çã}{ca}o de Vacas Leiteiras} +\title{Influ\enc{ê}{e}ncia da Case\enc{í}{i}na Iodada na + Nutri\enc{çã}{ca}o de Vacas Leiteiras} \format{Um \code{data.frame} com 12 observações e 3 variáveis, em que \describe{ @@ -20,10 +21,9 @@ A observação da testemunha (0 de caseina) no bloco 3 foi perdida. O valor correspondente foi estimado por métodos de imputação de - parcela perdida discutido na seção 5.4 de Pimentel-Gomes (2009).} + parcela perdida discutido na seção 5.4 de PIMENTEL-GOMES (2009).} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Página 269) +PIMENTEL-GOMES (2009), página 269. } \description{ Ensaio realizado pelo Departamento de Produção Animal da diff --git a/man/PimentelPg382.Rd b/man/PimentelPg382.Rd index 094f7e84..99fc1d99 100644 --- a/man/PimentelPg382.Rd +++ b/man/PimentelPg382.Rd @@ -19,8 +19,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Página 382) +PIMENTEL-GOMES (2009), página 382. } \description{ Experimento com 3 métodos de enxertia em que haviam 200 diff --git a/man/PimentelPg72.Rd b/man/PimentelPg72.Rd index 6f6007b9..2bc8654e 100644 --- a/man/PimentelPg72.Rd +++ b/man/PimentelPg72.Rd @@ -7,16 +7,15 @@ \describe{ -\item{\code{feno}}{Fator de 2 níveis qualitativos, que são os diferentes - tipos de feno.} +\item{\code{feno}}{Fator de 2 níveis qualitativos, que são os + diferentes tipos de feno.} \item{\code{ganhopeso}}{Aumento do peso das leitoas, observado em quilogramas.} }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. +PIMENTEL-GOMES (2009). } \description{ Experimento realizado pelos técnicos Manoel Becker, Luís diff --git a/man/PimentelPg91.Rd b/man/PimentelPg91.Rd index ad93e210..ed414d43 100644 --- a/man/PimentelPg91.Rd +++ b/man/PimentelPg91.Rd @@ -12,14 +12,13 @@ \item{\code{bloco}}{Fator de 6 níveis qualitativos, usado para controle local.} - + \item{\code{prod}}{Produção de milho, em kg por parcela de 200\eqn{m^{2}}.} }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. +PIMENTEL-GOMES (2009). } \description{ Experimento em blocos casualizados realizado pelo diff --git a/man/PimentelTb10.3.1.Rd b/man/PimentelTb10.3.1.Rd index 2919a9c9..202decfe 100644 --- a/man/PimentelTb10.3.1.Rd +++ b/man/PimentelTb10.3.1.Rd @@ -22,8 +22,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 10.3.1, pág. 190) +PIMENTEL-GOMES (2009), Tabela 10.3.1, pág. 190. } \description{ Experimento em blocos imcompletos equilibrados, no qual diff --git a/man/PimentelTb10.4.1.Rd b/man/PimentelTb10.4.1.Rd index ad561d82..91917efb 100644 --- a/man/PimentelTb10.4.1.Rd +++ b/man/PimentelTb10.4.1.Rd @@ -21,8 +21,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 10.4.1, pág. 192) +PIMENTEL-GOMES (2009), Tabela 10.4.1, pág. 192. } \description{ Experimento em blocos imcompletos equilibrados, no qual diff --git a/man/PimentelTb10.6.1.Rd b/man/PimentelTb10.6.1.Rd index 3459ea59..6e7d2076 100644 --- a/man/PimentelTb10.6.1.Rd +++ b/man/PimentelTb10.6.1.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb10.6.1} \alias{PimentelTb10.6.1} -\title{Experimento do Tipo III com recupera\enc{çã}{ca}o da informa\enc{çã}{ca}o - interblocos} +\title{Experimento do Tipo III com recupera\enc{çã}{ca}o da + informa\enc{çã}{ca}o interblocos} \format{Um \code{data.frame} com 52 observações e 3 variáveis, em que \describe{ diff --git a/man/PimentelTb11.3.1.Rd b/man/PimentelTb11.3.1.Rd index 286e9cee..f73cad1f 100644 --- a/man/PimentelTb11.3.1.Rd +++ b/man/PimentelTb11.3.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb11.3.1} \alias{PimentelTb11.3.1} -\title{Experimento de Produ\enc{çã}{ca}o de Milho em L\enc{á}{a}tice Quadrado} +\title{Experimento de Produ\enc{çã}{ca}o de Milho em L\enc{á}{a}tice + Quadrado} \format{Um \code{data.frame} com 48 observações e 4 variáveis, em que \describe{ diff --git a/man/PimentelTb12.2.1.Rd b/man/PimentelTb12.2.1.Rd index 61f83270..dd638881 100644 --- a/man/PimentelTb12.2.1.Rd +++ b/man/PimentelTb12.2.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb12.2.1} \alias{PimentelTb12.2.1} -\title{Experimento de Aduba\enc{çã}{ca}o com P\eqn{_2}O\eqn{_5} em Milho} +\title{Experimento de Aduba\enc{çã}{ca}o com P\eqn{_2}O\eqn{_5} em + Milho} \format{Um \code{data.frame} com 20 observações e 3 variáveis, em que \describe{ diff --git a/man/PimentelTb12.3.1.Rd b/man/PimentelTb12.3.1.Rd index 345c417b..efbf5d34 100644 --- a/man/PimentelTb12.3.1.Rd +++ b/man/PimentelTb12.3.1.Rd @@ -15,8 +15,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 12.3.1, pág. 236) +PIMENTEL-GOMES (2009), Tabela 12.3.1, pág. 236. } \description{ Série de 15 anos das temperaturas máximas médias de diff --git a/man/PimentelTb12.4.1.Rd b/man/PimentelTb12.4.1.Rd index 4aa9f836..9d6ed611 100644 --- a/man/PimentelTb12.4.1.Rd +++ b/man/PimentelTb12.4.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb12.4.1} \alias{PimentelTb12.4.1} -\title{Produ\enc{çã}{ca}o de Cana em Fun\enc{çã}{ca}o do Teor de K do Solo} +\title{Produ\enc{çã}{ca}o de Cana em Fun\enc{çã}{ca}o do Teor de K do + Solo} \format{Um \code{data.frame} com 15 observações e 2 variáveis, em que \describe{ @@ -14,8 +15,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 12.4.1, pág. 238) +PIMENTEL-GOMES (2009), Tabela 12.4.1, pág. 238. } \description{ Experimento de produção de cana-de-açúcar em função do diff --git a/man/PimentelTb13.5.1.Rd b/man/PimentelTb13.5.1.Rd index d1dfd363..3a5e1fdf 100644 --- a/man/PimentelTb13.5.1.Rd +++ b/man/PimentelTb13.5.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb13.5.1} \alias{PimentelTb13.5.1} -\title{Grupo de Experimentos de Aduba\enc{çã}{ca}o de Cana-de-a\enc{çú}{cu}car} +\title{Grupo de Experimentos de Aduba\enc{çã}{ca}o de + Cana-de-a\enc{çú}{cu}car} \format{Um \code{data.frame} com 228 observações e 4 variáveis, em que @@ -22,8 +23,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 13.5.1, pág. 259) +PIMENTEL-GOMES (2009), Tabela 13.5.1, pág. 259. } \description{ Conjunto de 38 ensaios fatoriais de \eqn{3^{3}} com N, P diff --git a/man/PimentelTb14.4.1.Rd b/man/PimentelTb14.4.1.Rd index ab692a8d..c3de87d0 100644 --- a/man/PimentelTb14.4.1.Rd +++ b/man/PimentelTb14.4.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb14.4.1} \alias{PimentelTb14.4.1} -\title{Produ\enc{çã}{ca}o de Leite em um Ensaio de Alimenta\enc{çã}{ca}o de Vacas} +\title{Produ\enc{çã}{ca}o de Leite em um Ensaio de + Alimenta\enc{çã}{ca}o de Vacas} \format{Um \code{data.frame} com 36 observações e 5 variáveis, em que \describe{ @@ -26,8 +27,7 @@ utilizado como linhas do quadrado latino de 3 \eqn{\times} 3. Ao todo }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.4.1, pág. 272) +PIMENTEL-GOMES (2009), Tabela 14.4.1, pág. 272. } \description{ Experimento de nutrição de vacas, conduzido em períodos @@ -55,5 +55,5 @@ xyplot(prod ~ trat, xlab = "Tratamento de alimentação") } -\keyword{SQL} +\keyword{DQL} diff --git a/man/PimentelTb14.5.1.Rd b/man/PimentelTb14.5.1.Rd index 07e4dd03..3152170f 100644 --- a/man/PimentelTb14.5.1.Rd +++ b/man/PimentelTb14.5.1.Rd @@ -27,8 +27,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.5.1, pág. 278) +PIMENTEL-GOMES (2009), Tabela 14.5.1, pág. 278. } \description{ Experimento de reversão (switch-back) avaliando a diff --git a/man/PimentelTb14.7.1.Rd b/man/PimentelTb14.7.1.Rd index 36205ca2..b3e5d56d 100644 --- a/man/PimentelTb14.7.1.Rd +++ b/man/PimentelTb14.7.1.Rd @@ -23,8 +23,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 14.7.1, pág. 283) +PIMENTEL-GOMES (2009), Tabela 14.7.1, pág. 283. Pimentel-Gomes, F.; Nunes, S. G.; Gomes, M. de B; Curvo, J. B. E. Modificação na análise de variância de ensaions de diff --git a/man/PimentelTb16.2.1.Rd b/man/PimentelTb16.2.1.Rd index a7398efd..582b3254 100644 --- a/man/PimentelTb16.2.1.Rd +++ b/man/PimentelTb16.2.1.Rd @@ -21,8 +21,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 16.2.1, pág. 300) +PIMENTEL-GOMES (2009), Tabela 16.2.1, pág. 300. } \description{ Ensaio de controle de pragas do feijoeiro, realizado diff --git a/man/PimentelTb16.3.1.Rd b/man/PimentelTb16.3.1.Rd index ca170377..91722544 100644 --- a/man/PimentelTb16.3.1.Rd +++ b/man/PimentelTb16.3.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb16.3.1} \alias{PimentelTb16.3.1} -\title{Suscetibilidade de Variedades de Soja ao Ataque de Nemat\enc{ó}{o}ides} +\title{Suscetibilidade de Variedades de Soja ao Ataque de + Nemat\enc{ó}{o}ides} \format{Um \code{data.frame} com 60 observações e 4 variáveis, em que \describe{ @@ -21,8 +22,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 16.3.1, pág. 306) +PIMENTEL-GOMES (2009), Tabela 16.3.1, pág. 306. } \description{ Experimento de Arruda (1952), em blocos casualizados, em diff --git a/man/PimentelTb17.3.1.Rd b/man/PimentelTb17.3.1.Rd index 80a48449..dac2cb26 100644 --- a/man/PimentelTb17.3.1.Rd +++ b/man/PimentelTb17.3.1.Rd @@ -22,8 +22,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 17.3.1, pág. 317) +PIMENTEL-GOMES (2009), Tabela 17.3.1, pág. 317. } \description{ Grupo de dois experimentos com espécies de eucaliptos diff --git a/man/PimentelTb17.4.1.Rd b/man/PimentelTb17.4.1.Rd index 135a3538..b0165794 100644 --- a/man/PimentelTb17.4.1.Rd +++ b/man/PimentelTb17.4.1.Rd @@ -20,8 +20,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 17.4.1, pág. 322) +PIMENTEL-GOMES (2009), Tabela 17.4.1, pág. 322. } \description{ Grupo de dois ensaios com variedades de cana-de-açúcar, diff --git a/man/PimentelTb18.2.1.Rd b/man/PimentelTb18.2.1.Rd index 5e7dd779..d650001e 100644 --- a/man/PimentelTb18.2.1.Rd +++ b/man/PimentelTb18.2.1.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb18.2.1} \alias{PimentelTb18.2.1} -\title{Ensaio Fatorial com Tratamentos Adicionais de Aduba\enc{çã}{ca}o de - Milho} +\title{Ensaio Fatorial com Tratamentos Adicionais de + Aduba\enc{çã}{ca}o de Milho} \format{Um \code{data.frame} com 42 observações e 8 variáveis, em que \describe{ @@ -38,8 +38,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 18.2.1, pág. 330) +PIMENTEL-GOMES (2009), Tabela 18.2.1, pág. 330. } \description{ Ensaio de adubação NPK de milho, fatorial de diff --git a/man/PimentelTb20.2.1.Rd b/man/PimentelTb20.2.1.Rd index 885d3a69..5d6da647 100644 --- a/man/PimentelTb20.2.1.Rd +++ b/man/PimentelTb20.2.1.Rd @@ -18,8 +18,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 20.2.1, pág. 369) +PIMENTEL-GOMES (2009), Tabela 20.2.1, pág. 369. } \description{ Ensaio fatorial, de \eqn{3^{2}}, de adubação de diff --git a/man/PimentelTb21.5.1.Rd b/man/PimentelTb21.5.1.Rd index 3d0fe035..43203402 100644 --- a/man/PimentelTb21.5.1.Rd +++ b/man/PimentelTb21.5.1.Rd @@ -15,8 +15,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 21.5.1, pág. 384) +PIMENTEL-GOMES (2009), Tabela 21.5.1, pág. 384. } \description{ Ensaio inteiramente casualizado para avaliar a diff --git a/man/PimentelTb5.3.1.Rd b/man/PimentelTb5.3.1.Rd index b108ac18..e64f0128 100644 --- a/man/PimentelTb5.3.1.Rd +++ b/man/PimentelTb5.3.1.Rd @@ -19,8 +19,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. +PIMENTEL-GOMES (2009). } \description{ Pesquisa sobre o efeito do óleo de milho no teor de diff --git a/man/PimentelTb6.3.1.Rd b/man/PimentelTb6.3.1.Rd index dbb04d6b..c978e8c8 100644 --- a/man/PimentelTb6.3.1.Rd +++ b/man/PimentelTb6.3.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb6.3.1} \alias{PimentelTb6.3.1} -\title{Experimento de Aduba\enc{çã}{ca}o Mineral e Verde em Cana-de-a\enc{çú}{cu}car} +\title{Experimento de Aduba\enc{çã}{ca}o Mineral e Verde em + Cana-de-a\enc{çú}{cu}car} \format{Um \code{data.frame} com 36 observações e 4 variáveis, em que \describe{ @@ -27,8 +28,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 6.3.1, página 99) +PIMENTEL-GOMES (2009), Tabela 6.3.1, página 99. } \description{ Experimento de adubação de cana da Usina Monte Alegre, diff --git a/man/PimentelTb7.2.1.Rd b/man/PimentelTb7.2.1.Rd index 04d95d9c..a48d31ea 100644 --- a/man/PimentelTb7.2.1.Rd +++ b/man/PimentelTb7.2.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb7.2.1} \alias{PimentelTb7.2.1} -\title{Experimento Fatorial Sobre Aduba\enc{çã}{ca}o NPK na Produ\enc{çã}{ca}o de Milho} +\title{Experimento Fatorial Sobre Aduba\enc{çã}{ca}o NPK na + Produ\enc{çã}{ca}o de Milho} \format{Um \code{data.frame} com 32 observações e 5 variáveis, em que \describe{ @@ -23,8 +24,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 7.2.1, página 115) +PIMENTEL-GOMES (2009), Tabela 7.2.1, página 115. } \description{ Resultados da produção de milho em um experimento diff --git a/man/PimentelTb7.6.1.Rd b/man/PimentelTb7.6.1.Rd index cf0d2013..621d8e0d 100644 --- a/man/PimentelTb7.6.1.Rd +++ b/man/PimentelTb7.6.1.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb7.6.1} \alias{PimentelTb7.6.1} -\title{Experimento Fatorial Com Confunfimento de Aduba\enc{çã}{ca}o em - Cana-de-a\enc{çú}{cu}car} +\title{Experimento Fatorial Com Confunfimento de Aduba\enc{çã}{ca}o + em Cana-de-a\enc{çú}{cu}car} \format{Um \code{data.frame} com 54 observações e 6 variáveis, em que \describe{ @@ -28,8 +28,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 7.6.1, pág. 126) +PIMENTEL-GOMES (2009), Tabela 7.6.1, pág. 126. Straus, F. Esperimentos de adubação na zona canavieira de Pernambuco. In: Terceira Reunião Brasileira de Ciência do diff --git a/man/PimentelTb7.8.1.Rd b/man/PimentelTb7.8.1.Rd index fcdd20c2..12ede0fc 100644 --- a/man/PimentelTb7.8.1.Rd +++ b/man/PimentelTb7.8.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb7.8.1} \alias{PimentelTb7.8.1} -\title{Acidez de Variedades de Mangas em Fun\enc{çã}{ca}o da \enc{É}{E}poca} +\title{Acidez de Variedades de Mangas em Fun\enc{çã}{ca}o da + \enc{É}{E}poca} \format{Um \code{data.frame} com 54 observações e 4 variáveis, em que \describe{ diff --git a/man/PimentelTb8.3.1.Rd b/man/PimentelTb8.3.1.Rd index b11e8086..02397805 100644 --- a/man/PimentelTb8.3.1.Rd +++ b/man/PimentelTb8.3.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb8.3.1} \alias{PimentelTb8.3.1} -\title{Grupo de Ensaios de Batatinha na Prov\enc{í}{i}ncia de Buenos Aires} +\title{Grupo de Ensaios de Batatinha na Prov\enc{í}{i}ncia de Buenos + Aires} \format{Um \code{data.frame} com 56 observações e 3 variáveis, em que \describe{ @@ -26,8 +27,7 @@ O atributo \code{qmr} é um vetor com os quadrados médios residuais da dados individuais está em \code{\link{PimentelEg5.2}}, que refere-se ao experimento número 3 com todas as observações.} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 8.3.1, pág. 147) +PIMENTEL-GOMES (2009), Tabela 8.3.1, pág. 147. } \description{ Grupo de ensaios de competição de variedades de diff --git a/man/PimentelTb9.2.1.Rd b/man/PimentelTb9.2.1.Rd index d8c6036d..b8e819c5 100644 --- a/man/PimentelTb9.2.1.Rd +++ b/man/PimentelTb9.2.1.Rd @@ -22,8 +22,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 9.2.1, pág. 166) +PIMENTEL-GOMES (2009), Tabela 9.2.1, pág. 166. } \description{ Experimento com 8 tratamentos (7 adubos verdes e milho) diff --git a/man/PimentelTb9.3.1.Rd b/man/PimentelTb9.3.1.Rd index fbe77c53..fb8c51b5 100644 --- a/man/PimentelTb9.3.1.Rd +++ b/man/PimentelTb9.3.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Pimentel.R \name{PimentelTb9.3.1} \alias{PimentelTb9.3.1} -\title{Experimento de Aduba\enc{çã}{ca}o de Variedades de Cana-de-a\enc{çú}{cu}car} +\title{Experimento de Aduba\enc{çã}{ca}o de Variedades de + Cana-de-a\enc{çú}{cu}car} \format{Um \code{data.frame} com 50 observações e 5 variáveis, em que \describe{ diff --git a/man/PimentelTb9.4.1.Rd b/man/PimentelTb9.4.1.Rd index 74be5d9c..57bab13f 100644 --- a/man/PimentelTb9.4.1.Rd +++ b/man/PimentelTb9.4.1.Rd @@ -18,8 +18,7 @@ }} \source{ -Pimentel-Gomes, F. (2009). Curso de Estatística Experimental - (15th ed.). Piracicaba, SP: FEALQ. (Tabela 9.4.1, pág. 175) +PIMENTEL-GOMES (2009), Tabela 9.4.1, pág. 175. } \description{ Experimento que mediu o grau brix de frutos de 5 diff --git a/man/RamalhoEg11.10.Rd b/man/RamalhoEg11.10.Rd index 6874ce24..84499da1 100644 --- a/man/RamalhoEg11.10.Rd +++ b/man/RamalhoEg11.10.Rd @@ -20,13 +20,11 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (pág. 181) +RAMALHO et al. (2005), pág. 181. } \description{ -Experimento da avaliação da produção de 40 cultivares de sorgo - conduzido no delineamento alfa-látice. +Experimento da avaliação da produção de 40 cultivares de + sorgo conduzido no delineamento alfa-látice. } \examples{ diff --git a/man/RamalhoEg11.13.Rd b/man/RamalhoEg11.13.Rd index 6015c119..01dd0593 100644 --- a/man/RamalhoEg11.13.Rd +++ b/man/RamalhoEg11.13.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEg11.13} \alias{RamalhoEg11.13} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Diferentes Popula\enc{çõ}{co}es} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Diferentes + Popula\enc{çõ}{co}es} \format{Um \code{data.frame} com 48 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exemplo 11.13, pág. 188) +RAMALHO et al. (2005), Exemplo 11.13, pág. 188. } \description{ Experimento envolvendo populações de milho no diff --git a/man/RamalhoEg11.4.Rd b/man/RamalhoEg11.4.Rd index cc89f8f6..9da24b7d 100644 --- a/man/RamalhoEg11.4.Rd +++ b/man/RamalhoEg11.4.Rd @@ -17,9 +17,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (pág. 171) +RAMALHO et al. (2005), pág. 171. } \description{ Experimento conduzido na EMBRAPA Milho e Sorgo em 1997, diff --git a/man/RamalhoEg12.10.Rd b/man/RamalhoEg12.10.Rd index a7e5c6b2..a86ddc9a 100644 --- a/man/RamalhoEg12.10.Rd +++ b/man/RamalhoEg12.10.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEg12.10} \alias{RamalhoEg12.10} -\title{Ensaio Dialelo para o Tempo At\enc{é}{e} o Florescimento do Feijoeiro} +\title{Ensaio Dialelo para o Tempo At\enc{é}{e} o Florescimento do + Feijoeiro} \format{Um \code{data.frame} com 9 observações e 3 variáveis, em que \describe{ @@ -16,9 +17,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exemplo 12.10, pág. 227) +RAMALHO et al. (2005), Exemplo 12.10, pág. 227. Arriel, E., Ramalho, M. A. P., Pacheco, C. A. P. Expected and Realized Gains in the CMS-39 Maize Population after three Cycles diff --git a/man/RamalhoEg13.2.Rd b/man/RamalhoEg13.2.Rd index af3cdcf2..2be9840f 100644 --- a/man/RamalhoEg13.2.Rd +++ b/man/RamalhoEg13.2.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEg13.2} \alias{RamalhoEg13.2} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em Cons\enc{ó}{o}rcio com Feij\enc{ã}{a}o.} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Milho em + Cons\enc{ó}{o}rcio com Feij\enc{ã}{a}o.} \format{Um \code{data.frame} com 36 observações e 5 variáveis, em que \describe{ @@ -22,9 +23,7 @@ de milho.} }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exemplo 13.2, pág. 237) +RAMALHO et al. (2005), Exemplo 13.2, pág. 237. Rezende, G. D. S. P.; Ramalho, M. A. P. Competitive Ability of Maize and Commom Bean (Phaseolus Vulgaris L.) Cultivars diff --git a/man/RamalhoEg4.3.Rd b/man/RamalhoEg4.3.Rd index 4b266c68..f32511d6 100644 --- a/man/RamalhoEg4.3.Rd +++ b/man/RamalhoEg4.3.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEg4.3} \alias{RamalhoEg4.3} -\title{Porcentagem de absor\enc{çã}{ca}o de \enc{á}{a}gua de feij\enc{ã}{a}o} +\title{Porcentagem de absor\enc{çã}{ca}o de \enc{á}{a}gua de + feij\enc{ã}{a}o} \format{Um \code{data.frame} com 30 observações e 3 variáveis, em que \describe{ @@ -18,9 +19,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (Exemplo 4.3, pág 56) +RAMALHO et al. (2005), Exemplo 4.3, pág 56. } \description{ Experimento conduzido na Universidade Federal de Lavras, diff --git a/man/RamalhoEg4.7.Rd b/man/RamalhoEg4.7.Rd index c463ad4a..316b64b4 100644 --- a/man/RamalhoEg4.7.Rd +++ b/man/RamalhoEg4.7.Rd @@ -16,9 +16,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (pg 62) +RAMALHO et al. (2005), pág. 62. } \description{ Experimento da produção de grãos na avaliação de diff --git a/man/RamalhoEg7.8.Rd b/man/RamalhoEg7.8.Rd index a185c0cf..2786da0a 100644 --- a/man/RamalhoEg7.8.Rd +++ b/man/RamalhoEg7.8.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEg7.8} \alias{RamalhoEg7.8} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Cruzamentos Feij\enc{ã}{a}o} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Cruzamentos + Feij\enc{ã}{a}o} \format{Um \code{data.frame} com 240 observações e 4 variáveis, em que @@ -21,9 +22,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (Exemplo 7.8, pág 110). +RAMALHO et al. (2005), Exemplo 7.8, pág. 110. } \description{ Experimento referente à produção de grãos de feijão diff --git a/man/RamalhoEg8.1.Rd b/man/RamalhoEg8.1.Rd index 989ca297..f44c4c52 100644 --- a/man/RamalhoEg8.1.Rd +++ b/man/RamalhoEg8.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEg8.1} \alias{RamalhoEg8.1} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os em Cultivares de Feij\enc{ã}{a}o} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os em Cultivares de + Feij\enc{ã}{a}o} \format{Um \code{data.frame} com 60 observações e 4 variáveis, em que \describe{ @@ -21,9 +22,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exemplo 8.1, pág. 115) +RAMALHO et al. (2005), Exemplo 8.1, pág. 115. } \description{ Experimentos para medir a produção de grãos de diff --git a/man/RamalhoEg8.8.Rd b/man/RamalhoEg8.8.Rd index 54aafef8..80a606d4 100644 --- a/man/RamalhoEg8.8.Rd +++ b/man/RamalhoEg8.8.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEg8.8} \alias{RamalhoEg8.8} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o de Popula\enc{çõ}{co}es Segregantes} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o de + Popula\enc{çõ}{co}es Segregantes} \format{Um \code{data.frame} com 72 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Tabela 8.8, pág. 123) +RAMALHO et al. (2005), Tabela 8.8, pág. 123. Corte, H. R., Ramalho, M. A. P., Gonçalves, F. M. A., Abreu. A de F. B. Natural Selection for Grain Yield in Dry Bean Population diff --git a/man/RamalhoEx1.7.Rd b/man/RamalhoEx1.7.Rd index d14e0267..59d4a22b 100644 --- a/man/RamalhoEx1.7.Rd +++ b/man/RamalhoEx1.7.Rd @@ -5,9 +5,7 @@ \title{Altura de plantas de \emph{Eucaliptus camaldulensis}} \format{Vetor com 100 observações altura das plantas em metros.} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (pg 26) +RAMALHO et al. (2005), pág. 26. Castro, N. H. A., Andrade, H. B., Ramalho, m A. P. (1993). Revista Árvore. Viçosa, v. 17, n.2. diff --git a/man/RamalhoEx12.2.Rd b/man/RamalhoEx12.2.Rd index 604fff58..ba735376 100644 --- a/man/RamalhoEx12.2.Rd +++ b/man/RamalhoEx12.2.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEx12.2} \alias{RamalhoEx12.2} -\title{Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o M\enc{ú}{u}ltipla} +\title{Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o + M\enc{ú}{u}ltipla} \format{Um \code{data.frame} com 8 observações e 4 variáveis, em que \describe{ @@ -17,9 +18,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exercício 12.2, pág. 231) +RAMALHO et al. (2005), Exercício 12.2, pág. 231. } \description{ Conjunto de dados apresentados para exercício. Objetivo diff --git a/man/RamalhoEx13.1.Rd b/man/RamalhoEx13.1.Rd index 77b93773..e699011e 100644 --- a/man/RamalhoEx13.1.Rd +++ b/man/RamalhoEx13.1.Rd @@ -20,9 +20,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exercício 13.1, pág. 255) +RAMALHO et al. (2005), Exercício 13.1, pág. 255. } \description{ Experimento referente a avaliação de clones de diff --git a/man/RamalhoEx13.2.Rd b/man/RamalhoEx13.2.Rd index 66714b56..ad94fe12 100644 --- a/man/RamalhoEx13.2.Rd +++ b/man/RamalhoEx13.2.Rd @@ -19,9 +19,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exercício 13.2, pág. 256) +RAMALHO et al. (2005), Exercício 13.2, pág. 256. } \description{ Experimento que avaliou a produção de espigas de diff --git a/man/RamalhoEx13.3.Rd b/man/RamalhoEx13.3.Rd index 7b74944d..4686f3ed 100644 --- a/man/RamalhoEx13.3.Rd +++ b/man/RamalhoEx13.3.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEx13.3} \alias{RamalhoEx13.3} -\title{Avalia\enc{çã}{ca}o do Stay Green em Fam\enc{í}{i}lias de Feijoeiro} +\title{Avalia\enc{çã}{ca}o do Stay Green em Fam\enc{í}{i}lias de + Feijoeiro} \format{Um \code{data.frame} com 60 observações e 3 variáveis, em que \describe{ @@ -17,9 +18,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exercício 13.3, pág. 257) +RAMALHO et al. (2005), Exercício 13.3, pág. 257. } \description{ Notas da avaliação do "stay green" obtidos de famílias diff --git a/man/RamalhoEx3.1.Rd b/man/RamalhoEx3.1.Rd index c0146b81..4386b52e 100644 --- a/man/RamalhoEx3.1.Rd +++ b/man/RamalhoEx3.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEx3.1} \alias{RamalhoEx3.1} -\title{N\enc{ú}{u}mero de plantas de milho ap\enc{ó}{o}s inocula\enc{çã}{ca}o} +\title{N\enc{ú}{u}mero de plantas de milho ap\enc{ó}{o}s + inocula\enc{çã}{ca}o} \format{data.frame com 20 observações e 4 variáveis, em que \describe{ @@ -16,9 +17,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (pg 50) +RAMALHO et al. (2005), pág. 50. } \description{ Experimento referente ao número de plantas de milho, diff --git a/man/RamalhoEx4.1.Rd b/man/RamalhoEx4.1.Rd index ff64b019..80dab2fb 100644 --- a/man/RamalhoEx4.1.Rd +++ b/man/RamalhoEx4.1.Rd @@ -18,9 +18,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (Exercício 4.1, pág 66) +RAMALHO et al. (2005), Exercício 4.1, pág. 66. } \description{ Experimento para avaliar o comprimento de conídios de diff --git a/man/RamalhoEx4.2.Rd b/man/RamalhoEx4.2.Rd index 046157a8..80abf50c 100644 --- a/man/RamalhoEx4.2.Rd +++ b/man/RamalhoEx4.2.Rd @@ -16,9 +16,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (Execício 4.2, pág 66) +RAMALHO et al. (2005), Execício 4.2, pág. 66. } \description{ Experimento que estudou o número de perfilhos de plantas diff --git a/man/RamalhoEx7.10.Rd b/man/RamalhoEx7.10.Rd index b72a6043..8ee201bb 100644 --- a/man/RamalhoEx7.10.Rd +++ b/man/RamalhoEx7.10.Rd @@ -21,9 +21,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (pg 112). +RAMALHO et al. (2005), pág. 112. } \description{ Experimento referente à produção de arroz obtida na diff --git a/man/RamalhoEx8.1.Rd b/man/RamalhoEx8.1.Rd index 912f4733..9257175e 100644 --- a/man/RamalhoEx8.1.Rd +++ b/man/RamalhoEx8.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoEx8.1} \alias{RamalhoEx8.1} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Munic\enc{í}{i}pios de Minas Gerais} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em + Munic\enc{í}{i}pios de Minas Gerais} \format{Um \code{data.frame} com 90 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exercício 8.1, pág. 132) +RAMALHO et al. (2005), Exercício 8.1, pág. 132. } \description{ Experimentos para avaliar a produção de grãos de diff --git a/man/RamalhoEx8.2.Rd b/man/RamalhoEx8.2.Rd index 06372b08..ec165aaf 100644 --- a/man/RamalhoEx8.2.Rd +++ b/man/RamalhoEx8.2.Rd @@ -21,9 +21,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Exercício 8.2, pág. 133) +RAMALHO et al. (2005), Exercício 8.2, pág. 133. } \description{ Experimento em delineamento de blocos casualizados para diff --git a/man/RamalhoTb1.2.Rd b/man/RamalhoTb1.2.Rd index 6888ef42..85472c1b 100644 --- a/man/RamalhoTb1.2.Rd +++ b/man/RamalhoTb1.2.Rd @@ -15,9 +15,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (pg 15) +RAMALHO et al. (2005), pág 15. } \description{ Experimento da produtividade média de espigas de milho @@ -43,5 +41,5 @@ plot(ecdf(RamalhoTb1.2$prod), main = NULL) } -\keyword{ASS} +\keyword{AAS} diff --git a/man/RamalhoTb11.1.Rd b/man/RamalhoTb11.1.Rd index b267372c..61c47ce1 100644 --- a/man/RamalhoTb11.1.Rd +++ b/man/RamalhoTb11.1.Rd @@ -17,9 +17,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (pág. 165) +RAMALHO et al. (2005), pág. 165. } \description{ Experimento conduzido na EMBRAPA Milho e Sorgo diff --git a/man/RamalhoTb11.17.Rd b/man/RamalhoTb11.17.Rd index 59040fd5..dbddf62c 100644 --- a/man/RamalhoTb11.17.Rd +++ b/man/RamalhoTb11.17.Rd @@ -22,9 +22,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Tabela 11.17, pág. 193) +RAMALHO et al. (2005), Tabela 11.17, pág. 193. } \description{ Dados provenientes de 3 experimentos envolvendo a diff --git a/man/RamalhoTb12.8.Rd b/man/RamalhoTb12.8.Rd index f0cddd90..5ac390c2 100644 --- a/man/RamalhoTb12.8.Rd +++ b/man/RamalhoTb12.8.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoTb12.8} \alias{RamalhoTb12.8} -\title{Componentes da Produ\enc{çã}{ca}o de Linhagens de Feij\enc{ã}{a}o} +\title{Componentes da Produ\enc{çã}{ca}o de Linhagens de + Feij\enc{ã}{a}o} \format{Um \code{data.frame} com 20 observações e 5 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Tabela 12.8, pág. 225) +RAMALHO et al. (2005), Tabela 12.8, pág. 225. Pereira Filho, I. A., Ramalho, M. A. P., Ferreira, S. Avaliação de Progênies de Feijão e Estimativas de Parâmetros Genéticos na diff --git a/man/RamalhoTb13.1.Rd b/man/RamalhoTb13.1.Rd index 7e9c33a5..3e693f81 100644 --- a/man/RamalhoTb13.1.Rd +++ b/man/RamalhoTb13.1.Rd @@ -13,9 +13,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Tabela 13.1, pág. 233) +RAMALHO et al. (2005), Tabela 13.1, pág. 233. } \description{ Experimento referente a cultura de milho, cujos dados diff --git a/man/RamalhoTb13.11.Rd b/man/RamalhoTb13.11.Rd index cdee1f33..f248075e 100644 --- a/man/RamalhoTb13.11.Rd +++ b/man/RamalhoTb13.11.Rd @@ -16,9 +16,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Tabela 13.11, pág. 248) +RAMALHO et al. (2005), Tabela 13.11, pág. 248. } \description{ Experimento envolvendo a produção de raízes de 20 diff --git a/man/RamalhoTb13.13.Rd b/man/RamalhoTb13.13.Rd index 2067ceb0..9b535d35 100644 --- a/man/RamalhoTb13.13.Rd +++ b/man/RamalhoTb13.13.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoTb13.13} \alias{RamalhoTb13.13} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Prog\enc{ê}{e}nies de Feij\enc{ã}{a}o} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Prog\enc{ê}{e}nies de + Feij\enc{ã}{a}o} \format{Um \code{data.frame} com 30 observações e 3 variáveis, em que \describe{ @@ -17,9 +18,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Tabela 13.13, pág. 251) +RAMALHO et al. (2005), Tabela 13.13, pág. 251. } \description{ Experimento referente a avaliação de progênies diff --git a/man/RamalhoTb13.15.Rd b/man/RamalhoTb13.15.Rd index 8ac27d10..8377429f 100644 --- a/man/RamalhoTb13.15.Rd +++ b/man/RamalhoTb13.15.Rd @@ -16,9 +16,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Tabela 13.15, pág. 252) +RAMALHO et al. (2005), Tabela 13.15, pág. 252. } \description{ Experimento envolvendo a produção de ramas (parte aérea) diff --git a/man/RamalhoTb13.6.Rd b/man/RamalhoTb13.6.Rd index f6684961..e67be659 100644 --- a/man/RamalhoTb13.6.Rd +++ b/man/RamalhoTb13.6.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoTb13.6} \alias{RamalhoTb13.6} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o e Teor de \eqn{P_{2}O_{5}}} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o e Teor + de \eqn{P_{2}O_{5}}} \format{Um \code{data.frame} com 30 observações e 4 variáveis, em que \describe{ @@ -19,9 +20,8 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (Tabela 13.6, pág. 243 e tabela 13.9, pág. 246) +RAMALHO et al. (2005), Tabela 13.6, pág. 243 e tabela 13.9, + pág. 246. Pereira, A. F. Emprego de Covariância visando reduzir o efeito da heterogeneidade Ambiental nos Experimentos com a Cultura do diff --git a/man/RamalhoTb3.1.Rd b/man/RamalhoTb3.1.Rd index a27364e9..297dc2f4 100644 --- a/man/RamalhoTb3.1.Rd +++ b/man/RamalhoTb3.1.Rd @@ -16,9 +16,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (pg 43) +RAMALHO et al. (2005), pág. 43. } \description{ Experimento do número de nematóides (vermes que estão diff --git a/man/RamalhoTb3.4.Rd b/man/RamalhoTb3.4.Rd index 881ed9ab..d780c187 100644 --- a/man/RamalhoTb3.4.Rd +++ b/man/RamalhoTb3.4.Rd @@ -20,9 +20,7 @@ controle local} }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (pg 45) +RAMALHO et al. (2005), pág 45. } \description{ Experimento para verificar a incidência de patógenos do diff --git a/man/RamalhoTb3.6.Rd b/man/RamalhoTb3.6.Rd index fa154801..7420dd3f 100644 --- a/man/RamalhoTb3.6.Rd +++ b/man/RamalhoTb3.6.Rd @@ -15,9 +15,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (pg 48) +RAMALHO et al. (2005), pág. 48. } \description{ Experimento referente a largura dos ascos de três diff --git a/man/RamalhoTb7.1.Rd b/man/RamalhoTb7.1.Rd index 67e2afbb..453b2a47 100644 --- a/man/RamalhoTb7.1.Rd +++ b/man/RamalhoTb7.1.Rd @@ -20,9 +20,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras, MG: UFLA. (Tabela 7.1, pág 102). +RAMALHO et al. (2005), Tabela 7.1, pág 102. } \description{ Pesquisa sobre avaliação de progênies de diff --git a/man/RamalhoTb8.12.Rd b/man/RamalhoTb8.12.Rd index b1868e9b..d09b1ce1 100644 --- a/man/RamalhoTb8.12.Rd +++ b/man/RamalhoTb8.12.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Ramalho.R \name{RamalhoTb8.12} \alias{RamalhoTb8.12} -\title{Produ\enc{çã}{ca}o M\enc{é}{e}dia de Gr\enc{ã}{a}os de Caf\enc{é}{e}-cereja} +\title{Produ\enc{çã}{ca}o M\enc{é}{e}dia de Gr\enc{ã}{a}os de + Caf\enc{é}{e}-cereja} \format{Um \code{data.frame} com 120 observações e 4 variáveis, em que @@ -23,9 +24,7 @@ }} \source{ -Ramalho, M. A. P., Ferreira, D. F., Oliveira, A. C. (2005). - Experimentação em Genética e Melhoramento de Plantas (2th ed.). - Lavras: UFLA. (pág. 128) +RAMALHO et al. (2005), pág. 128. Mendes, A. N. G. Avaliação de Metodologias Empregadas na Seleção de Progênies do Cafeeiro (Coffea arabica L.) no estado de Minas diff --git a/man/StorckEg2.3.5.Rd b/man/StorckEg2.3.5.Rd index d5b7e253..29768e08 100644 --- a/man/StorckEg2.3.5.Rd +++ b/man/StorckEg2.3.5.Rd @@ -21,9 +21,7 @@ }} \source{ -Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, - V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: - UFSM. (Tabela 2.3.5, pág 63) +STORCK et al. (2011), Tabela 2.3.5, pág. 63. } \description{ Dados de um experimento no delineamento quadrado latino diff --git a/man/StorckTb101.Rd b/man/StorckTb101.Rd index 864509df..3b7843bd 100644 --- a/man/StorckTb101.Rd +++ b/man/StorckTb101.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Storck.R \name{StorckTb101} \alias{StorckTb101} -\title{Grupo de Experimentos de Competi\enc{çã}{ca}o de Cultivares de Milho} +\title{Grupo de Experimentos de Competi\enc{çã}{ca}o de Cultivares de + Milho} \format{Um \code{data.frame} com 96 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, - V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: - UFSM. (Tabela 101, pág. 182) +STORCK et al. (2011), Tabela 101, pág. 182. } \description{ Grupo de experimentos, avaliando 6 cultivres de milho, diff --git a/man/StorckTb2.Rd b/man/StorckTb2.Rd index e153634b..37e9d3c8 100644 --- a/man/StorckTb2.Rd +++ b/man/StorckTb2.Rd @@ -17,9 +17,7 @@ }} \source{ -Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, - V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: - UFMS. (Tabela 2, pág. 21) +STORCK et al. (2011), Tabela 2, pág. 21. } \description{ Experimento referente ao peso das plantas aos 30 dias diff --git a/man/StorckTb56.Rd b/man/StorckTb56.Rd index 53ee1606..92d99f9e 100644 --- a/man/StorckTb56.Rd +++ b/man/StorckTb56.Rd @@ -18,9 +18,7 @@ }} \source{ -Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, - V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: - UFSM. (Tabela 56, pg 134) +STORCK et al. (2011), Tabela 56, pg 134. } \description{ Resultados (kg/parcela) em um experimento bifatorial 3 diff --git a/man/StorckTb60.Rd b/man/StorckTb60.Rd index d5463681..91b4a7b8 100644 --- a/man/StorckTb60.Rd +++ b/man/StorckTb60.Rd @@ -19,9 +19,7 @@ }} \source{ -Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, - V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: - UFSM. (Tabela 60, pág. 138) +STORCK et al. (2011), Tabela 60, pág. 138. } \description{ Resultados fictícios (kg/parcela) de um experimento diff --git a/man/StorckTb67.Rd b/man/StorckTb67.Rd index f41b00b5..bde10833 100644 --- a/man/StorckTb67.Rd +++ b/man/StorckTb67.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Storck.R \name{StorckTb67} \alias{StorckTb67} -\title{Efeito da Dose de NPK na Produ\enc{çã}{ca}o de Cultivares de Milho} +\title{Efeito da Dose de NPK na Produ\enc{çã}{ca}o de Cultivares de + Milho} \format{Um \code{data.frame} com 60 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \source{ -Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, - V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: - UFSM. (Tabela 67, pág. 144) +STORCK et al. (2011), Tabela 67, pág. 144. } \description{ Resultados ficitícios (kg/parcela) de um experimento diff --git a/man/StorckTb74.Rd b/man/StorckTb74.Rd index f7e64fb9..b8e02868 100644 --- a/man/StorckTb74.Rd +++ b/man/StorckTb74.Rd @@ -3,7 +3,8 @@ \name{StorckTb74} \alias{StorckTb74} \alias{StorckTb88} -\title{\enc{É}{E}poca e Densidade de Semeadura na Produ\enc{çã}{ca}o de Milho} +\title{\enc{É}{E}poca e Densidade de Semeadura na Produ\enc{çã}{ca}o + de Milho} \format{Um \code{data.frame} com 75 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,8 @@ }} \source{ -Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, - V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: - UFSM. (Tabela 74, pág. 150 e Tabela 88, pág. 168) +STORCK et al. (2011), Tabela 74, pág. 150 e Tabela 88, + pág. 168. } \description{ Resultados ficitícios de um experimento fatorial 3 diff --git a/man/StorckTb8.Rd b/man/StorckTb8.Rd index 25739de5..6a7d7e46 100644 --- a/man/StorckTb8.Rd +++ b/man/StorckTb8.Rd @@ -18,9 +18,7 @@ }} \source{ -Storck, L., Garcia, B. C., Lopes, S. J., Estefanel, - V. (2011). Experimentação Vegetal (3th ed.). Santa Maria, RS: - UFSM. (Tabela 8, pág. 33) +STORCK et al. (2011), Tabela 8, pág. 33. } \description{ Dados referentes a um experimento conduzido no diff --git a/man/VieiraEx7.3.Rd b/man/VieiraEx7.3.Rd index c7bb9b75..5cc6f907 100644 --- a/man/VieiraEx7.3.Rd +++ b/man/VieiraEx7.3.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Vieira.R \name{VieiraEx7.3} \alias{VieiraEx7.3} -\title{Experimento de um Fator em DIC com N\enc{ú}{u}mero Diferente de - Repeti\enc{çõ}{co}es} +\title{Experimento de um Fator em DIC com N\enc{ú}{u}mero Diferente + de Repeti\enc{çõ}{co}es} \format{Um \code{data.frame} com 18 observações e 2 variáveis, em que \describe{ @@ -16,8 +16,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). - São Paulo, SP: Atlas. (Exercício 7.3, pág. 85). +VIEIRA (1999), Exercício 7.3, pág. 85. } \description{ Dados de um experimento inteiramente ao acaso com número diff --git a/man/VieiraEx7.5.Rd b/man/VieiraEx7.5.Rd index 640fb1db..96ca4899 100644 --- a/man/VieiraEx7.5.Rd +++ b/man/VieiraEx7.5.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Vieira.R \name{VieiraEx7.5} \alias{VieiraEx7.5} -\title{Experimento Com Um Fator e Repeti\enc{çã}{ca}o Dentro dos Blocos} +\title{Experimento Com Um Fator e Repeti\enc{çã}{ca}o Dentro dos + Blocos} \format{Um \code{data.frame} com 12 observações e 3 variáveis, em que \describe{ @@ -17,8 +18,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). São - Paulo, SP: Atlas. (Exercício 7.5, pág. 85). +VIEIRA (1999), Exercício 7.5, pág. 85. } \description{ Dados de um experimento em delineamento de blocos diff --git a/man/VieiraEx8.3.Rd b/man/VieiraEx8.3.Rd index bd16d7c4..c2acccd9 100644 --- a/man/VieiraEx8.3.Rd +++ b/man/VieiraEx8.3.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Vieira.R \name{VieiraEx8.3} \alias{VieiraEx8.3} -\title{Experimento Em Blocos Casualizados Com Repeti\enc{çõ}{co}es Nos Blocos} +\title{Experimento Em Blocos Casualizados Com Repeti\enc{çõ}{co}es + Nos Blocos} \format{Um \code{data.frame} com 24 observações e 3 variáveis, em que \describe{ @@ -18,8 +19,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). - São Paulo, SP: Atlas. (Exercício 8.3, pág. 102). +VIEIRA (1999), Exercício 8.3, pág. 102. } \description{ Dados de um experimento em delineamento em blocos diff --git a/man/VieiraPg50.1.Rd b/man/VieiraPg50.1.Rd index 46163c3e..ece8f6b8 100644 --- a/man/VieiraPg50.1.Rd +++ b/man/VieiraPg50.1.Rd @@ -13,8 +13,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). São - Paulo, SP: Atlas. (pág. 50, exercício 2). +VIEIRA (1999), pág. 50, exercício 2. } \description{ Experimento em delineamento inteiramente casualizado que diff --git a/man/VieiraPg50.2.Rd b/man/VieiraPg50.2.Rd index 75d85c70..5f718491 100644 --- a/man/VieiraPg50.2.Rd +++ b/man/VieiraPg50.2.Rd @@ -15,8 +15,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). São - Paulo, SP: Atlas. (pág. 50, Exercício 4). +VIEIRA (1999), pág. 50, Exercício 4. } \description{ Num laboratório são usados quatro voltímetros diff --git a/man/VieiraPg57.1.Rd b/man/VieiraPg57.1.Rd index f3bf033b..44edbdf5 100644 --- a/man/VieiraPg57.1.Rd +++ b/man/VieiraPg57.1.Rd @@ -15,8 +15,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). São - Paulo, SP: Atlas. (pág. 57, exercício 3). +VIEIRA (1999), pág. 57, exercício 3 . } \description{ Resultados de um experimento em delineamento de blocos diff --git a/man/VieiraPg57.2.Rd b/man/VieiraPg57.2.Rd index 15cf6ff1..21a44849 100644 --- a/man/VieiraPg57.2.Rd +++ b/man/VieiraPg57.2.Rd @@ -15,8 +15,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). São - Paulo, SP: Atlas. (pág. 57, exercício 4). +VIEIRA (1999), pág. 57, exercício 4 . } \description{ Os dados referem-se ao peso de 3 ratos medidos 5 vezes diff --git a/man/VieiraTb4.1.Rd b/man/VieiraTb4.1.Rd index aaf24e0c..150c6a51 100644 --- a/man/VieiraTb4.1.Rd +++ b/man/VieiraTb4.1.Rd @@ -14,8 +14,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). São - Paulo, SP: Atlas. (pág 44, tabela 4.1). +VIEIRA (1999), pág 44, tabela 4.1. } \description{ Experimento que mediu a produção, em kg/100 diff --git a/man/VieiraTb5.3.Rd b/man/VieiraTb5.3.Rd index d68e1f3c..17e41ee4 100644 --- a/man/VieiraTb5.3.Rd +++ b/man/VieiraTb5.3.Rd @@ -16,8 +16,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). São - Paulo, SP: Atlas. (pág. 53, tabela 5.3). +VIEIRA (1999), pág. 53, tabela 5.3 . } \description{ Experimento da produção de milho de 4 diferentes diff --git a/man/VieiraTb7.2.Rd b/man/VieiraTb7.2.Rd index c92bdd1e..0efbb40f 100644 --- a/man/VieiraTb7.2.Rd +++ b/man/VieiraTb7.2.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Vieira.R \name{VieiraTb7.2} \alias{VieiraTb7.2} -\title{N\enc{ú}{u}meros de Ovos de Poedeiras em Fun\enc{çã}{ca}o do Estilo Musical} +\title{N\enc{ú}{u}meros de Ovos de Poedeiras em Fun\enc{çã}{ca}o do + Estilo Musical} \format{Um \code{data.frame} com 16 observações e 2 variáveis, em que \describe{ @@ -15,8 +16,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). - São Paulo, SP: Atlas. (Tabela 7.2, pág. 74). +VIEIRA (1999), Tabela 7.2, pág. 74 . } \description{ Dados que refere-se ao número de ovos por poedeira 35 diff --git a/man/VieiraTb7.7.Rd b/man/VieiraTb7.7.Rd index 6707ea82..fe0677b2 100644 --- a/man/VieiraTb7.7.Rd +++ b/man/VieiraTb7.7.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Vieira.R \name{VieiraTb7.7} \alias{VieiraTb7.7} -\title{Teste Sobre Conhecimento em Fun\enc{çã}{ca}o da Fonte de Informa\enc{çã}{ca}o} +\title{Teste Sobre Conhecimento em Fun\enc{çã}{ca}o da Fonte de + Informa\enc{çã}{ca}o} \format{Um \code{data.frame} com 24 observações e 3 variáveis, em que \describe{ @@ -18,8 +19,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). - São Paulo, SP: Atlas. (Tabela 7.7, pág. 81; Tabela 8.2, pág. 94). +VIEIRA (1999), Tabela 7.7, pág. 81; Tabela 8.2, pág. 94 . } \description{ Dados referentes às notas dos alunos em um teste de diff --git a/man/VieiraTb8.5.Rd b/man/VieiraTb8.5.Rd index db97faba..2289df70 100644 --- a/man/VieiraTb8.5.Rd +++ b/man/VieiraTb8.5.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Vieira.R \name{VieiraTb8.5} \alias{VieiraTb8.5} -\title{N\enc{ú}{u}mero de Itens Produzidos Em Fun\enc{çã}{ca}o do Tipo de M\enc{á}{a}quina} +\title{N\enc{ú}{u}mero de Itens Produzidos Em Fun\enc{çã}{ca}o do + Tipo de M\enc{á}{a}quina} \format{Um \code{data.frame} com 60 observações e 3 variáveis, em que \describe{ @@ -17,8 +18,7 @@ }} \source{ -Vieira, S. (1999). Estatística experimental (2th ed.). - São Paulo, SP: Atlas. (Tabela 8.5, pág. 98). +VIEIRA (1999), Tabela 8.5, pág. 98 . } \description{ Os dados advém de um experimento no qual foram diff --git a/man/keywords.Rd b/man/keywords.Rd new file mode 100644 index 00000000..2a172549 --- /dev/null +++ b/man/keywords.Rd @@ -0,0 +1,40 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/keywords.R +\name{keywords} +\alias{keywords} +\title{Keywords para Classificar os Conjuntos de Dados} +\format{Um \code{data.frame} com 596 observações e 2 variáveis, em + que + +\describe{ + +\item{\code{name}}{Nome do conjunto de dados no pacote labestData.} + +\item{\code{keyword}}{Keyword atribuída ao conjunto de dados.} + +}} +\description{ +As keywords servem para classificar os conjuntos de + dados por características que definem, geralmente, o tipo de + análise a ser aplicada aos dados. Isso orienta os estudantes e + professores a escolherem os conjuntos de dados para listas de + exercício, por exemplo. +} +\examples{ + +data(keywords) +str(keywords) + +library(lattice) + +tb <- table(keywords$keyword) + +barchart(sort(tb), + ylab = "Keyword", + xlab = "Frequência absoluta") + +subset(keywords, keyword == c("DBI")) +subset(keywords, keyword \%in\% c("proporção", "contagem")) + +} + -- GitLab From ebcd229f531c3e882366364afb4a82d0f42ccc07 Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Tue, 23 Aug 2016 21:01:15 -0300 Subject: [PATCH 04/10] =?UTF-8?q?Edita=20refer=C3=AAncias=20e=20t=C3=ADtul?= =?UTF-8?q?os=20dos=20Zimmermann.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- R/Zimmermann.R | 323 +++++++++++++++++++------------------------------ 1 file changed, 124 insertions(+), 199 deletions(-) diff --git a/R/Zimmermann.R b/R/Zimmermann.R index ba1e9a4c..09755974 100644 --- a/R/Zimmermann.R +++ b/R/Zimmermann.R @@ -1,5 +1,6 @@ #' @name ZimmermannTb10.15 -#' @title Aduba\enc{çã}{ca}o Ap\enc{ó}{o}s Pastagem em Cultivares de Arroz +#' @title Aduba\enc{çã}{ca}o Ap\enc{ó}{o}s Pastagem em Cultivares de +#' Arroz #' @description Dados de um experimento conduzido em faixas, no #' delineamento de blocos ao acaso, para testar o efeito da #' aplicação de adubos em arroz após pastagem no qual foram @@ -34,9 +35,7 @@ #' 3 \tab 18 \tab 90 \tab 81 \tab 135 \tab 6 #' } #' @keywords DBC EF -#' @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. (Tabela 10.15, pág. 210) +#' @source ZIMMERMANN (2004), Tabela 10.15, pág. 210. #' @examples #' #' library(lattice) @@ -53,7 +52,8 @@ NULL #' @name ZimmermannTb10.20 -#' @title Nitrog\enc{ê}{e}nio, Irriga\enc{çã}{ca}o e Preparo do Solo para Feijoeiro +#' @title Nitrog\enc{ê}{e}nio, Irriga\enc{çã}{ca}o e Preparo do Solo +#' para Feijoeiro #' @description Dados de um experimento conduzido em faixas, no #' delineamento de blocos ao acaso, com duas repetições e parcelas #' divididas. Se testaram, nas faixas horizontais, as lâminas de @@ -82,9 +82,7 @@ NULL #' #' } #' @keywords DBC PSS EF -#' @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. (Tabela 10.20, pág 213) +#' @source ZIMMERMANN (2004), Tabela 10.20, pág 213. #' @examples #' #' library(lattice) @@ -132,9 +130,7 @@ NULL #' #' } #' @keywords PS DBC -#' @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. (Tabela 10.6, pág. 201) +#' @source ZIMMERMANN (2004), Tabela 10.6, pág. 201. #' @examples #' #' library(lattice) @@ -151,7 +147,8 @@ NULL NULL #' @name ZimmermannTb10.9 -#' @title \enc{É}{E}poca de Plantio e Manejo de Inseticida em Cultivares de Arroz +#' @title \enc{É}{E}poca de Plantio e Manejo de Inseticida em Cultivares +#' de Arroz #' @description Dados de um em delineamento de blocos completos ao #' acaso, em parcelas subdivididas. O experimento avaliou o efeito #' de 2 épocas de plantio e aplicação (ou não) do inseticida @@ -179,9 +176,7 @@ NULL #' #' } #' @keywords PSS DBC -#' @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. (Tabela 10.9, pág. 205) +#' @source ZIMMERMANN (2004), Tabela 10.9, pág. 205. #' @examples #' #' library(lattice) @@ -201,7 +196,8 @@ NULL NULL #' @name ZimmermannTb11.1 -#' @title Espa\enc{ç}{c}amento e Densidade de Plantio na Produ\enc{çã}{ca}o de Arroz +#' @title Espa\enc{ç}{c}amento e Densidade de Plantio na +#' Produ\enc{çã}{ca}o de Arroz #' @description Dados de um experimento fatorial \eqn{2^3}, com #' confundimento total da interação dupla. O ensaio foi conduzido em #' dois blocos ao acaso de tamanho 4 dentro de quatro repetições, em @@ -242,9 +238,7 @@ NULL #' para fins didáticos. Não se deve alterar o delineamento de dados #' reais para conduzir as análises. #' @keywords DBC FAT confundimento -#' @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. (Tabela 11.1, pág. 221) +#' @source ZIMMERMANN (2004), Tabela 11.1, pág. 221. #' @examples #' #' library(lattice) @@ -266,7 +260,8 @@ NULL NULL #' @name ZimmermannTb11.10 -#' @title Espa\enc{ç}{c}amento Entre Linhas e Densidade no Plantio de Feij\enc{ã}{a}o +#' @title Espa\enc{ç}{c}amento Entre Linhas e Densidade no Plantio de +#' Feij\enc{ã}{a}o #' @description Dados de um experimento fatorial \eqn{3^2}, com a #' cultura do feijoeiro testando espaçamento entre linhas de plantio #' (0.45, 0.6 e 0.75 m) e densidade de plantio (7, 10 e 13 sementes @@ -295,9 +290,7 @@ NULL #' #' } #' @keywords DBC FAT confundimento -#' @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. (pg 231) +#' @source ZIMMERMANN (2004), Tabela 11.10, pág 231. #' @examples #' #' library(lattice) @@ -323,7 +316,8 @@ NULL NULL #' @name ZimmermannTb11.13 -#' @title Absor\enc{çã}{ca}o e Transloca\enc{çã}{ca}o de Zinco em Arroz de Terras Altas +#' @title Absor\enc{çã}{ca}o e Transloca\enc{çã}{ca}o de Zinco em Arroz +#' de Terras Altas #' @description Dados de um experimento fatorial \eqn{3^3}, com #' confundimento parcial de 2 graus de liberdade da interação dupla. #' O estudo é sobre a absorção e translocação de zinco em arroz de @@ -354,9 +348,7 @@ NULL #' #' } #' @keywords DBC FAT confundimento -#' @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. (Tabela 11.13, pág. 234) +#' @source ZIMMERMANN (2004), Tabela 11.13, pág. 234. #' @examples #' #' library(lattice) @@ -385,14 +377,14 @@ NULL NULL #' @name ZimmermannTb11.19 -#' @title Produtividade de arroz irrigado em ensaio fatorial com confundimento +#' @title Produtividade de arroz irrigado em ensaio fatorial com +#' confundimento #' @description Dados de um experimento fatorial \eqn{2^5}, com -#' confundimento da interação de quinta ordem. -#' Estudou-se o efeito dos cinco principais problemas da cultura: controle de -#' invasoras, adubação, irrigação, controle de doenças e -#' cultivar. A interação de quarta ordem (5 fatores) foi -#' confundida com blocos. Os dados da produtividade do arroz estão -#' em kg/ha. +#' confundimento da interação de quinta ordem. Estudou-se o efeito +#' dos cinco principais problemas da cultura: controle de invasoras, +#' adubação, irrigação, controle de doenças e cultivar. A interação +#' de quarta ordem (5 fatores) foi confundida com blocos. Os dados +#' da produtividade do arroz estão em kg/ha. #' @format Um \code{data.frame} com 32 observações e 7 variáveis, em que #' #' \describe{ @@ -419,9 +411,7 @@ NULL #' #' } #' @keywords DBC FAT confundimento -#' @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. (Tabela 11.19, pág. 237) +#' @source ZIMMERMANN (2004), Tabela 11.19, pág. 237. #' @examples #' #' library(lattice) @@ -451,7 +441,8 @@ NULL NULL #' @name ZimmermannTb11.7 -#' @title Espa\enc{ç}{c}amento, Densidade e Nitrog\enc{ê}{e}nio na Produ\enc{çã}{ca}o de Arroz +#' @title Espa\enc{ç}{c}amento, Densidade e Nitrog\enc{ê}{e}nio na +#' Produ\enc{çã}{ca}o de Arroz #' @description Dados de um experimento fatorial \eqn{2^3}, com #' confundimento de duas das interações simples. Referem-se à #' produtividade de grãos, em kg ha\eqn{^{-1}}. O ensaio foi @@ -492,9 +483,7 @@ NULL #' para fins didáticos. Não se deve alterar o delineamento de dados #' reais para conduzir as análises. #' @keywords DBC FAT confundimento -#' @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. (Tabela 11.7, pág 226) +#' @source ZIMMERMANN (2004), Tabela 11.7, pág 226. #' @examples #' #' library(lattice) @@ -538,9 +527,7 @@ NULL #' #' } #' @keywords DIC -#' @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. (pg 249) +#' @source ZIMMERMANN (2004), Tabela 12.1, pág. 249. #' @examples #' #' library(lattice) @@ -583,9 +570,7 @@ NULL #' #' } #' @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) +#' @source ZIMMERMANN (2004), Tabela 12.13, pág. 255. #' @examples #' #' library(lattice) @@ -628,9 +613,7 @@ NULL #' #' } #' @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. (pg 255) +#' @source ZIMMERMANN (2004), Tabela 12.14, pág. 255. #' @examples #' #' library(lattice) @@ -650,7 +633,8 @@ NULL NULL #' @name ZimmermannTb12.19 -#' @title Produtividade de feij\enc{ã}{a}o em ensaio de competi\enc{çã}{ca}o de cultivares +#' @title Produtividade de feij\enc{ã}{a}o em ensaio de +#' competi\enc{çã}{ca}o de cultivares #' @description Dados do ensaio 1 de um experimento em DBC de competição #' de cultivares de feijão do grupo preto. Este ensaio foi realizado #' no município de Senador Canedo (GO). Houveram três cultivares @@ -671,9 +655,7 @@ NULL #' #' } #' @keywords DBC -#' @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. (Tabela 12.19, pág 258) +#' @source ZIMMERMANN (2004), Tabela 12.19, pág. 258. #' @examples #' #' library(lattice) @@ -715,9 +697,7 @@ NULL #' #' } #' @keywords DIC -#' @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. (Tabela 12.2, pág 249) +#' @source ZIMMERMANN (2004), Tabela 12.2, pág. 249. #' @examples #' #' library(lattice) @@ -736,7 +716,8 @@ NULL NULL #' @name ZimmermannTb12.20 -#' @title Produtividade de Gr\enc{ã}{a}os de Cultivares de Feij\enc{ã}{a}o +#' @title Produtividade de Gr\enc{ã}{a}os de Cultivares de +#' Feij\enc{ã}{a}o #' @description Dados do ensaio 2 de um experimento em DBC de competição #' de cultivares de feijão do grupo preto. Este ensaio foi realizado #' no município de Santo Antonio de Goiás (GO). Houveram três @@ -758,9 +739,7 @@ NULL #' #' } #' @keywords DBC -#' @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. (pg 258) +#' @source ZIMMERMANN (2004), Tabela 12.20, pág. 258. #' @examples #' #' library(lattice) @@ -798,9 +777,7 @@ NULL #' #' } #' @keywords DQL -#' @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. (pg 261) +#' @source ZIMMERMANN (2004), Tabela 12.16, pág. 261. #' @examples #' #' library(lattice) @@ -850,9 +827,7 @@ NULL #' #' } #' @keywords DQL -#' @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. (Tabela 12.27, pág 262) +#' @source ZIMMERMANN (2004), Tabela 12.27, pág. 262. #' @examples #' #' library(lattice) @@ -881,29 +856,27 @@ NULL #' @name ZimmermannTb12.32 #' @title Competi\enc{çã}{ca}o de Cultivares de Feij\enc{ã}{a}o -#' @description Dados de um estudo em delineamento de blocos completos com -#' quatro repetições. O experimento foi um ensaio de competição de -#' cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro. -#' São apresentadas na tabela a média nos ensaios irrigados, nos de sequeiro -#' e geral. +#' @description Dados de um estudo em delineamento de blocos completos +#' com quatro repetições. O experimento foi um ensaio de competição +#' de cultivares e linhagens de feijão, em cultivos irrigado e de +#' sequeiro. São apresentadas na tabela a média nos ensaios +#' irrigados, nos de sequeiro e geral. #' @format Um \code{data.frame} com 13 observações e 4 variáveis #' #' \describe{ #' -#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição -#' da observação.} +#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo +#' repetição da observação.} #' #' \item{\code{irrigados}}{Médias nos ensaios irrigados.} -#' +#' #' \item{\code{sequeiro}}{Médias nos ensaios de sequeiro.} #' #' \item{\code{geral}}{Média geral.} #' #' } #' @keywords DBC -#' @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. (Tabela 12.32, pág 264) +#' @source ZIMMERMANN (2004), Tabela 12.32, pág. 264. #' @examples #' #' library(lattice) @@ -922,29 +895,27 @@ NULL #' @name ZimmermannTb12.33 #' @title Competi\enc{çã}{ca}o de Cultivares de Feij\enc{ã}{a}o -#' @description Dados de um estudo em delineamento de blocos completos com -#' quatro repetições. O experimento foi um ensaio de competição de -#' cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro. -#' São apresentadas na tabela o total nos ensaios irrigados, nos de sequeiro -#' e geral. +#' @description Dados de um estudo em delineamento de blocos completos +#' com quatro repetições. O experimento foi um ensaio de competição +#' de cultivares e linhagens de feijão, em cultivos irrigado e de +#' sequeiro. São apresentadas na tabela o total nos ensaios +#' irrigados, nos de sequeiro e geral. #' @format Um \code{data.frame} com 13 observações e 4 variáveis #' #' \describe{ #' -#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição -#' da observação.} +#' \item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo +#' repetição da observação.} #' #' \item{\code{irrigados}}{Totais nos ensaios irrigados.} -#' +#' #' \item{\code{sequeiro}}{Totais nos ensaios de sequeiro.} #' #' \item{\code{geral}}{Total geral.} #' #' } #' @keywords DBC -#' @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. (Tabela 12.33, pág 265) +#' @source ZIMMERMANN (2004), Tabela 12.33, pág. 265. #' @examples #' #' library(lattice) @@ -984,9 +955,7 @@ NULL #' #' } #' @keywords DBC -#' @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. (Tabela 12.7, pág 251) +#' @source ZIMMERMANN (2004), Tabela 12.7, pág. 251. #' @examples #' #' library(lattice) @@ -1028,9 +997,7 @@ NULL #' #' } #' @keywords DBC -#' @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. (pg 252) +#' @source ZIMMERMANN (2004), Tabela 12.8, pág. 252. #' @examples #' #' library(lattice) @@ -1070,9 +1037,7 @@ NULL #' #' } #' @keywords REG -#' @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. (Tabela 13.1, pág 272) +#' @source ZIMMERMANN (2004), Tabela 13.1, pág. 272. #' @examples #' #' library(lattice) @@ -1084,7 +1049,8 @@ NULL NULL #' @name ZimmermannTb14.3 -#' @title Estande de Plantas e Produtividade de Cultivares de Feij\enc{ã}{a}o +#' @title Estande de Plantas e Produtividade de Cultivares de +#' Feij\enc{ã}{a}o #' @description Dados de um ensaio de competição de cultivares de feijão #' onde foram registrados a produtivididade, bem como o estande por #' área útil, para sete cultivares de arroz. O experimento foi feito @@ -1110,9 +1076,7 @@ NULL #' mesmo ensaio, porém com mais cultivares e sem a informação de #' estande. #' @keywords DBC COV -#' @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. (Tabela 14.3, pág 293) +#' @source ZIMMERMANN (2004), Tabela 14.3, pág. 293. #' @examples #' #' library(lattice) @@ -1154,7 +1118,8 @@ NULL NULL #' @name ZimmermannTb14.9 -#' @title Controle de Insetos na Produtividade de Gr\enc{ã}{a}os de Arroz +#' @title Controle de Insetos na Produtividade de Gr\enc{ã}{a}os de +#' Arroz #' @description Dados de um ensaio de controle de insetos/pragas na #' cultura do arroz. O experimento foi feito em delineamento #' quadrado latino 6 \eqn{\times} 6 mas há uma um dado perdido @@ -1177,9 +1142,7 @@ NULL #' número de perfilhos de arroz, estão disponíveis em #' \code{\link{ZimmermannTb5.15}}. #' @keywords DQL desbalanceado -#' @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. (Tabela 14.9, pág. 297) +#' @source ZIMMERMANN (2004), Tabela 14.9, pág. 297. #' @examples #' #' library(lattice) @@ -1210,7 +1173,8 @@ NULL NULL #' @name ZimmermannTb15.1 -#' @title Produ\enc{çã}{ca}o de Perfilhos por Planta em Fun\enc{çã}{ca}o de 4 Fatores +#' @title Produ\enc{çã}{ca}o de Perfilhos por Planta em Fun\enc{çã}{ca}o +#' de 4 Fatores #' @description Dados de um ensaio fatorial fracionado \eqn{2^{4-1}}, em #' blocos ao acaso. O experimento mediu o número médio de perfilhos #' por planta. Os quatro fatores estudados foram: cultivar, @@ -1245,9 +1209,7 @@ NULL #' a mesma fração do fatorial (a fração complementar não foi #' utilizada). #' @keywords DBC FRAC -#' @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. (pg 306) +#' @source ZIMMERMANN (2004), Tabela 15.1, pág. 306. #' @examples #' #' library(lattice) @@ -1290,9 +1252,7 @@ NULL #' #' } #' @keywords FRAC superficie -#' @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. (Tabela 15.10, pág. 314) +#' @source ZIMMERMANN (2004), Tabela 15.10, pág. 314. #' @examples #' #' library(lattice) @@ -1345,9 +1305,7 @@ NULL #' blocos (do total de 9) continham a combinação 000 de zinco, #' fósforo e cálcio. #' @keywords DBC FRAC -#' @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. (Tabela 15.4, pág. 309) +#' @source ZIMMERMANN (2004), Tabela 15.4, pág. 309. #' @examples #' #' library(lattice) @@ -1396,9 +1354,7 @@ NULL #' #' } #' @keywords correlacao -#' @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. (Tabela 16.1, pág. 327) +#' @source ZIMMERMANN (2004), Tabela 16.1, pág. 327. #' @examples #' #' data(ZimmermannTb16.1) @@ -1439,9 +1395,7 @@ NULL #' #' } #' @keywords DQL contagem -#' @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. (Tabela 16.10, pág. 357) +#' @source ZIMMERMANN (2004), Tabela 16.10, pág. 357. #' @examples #' #' library(lattice) @@ -1472,7 +1426,8 @@ NULL NULL #' @name ZimmermannTb16.3 -#' @title Teores de Mat\enc{é}{e}ria Org\enc{â}{a}nica de Solos de V\enc{á}{a}rzea +#' @title Teores de Mat\enc{é}{e}ria Org\enc{â}{a}nica de Solos de +#' V\enc{á}{a}rzea #' @description Teores de matéria orgânica de solos aluviais e gely #' húmicos. #' @format Um \code{data.frame} com 14 observações e 2 variáveis, em que @@ -1486,9 +1441,7 @@ NULL #' #' } #' @keywords TODO -#' @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. (Tabela 16.3, pág. 337) +#' @source ZIMMERMANN (2004), Tabela 16.3, pág. 337. #' @examples #' #' # Postos. @@ -1519,9 +1472,7 @@ NULL #' #' } #' @keywords DIC contagem -#' @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. (Tabela 16.4, pág. 341) +#' @source ZIMMERMANN (2004), Tabela 16.4, pág. 341. #' @examples #' #' library(lattice) @@ -1538,7 +1489,8 @@ NULL NULL #' @name ZimmermannTb16.5 -#' @title N\enc{ú}{u}mero de Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz +#' @title N\enc{ú}{u}mero de Dias para Flora\enc{çã}{ca}o de Cultivares +#' de Arroz #' @description Experimento realizado em delineamento em blocos #' completos ao acaso, utilizando oito cultivares de arroz #' irrigado. Os dados são referentes ao número de dias até a @@ -1562,9 +1514,7 @@ NULL #' #' } #' @keywords DIC sobrevivencia -#' @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. (Tabela 16.5, pág 347) +#' @source ZIMMERMANN (2004), Tabela 16.5, pág. 347. #' @examples #' #' library(lattice) @@ -1597,8 +1547,8 @@ NULL NULL #' @name ZimmermannTb16.8 -#' @title Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz em um Reticulado -#' Quadrado +#' @title Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz em um +#' Reticulado Quadrado #' @description Experimento realizado em delineamento reticulado #' quadrado 5 \eqn{\times} 5, com três repetições. Os dados são #' referentes ao número de dias até a floração das cultivares de @@ -1627,9 +1577,7 @@ NULL #' @seealso Os dados de produção de arroz do mesmo ensaio estão #' disponíveis em \code{\link{ZimmermannTb7.1}}. #' @keywords LAT sobrevivencia -#' @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. (Tabela 16.8, pág. 353) +#' @source ZIMMERMANN (2004), Tabela 16.8, pág. 353. #' @examples #' #' library(lattice) @@ -1662,7 +1610,7 @@ NULL NULL #' @name ZimmermannTb3.12 -#' @title Dados de mat\enc{é}{e}ria seca em plantas +#' @title Dados de Mat\enc{é}{e}ria Seca em Plantas #' @description Experimento em DIC que estudou a produção de matéria #' seca em plantas de arroz, em gramas. No experimento foram #' utilizados cinco vasos para cada um de quatro tratamentos e três @@ -1684,9 +1632,7 @@ NULL #' #' } #' @keywords DIC -#' @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. (Table 3.12, pág 62) +#' @source ZIMMERMANN (2004), Tabela 3.12, pág. 62. #' @examples #' #' library(lattice) @@ -1727,9 +1673,7 @@ NULL #' #' } #' @keywords DIC -#' @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. (pg 54) +#' @source ZIMMERMANN (2004), Tabela 3.2.1, pág. 54. #' @examples #' #' library(lattice) @@ -1751,8 +1695,8 @@ NULL NULL #' @name ZimmermannTb3.5 -#' @title Fracionamento da Aduba\enc{çã}{ca}o na Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz -#' Irrigado +#' @title Fracionamento da Aduba\enc{çã}{ca}o na Produ\enc{çã}{ca}o de +#' Gr\enc{ã}{a}os de Arroz Irrigado #' @description Dados de um estudo sobre adubação nitrogenada na cultura #' do arroz irrigado. Foram testadas quatros formas de aplicação do #' adubo fazendo o fracionamento das quantidades em diferentes @@ -1776,9 +1720,7 @@ NULL #' #' } #' @keywords DIC -#' @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. (Tabela 3.5, pág. 54) +#' @source ZIMMERMANN (2004), Tabela 3.5, pág. 54. #' @examples #' #' library(lattice) @@ -1824,9 +1766,7 @@ NULL #' #' } #' @keywords DBC -#' @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. (Tabela 4.11, pág 79) +#' @source ZIMMERMANN (2004), Tabela 4.11, pág. 79. #' @examples #' #' library(lattice) @@ -1866,9 +1806,7 @@ NULL #' #' } #' @keywords DBC -#' @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. (Tabela 4.4, pág 72) +#' @source ZIMMERMANN (2004), Tabela 4.4, pág. 72. #' @examples #' #' library(lattice) @@ -1890,7 +1828,8 @@ NULL NULL #' @name ZimmermannTb5.11 -#' @title Propor\enc{çã}{ca}o de hastes sobreviventes ao ataque de insetos +#' @title Propor\enc{çã}{ca}o de Hastes Sobreviventes ao Ataque de +#' Insetos #' @description Experimento em delineamento quadrado latino onde foram #' tomadas quatro amostras em cada uma das parcelas (tipo de #' inseticida) no que diz respeito ao número total de hastes e @@ -1921,9 +1860,7 @@ NULL #' #' } #' @keywords DQL -#' @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. (Tabela 5.1, pág 101) +#' @source ZIMMERMANN (2004), Tabela 5.1, pág. 101. #' @examples #' #' library(lattice) @@ -1955,7 +1892,8 @@ NULL NULL #' @name ZimmermannTb5.15 -#' @title N\enc{ú}{u}mero de Perfilhos em Arroz em Fun\enc{çã}{ca}o de 6 Tratamentos +#' @title N\enc{ú}{u}mero de Perfilhos em Arroz em Fun\enc{çã}{ca}o de 6 +#' Tratamentos #' @description Esperimento conduzido pelo pesquisador Evane Ferreira, #' em Santo Antônio de Goiás, em 1998. O estudo avaliou o número de #' perfilhos de arroz em função de 6 tratamentos (não mencionados) @@ -1977,9 +1915,7 @@ NULL #' #' } #' @keywords DQL contagem -#' @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. (Tabela 5.15, pág. 107) +#' @source ZIMMERMANN (2004), Tabela 5.15, pág. 107. #' @examples #' #' library(lattice) @@ -1996,7 +1932,8 @@ NULL NULL #' @name ZimmermannTb5.2 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Gen\enc{ó}{o}tipos de Arroz +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Gen\enc{ó}{o}tipos de +#' Arroz #' @description Experimento em delineamento quadrado latino cujo #' objetivo foi medir a resposta em produtividade de um grupo de #' oito genótipos de arroz ao ataque inicial de pragas. @@ -2017,9 +1954,7 @@ NULL #' #' } #' @keywords DQL -#' @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. (Tabela 5.2, pág 92) +#' @source ZIMMERMANN (2004), Tabela 5.2, pág. 92. #' @examples #' #' library(lattice) @@ -2048,7 +1983,8 @@ NULL NULL #' @name ZimmermannTb7.1 -#' @title Ensaio de Competi\enc{çã}{ca}o de Cultivares em Reticulado Quadrado +#' @title Ensaio de Competi\enc{çã}{ca}o de Cultivares em Reticulado +#' Quadrado #' @description Experimento feito pelos pesquisadores Orlando Peixoto #' Moraes, Emilio da Maia de Castro e Flavio Breseghello, da Embrapa #' Arroz e Feijão, na fazenda Capivara em Santo Antônio de Goiás. O @@ -2073,9 +2009,7 @@ NULL #' #' } #' @keywords LAT -#' @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. (Tabela 7.1, pág. 136) +#' @source ZIMMERMANN (2004), Tabela 7.1, pág. 136. #' @examples #' #' library(lattice) @@ -2095,7 +2029,8 @@ NULL NULL #' @name ZimmermannTb7.4 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Ensaio Reticulado Retangular +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Ensaio +#' Reticulado Retangular #' @description Dados de um estudo sobre competição de cultivares e #' linhagens de arroz irrigado quanto a produtividade. O experimento #' foi conduzido em ensaio em reticulado retangular 5 \eqn{\times} 6 @@ -2120,9 +2055,7 @@ NULL #' #' } #' @keywords reticulado -#' @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. (Tabela 7.4, pág. 140) +#' @source ZIMMERMANN (2004), Tabela 7.4, pág. 140. #' @examples #' #' library(lattice) @@ -2141,8 +2074,8 @@ NULL NULL #' @name ZimmermannTb8.5 -#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o em Delineamento de Blocos Aumentos -#' de Federer +#' @title Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o em +#' Delineamento de Blocos Aumentados de Federer #' @description Dados de um estudo em desenho de blocos aumentados de #' Federer, com total de dezoito blocos, cada um com quatro #' testemunhas (1 a 4), e 12 linhagens, num total de 216 @@ -2165,9 +2098,7 @@ NULL #' #' } #' @keywords BAF -#' @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. (Tabela 8.5, pág. 158) +#' @source ZIMMERMANN (2004), Tabela 8.5, pág. 158. #' @examples #' #' library(lattice) @@ -2185,7 +2116,8 @@ NULL NULL #' @name ZimmermannTb9.13 -#' @title Mat\enc{é}{e}ria Seca de Feij\enc{ã}{a}o em Fatorial 3x3 +#' @title Mat\enc{é}{e}ria Seca de Feij\enc{ã}{a}o em Fatorial 3 +#' \eqn{\times} 3 #' @description Dados de um estudo em ensaio fatorial 3 \eqn{times} 3, #' considerando três níveis de densidade de solo e três doses #' microelementos. Cada vaso continha três plantas de arroz e, @@ -2211,9 +2143,7 @@ NULL #' #' } #' @keywords FAT -#' @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. (Tabela 9.13, pág 179) +#' @source ZIMMERMANN (2004), Tabela 9.13, pág. 179. #' @examples #' #' library(lattice) @@ -2234,7 +2164,8 @@ NULL NULL #' @name ZimmermannTb9.17 -#' @title \enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz +#' @title \enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na +#' Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz #' @description Dados de um estudo em ensaio fatorial 3 \eqn{\times} 3, #' referentes à produção de grãos de arroz, em kg ha\eqn{^{-1}}. O #' delineamento é o de blocos completos ao acaso, com três @@ -2261,9 +2192,7 @@ NULL #' #' } #' @keywords FAT3 -#' @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. (Tabela 9.17, pág. 182) +#' @source ZIMMERMANN (2004), Tabela 9.17, pág. 182. #' @examples #' #' library(lattice) @@ -2287,8 +2216,8 @@ NULL NULL #' @name ZimmermannTb9.22 -#' @title Fungicidas e Pol\enc{í}{i}mero na Infec\enc{çã}{ca}o de \emph{Fusarium} em -#' Sementes +#' @title Fungicidas e Pol\enc{í}{i}mero na Infec\enc{çã}{ca}o de +#' \emph{Fusarium} em Sementes #' @description Resultados de um experimento fatorial com tratamentos #' adicionais \eqn{3 \times 3 + 2} que estudou o número de sementes #' infectadas por fusaruim em função aplicação de fungicidas às @@ -2318,9 +2247,7 @@ NULL #' #' } #' @keywords DIC binomial -#' @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. (Tabela 9.22, pág. 188) +#' @source ZIMMERMANN (2004), Tabela 9.22, pág. 188. #' @examples #' #' library(lattice) @@ -2350,7 +2277,8 @@ NULL NULL #' @name ZimmermannTb9.26 -#' @title \enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Altura de Plantas +#' @title \enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Altura de +#' Plantas #' @description Dados de um estudo em fatorial \eqn{3^3}, sobre adubação #' nitrogenada e potássica e suas épocas de aplicação. Os dados são #' referentes a altura de plantas no cultivo da soca de arroz @@ -2373,9 +2301,7 @@ NULL #' #' } #' @keywords FAT3 -#' @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. (Tabela 9.26, pág. 190) +#' @source ZIMMERMANN (2004), Tabela 9.26, pág. 190. #' @examples #' #' library(lattice) @@ -2397,4 +2323,3 @@ NULL #' factor.levels = c("Nitrogênio", "Potássio"))) #' NULL - -- GitLab From 2b0967cb3a93cc341f893d6acd543cdc31a3e583 Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Tue, 23 Aug 2016 21:02:10 -0300 Subject: [PATCH 05/10] Adiciona bibtex da obra Paulino e Singer. --- vignettes/config/bibliography.bib | 63 +++++++++++++++++++++++-------- 1 file changed, 47 insertions(+), 16 deletions(-) diff --git a/vignettes/config/bibliography.bib b/vignettes/config/bibliography.bib index 0cc52bda..ffbe5246 100644 --- a/vignettes/config/bibliography.bib +++ b/vignettes/config/bibliography.bib @@ -1,13 +1,15 @@ -% This file was created with JabRef 2.10b2. +% This file was created with JabRef 2.10. % Encoding: UTF-8 + @Book{banzatto, Title = {Experimentação Agrícola}, Author = {Banzatto, D. A. and Kronka, S. D.}, Publisher = {Funep}, Year = {2013}, + Address = {Jaboticabal, SP}, - Edition = {4}, + Edition = {4} } @Book{barbin, @@ -15,8 +17,9 @@ Author = {Barbin, D.}, Publisher = {Mecenas}, Year = {2013}, + Address = {Londrina, PR}, - Edition = {2}, + Edition = {2} } @Book{dias, @@ -24,7 +27,8 @@ Author = {Barros, W. S. and Dias, L. A. S.}, Publisher = {Editora UFV}, Year = {2009}, - Address = {Viçosa, MG}, + + Address = {Viçosa, MG} } @Book{charnet, @@ -32,8 +36,9 @@ Author = {Charnet, R. and de Luna Freire, C.A. and Charnet, E.M.R. and Bonvino, H.}, Publisher = {Editora Unicamp}, Year = {2008}, + Address = {Campinas, SP}, - Edition = {2}, + Edition = {2} } @Book{epprecht, @@ -41,31 +46,38 @@ Author = {Costa, A. F. B. and Epprecht, E. K. and Carpinetti, L.}, Publisher = {Atlas}, Year = {2010}, + Address = {São Paulo, SP}, - Edition = {2}, + Edition = {2} } @Misc{costa, Title = {Técnicas Experimentais aplicadas às Ciências Agrárias}, + Author = {Costa, J. R.}, HowPublished = {Seropédica, RJ: Embrapa Agrobiologia (Documentos 163)}, Year = {2003}, + Url = {http://www.ica.ufmg.br/mestrado_doutorado/images/stories/arquivos_mestrado/experimentao%20agrcola.pdf} } @Misc{demetrio, Title = {Modelos de Regressão}, + Author = {Demétrio, C. G. B. and Zocchi, S. S.}, HowPublished = {Piracicaba, SP. ESALQ (apostila)}, Year = {2011}, + Url = {http://www.lce.esalq.usp.br/arquivos/aulas/2011/LCE5801/Apostila.pdf} } @Misc{faria, Title = {Notas de aulas expandidas: Metodologia e Estatística Experimental}, + Author = {Faria, J. C.}, HowPublished = {Ilhéus, BA. UESC (apostila)}, Year = {2009}, + Url = {http://nbcgib.uesc.br/lec/download/faria/apostilas/CET076_12ed_1pf.pdf} } @@ -74,8 +86,9 @@ Author = {Ferreira, D. F.}, Publisher = {Editora UFLA}, Year = {2011}, + Address = {Lavras, MG}, - Edition = {2}, + Edition = {2} } @Book{manly, @@ -83,7 +96,8 @@ Author = {Manly, B. F.}, Publisher = {Bookman}, Year = {2005}, - Address = {Porto Alegre}, + + Address = {Porto Alegre} } @Book{mingoti, @@ -91,25 +105,36 @@ Author = {Mingoti, S. A.}, Publisher = {Editora UFMG}, Year = {2005}, - Address = {Belo Horizonte, MG}, + + Address = {Belo Horizonte, MG} } @Misc{paula, Title = {Modelos de regressão: com apoio computacional}, + Author = {Paula, G. A.}, HowPublished = {São Paulo, SP. IME-USP (apostila)}, Year = {2004}, + Url = {https://www.ime.usp.br/~giapaula/texto_2013.pdf} } +@Book{paulino, + Title = {An{\'a}lise de dados categorizados}, + Author = {Paulino, Carlos Daniel Mimoso and Singer, Julio da Motta}, + Publisher = {Edgard Bl{\"u}cher}, + Address = {S{\~a}o Paulo, SP}, + Year = {2006} +} + @Book{pimentel, Title = {Curso de Estatística Experimental}, Author = {{Pimentel-Gomes}, F.}, Publisher = {FEALQ}, Year = {2009}, - Address = {Piracicaba, SP}, - Edition = {15}, + Address = {Piracicaba, SP}, + Edition = {15} } @Book{ramalho, @@ -117,8 +142,9 @@ Author = {Ramalho, M. A. P. and Ferreira, D. F. and Oliveira, A. C.}, Publisher = {Editora UFLA}, Year = {2005}, + Address = {Lavras, MG}, - Edition = {2}, + Edition = {2} } @Book{ramos, @@ -126,8 +152,9 @@ Author = {Ramos, E. M. L. S. and Almeida, S. S, and Araújo, A. R.}, Publisher = {Bookman}, Year = {2013}, + Address = {Porto Alegre, RS}, - Edition = {1}, + Edition = {1} } @Book{storck, @@ -135,8 +162,9 @@ Author = {Storck, L. and Garcia, B. C. and Lopes, S. J. and Estefanel, V.}, Publisher = {Editora UFSM}, Year = {2011}, + Address = {Santa Maria, RS}, - Edition = {3}, + Edition = {3} } @Book{vieira, @@ -144,8 +172,9 @@ Author = {Vieira, S.}, Publisher = {Atlas}, Year = {1999}, + Address = {São Paulo, SP}, - Edition = {2}, + Edition = {2} } @Book{zimmermann, @@ -153,6 +182,8 @@ Author = {Zimmermann, F. J.}, Publisher = {Embrapa Arroz e Feijão}, Year = {2004}, + Address = {Santo Antônio de Goiás, GO}, - Edition = {1}, + Edition = {1} } + -- GitLab From 60fe60605a04844a3ac54da8f52740916699aaee Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Fri, 26 Aug 2016 18:55:55 -0300 Subject: [PATCH 06/10] Adiciona inicio do roteiro. --- vignettes/roteiro.Rmd | 358 ++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 358 insertions(+) create mode 100644 vignettes/roteiro.Rmd diff --git a/vignettes/roteiro.Rmd b/vignettes/roteiro.Rmd new file mode 100644 index 00000000..3a8328f1 --- /dev/null +++ b/vignettes/roteiro.Rmd @@ -0,0 +1,358 @@ +--- +title: "Roteiro" +author: "PET Estatística UFPR" +bibliography: config/bibliography.bib +csl: config/ABNT_UFPR_2011-Mendeley.csl +vignette: > + %\VignetteIndexEntry{Guia de Contribuição e Estilo} + %\VignetteEngine{knitr::rmarkdown} + %\VignetteEncoding{UTF-8} +--- + +```{r setup, include=FALSE} +source("config/_setup.R") +opts_chunk$set(eval = FALSE) +``` + +## Instalação e Configuração do Git + +Para instalar o Git no Linux, execute no terminal as instruções abaixo. + +```sh +# Instalar no Linux (Ubuntu e Mint). +sudo apt-get install git git-core git-man git-gui git-doc \ + ssh openssh-server openssh-client gitk meld -y +``` + +Para instalar no Windows, baixe o `*.exe` disponível no endereço +<https://git-scm.com/download/win>. + +Após instalar, é necessário configurar sua conta com as suas informações +pessoais: nome e email. Execute no terminal do Linux (se Linux) ou no +Git-bash (se Windows), as intruções abaixo substituindo os campos entre +aspas pelas suas informações. + +```sh +# Configura informações pessoais. +git config --global user.name "Seu Nome Aqui" +git config --global user.email "seuemail@aqui.com" + +# Mostra as configurações feitas. +git config --list +``` + +Essas instruções escrevem um arquivo oculto na home do usuário chamado +`.gitconfig`. Você pode abrir e editar esse arquivo se quiser, inclusive +para incluir atalhos (aliases) de comandos, mas tenha cuidado para não +comprometê-lo com erros. + +## Comunição do Cliente com o GitLab + +Depois de instalar o Git é necessário estabelecer comunição com o +servidor do serviço GitLab para que conteúdo (arquivos) sejam +transferidos entre cliente (computador do usuário) e servidor +(computador que hospeda o GitLab). A autenticação entre as máquinas é +baseada em chaves. Para gerar um par de chaves, execute as instruções +abaixo no terminal ou git-bash, substituindo o email pelo seu. O prompt +vai pedir para que você forneça *passphrase* mas você pode apenas +pressionar ENTER. + +```sh +ssh-keygen -t rsa -C "seuemail@aqui.com" +``` + +No output do terminal será informado o endereço do par de arquivos +gerados: `id_rsa` e `id_rsa.pub`. Esse par é único. Abra o arquivo +`id_rsa.pub` do editor de texto e copie o seu conteúdo sem +modificá-lo. Entre em <https://gitlab.c3sl.ufpr.br/profile/keys>, cole o +conteúdo no campo *key* e dê um título no campo *title*. Recomenda-se +que o título informe o computador que contem as chaves (e.g. PC-casa, +notebook, PC-PET). Clique em *Add key* para concluir. + +Para finalizar, teste se a autenticação está sendo feita. Execute no +terminal ou git-bash a instrução abaixo. + +```sh +# Testa a comunição entre cliente (você) e servidor (GitLab). +ssh -T git@gitlab.c3sl.ufpr.br +``` + +Se for retornado um *Welcome*, então ok. Importante: Sempre que você +executar o comando que gera chaves, novas chaves serão geradas e você +terá que substituir as chaves cadastradas anteriormente. + +## Clonar o Repositório do LabestData + +Para trabalhar no *labestData* você precisa ter uma cópia do +repositório. Abre o terminal ou git-bash em um diretório para fazer uma +cópia do *labestData* dentro dele. O comando `cd` (*change directory*) +muda de diretórios. Além disso, você pode clicar com o botão direito do +mouse no espaço em branco do navegador de arquivos (Nautilus ou Windows +Explorer) e clicar em *Open in Terminal* ou *Open gih-bash here* para +abri-los no diretório exibido pelo navegador de arquivos. + +Para clonar o repositório, execute as instruções abaixo. + +```sh +# Clona o repositório do labestData. +git clone git@gitlab.c3sl.ufpr.br:pet-estatistica/labestData.git +``` + +Agora com a cópia, você pode explorar o projeto e fazer contribuições ao +mesmo. Os comandos Git abaixo vão fazer um tour pelo labestData. + +```sh +# Move para o diretório recém clonado do labestData. +cd labestData/ + +# Mostra o estado do repositório. +git status + +# Exibe todos os ramos presentes. Com asterisco é o ramo atual. +git branch + +# Mostra o log (histórico) do projeto. Pressione q para sair. +git log + +# Abre a aplicação gitk para navegar no projeto. +gitk +``` + +## Criar *Milestone* + +Toda obra no labestData é uma *milestone*. A tradução literal é pedra de +milha. A *milestone* na realidade é a definição de uma meta. Uma +*milestone* é um coletivo de *issues*. *Issue* é um assunto ou +tópico. No projeto, *issue* é a definição do trabalho de uma +semana. Portanto, uma *milestone* é uma obra, e os *issues* dessa +*milestone* são fragmentos dessa obra que serão trabalhados cada um em +uma semana. + +Para criar uma *milestone*, acesse +<https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/milestones> e +clique em *New Milestone*. Preencha o campo descrição com detalhes da +obra, como título, autores, ano, editora. Visite *milestones* já criadas +para ver exemplos. + +## Criar *Issues* + +Dentro da *milestone* recém criada, clique em `New Issue` para criar +*issues*. Na descrição dos *issues* indique com detalhes o trabalho a +ser feito naquele *issue*. Por exemplo, indique a tabela/página dos +conjuntos de dados a serem incluídos com esse *issue*. + +Cada *issue* deve ter conteúdo programado para uma semana de +desenvolvimento. Pela experiência adquirida, isso equivale à 2 tabelas +grandes (maior que meia página) ou 5 tabelas médias (até 10 linhas) ou 8 +tabelas pequenas (como tabelas de contigência). Lembre-se, o custo maior +de tempo está muitas vezes na documentação do conjunto de dados do que +na digitação dos mesmos. + +O ideal é que toda a obra seja fragmentada em *issues* dentro da +*milestone* no início do período de desenvolvimento do projeto. Isso é +fundamental para o planejamento individual e coletivo das pessoas. Ao +criar o *issue* escolha uma *label* condizente com o tema da obra. + +Você pode nagegar pelos *issues* do projeto em +<https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/issues>. É +possível aplicar filtros para o autor, *milestone* ou *label*. Perceba +que todas as *issues* tem um número único. Esse número será usado como +parte do nome dos *branches* de desenvolvimento. + +## Criar Ramo para Desenvolvimento + +Agora que a obra já possui *milestone* e *issues* com seus respectividos +números, vamos criar ramos para inclusão das contribuições previstas no +*issue*. + +O *branch* de desenvolvimento autor numerado (e.g. `walmes159`, nome do +autor com número do *issue*) é extraído do *branch* `baby`. Antes, no +entanto, é recomendado incorporar possível atualizações no `baby`. Os +comandos abaixo ilustram isso. + +```sh +# Muda para o ramo baby. +git checkout baby + +# Atualiza para incorporar possíveis atualizações feitas. +git pull origin baby + +# Cria um ramo a partir do baby. +git checkout -b seunome123 + +# Mostra o ramo atual. Deve estar com asterisco o seunome123. +git branch +``` + +## Adicionar Contribuições + +Essa parte consiste basicamente em criar 4 arquivos para cada conjunto +de dados: `data-raw/*.txt`, `data/*.rda`, `R/*.R` e +`man/*.Rd`. Considerando que o nome do conjunto de dados seja `dados`, +teríamos então a seguinte estrutura. + +``` +labestData/ +|-- DESCRIPTION +|-- NAMESPACE +|-- data-raw/ +| `-- dados.txt 1. Digitar os dados e criar arquivo txt. +|-- data/ +| `-- dados.rda 2. Gerar rda com use_data(). +|-- R/ +| `-- dados.R 3. Gerar esqueleto com roxy_data() +`-- man/ e preencher. + `-- dados.Rd 4. Gerar documentação com document(). +``` + +Algumas funções foram criadas para auxiliar no desenvolvimento do +labestData. Elas estão disponíveis no *snippet* 46 do GitLab: +<https://gitlab.c3sl.ufpr.br/snippets/46>. Recomenda-se que você tenha +um *script* com os código para trabalhar no *labestData* e que carrege +as funções no *snippet* ao iniciar sua sessão R. + +```{r} +# Carrega as funções do definidas no snippet 46. +source("https://gitlab.c3sl.ufpr.br/snippets/46/raw") +``` + +### Arquivo `txt` + +Para gerar o arquivo `*.txt` existem várias maneiras que destacamos +três: digitar na planilha e exportar pela planilha, digitar na planilha +e exportar pelo R, digitar no R e exportar pelo R. + +Digitar na planilha e exportar pela planilha +: Digitar os dados na planilha eletrônica, copiar a região com os dados, + criar um arquivo `txt` vazio em `data-raw/` e colar o conteúdo copiado + da planilha dentro. As colunas serão separadas por tabulação. + +Digitar na planilha e exportar com o R +: Digitar os dados na planilha eletrônica, copiar a região com os dados, + carregar pelo R com `read.table("clipboard", header = TRUE, sep = + "\t")`. Depois exporte com a função `write2txt(dados)`, disponível no + *snippet*. + +Digitar no R e exportar com o R +: Digitar os dados com o R usando `scan()` ou `edit()` e exportar com a + função `write2txt(dados)`. Essa opção é bastante vatajosa quando você + tem dados com estrutura regular, como os de experimentos + planejados. Você pode criar as estruturas com `expand.grid()` e então + só digitar a variável resposta. + +### Arquivo `rda` + +O arquivo `rda` pode ser gerado com a função `use_data()` do pacote +`devtools`. + +```{r} +use_data(dados) +``` + +### Arquivo `R` + +O arquivo R vai conter a documentação do conjunto de dados escrito no +formato definido pelo `roxygen2`. Esse formato será transcrito para o +formato oficial de documentação R, cuaj extensão de arquivo é Rd (*R +documentation*), e se assemelha à textos LaTeX. + +Para gerar o arquivo R com a documentação começada, execute a função +`roxy_data()` definida no *snippet*. + +```{r} +roxy_data(dados) +``` +### Arquivo `Rd` + +O arquivo Rd é gerado automaticamente, a partir do arquivo R, pela +função `document()` do *devtools*. A função `check_man()` verifica se +existe problemas com a documentação gerara, como campos mal formados ou +inexistentes. + +```{r} +document() +check_man() +``` + +### Resumo com Comandos + +```{r} +# Carrega as funções do definidas no snippet 46. +source("https://gitlab.c3sl.ufpr.br/snippets/46/raw") + +# Carregar os dados no txt (opção 1). +dados <- read.table("data-raw/dados.txt", header = TRUE, sep = "\t") + +# Carregar os dados da área de transferência (opção 2). +dados <- read.table("clipboard", header = TRUE, sep = "\t") + +# IMPORTANT: Use esses dados para ver se estão corretos. + +library(devtools) + +# Cria o txt no diretório data-raw/. +write2txt(dados) + +# Criar o rda no diretório data/. +use_data(dados) + +# Remover ele do workspace. +rm("dados") + +# Carregar o labestData em desenvolvimento. +load_all() + +# Exibe o nome dos objetos do pacote. +ls("package:labestData") + +# Mostra estrutura dos dodos. +str(dados) + +# Cria o arquivo com a documentação parcialmente preenchido. +roxy_data(dados) + +# Abrir o arquivo R gerado no diretório R/ e editar. + +# Gera o arquivo Rd no diretório man/. +document() + +# Busca por erros na documentação gerada. +check_man() + +# Mostra o diretório em forma de árvore. +dirtree("../") +``` + +## Verificar + +Depois de adicionados os 4 arquivos referentes ao conjunto de dados, é +necessário fazer uma verificação integral do pacote. Caso erros tenham +sido introduzidos, nessa fase serão indenficados para serem corrigidos +antes de serem enviados para o repositório remoto. + +```{r} +# Verificação integral. Gera manual mas não vinhetas. Resultados ficam +# em diretório ao lado do atual. +check(manual = TRUE, vignettes = FALSE, check_dir = "../") + +# Cria o arqquivo comprimido (zip, tar.gz) para distribuição do pacote. +build(manual = TRUE, vignettes = TRUE) +``` + +## Orientações de uso do Git + +Como fazer commits, periodicidade. + +## Fazer Merge Request + +Para fazer *merge request* visite: +<https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/merge_requests>. +Clique no botão *New Merge Request* para criar um novo MR. Detalhe no +campo descrição todas as contribuições enviadas com o ramo que você +submeteu para a avaliação. + +## Referências Bibliográficas + +<!------------------------------------------- --> + +[**labestData**]: https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData -- GitLab From bdb351f88336611c83760538340e9b3e5f54010b Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Sun, 28 Aug 2016 23:43:31 -0300 Subject: [PATCH 07/10] Aprimora vinheta com roteiro. --- vignettes/roteiro.Rmd | 167 ++++++++++++++++++++++++++++-------------- 1 file changed, 112 insertions(+), 55 deletions(-) diff --git a/vignettes/roteiro.Rmd b/vignettes/roteiro.Rmd index 3a8328f1..9a975869 100644 --- a/vignettes/roteiro.Rmd +++ b/vignettes/roteiro.Rmd @@ -1,8 +1,6 @@ --- title: "Roteiro" author: "PET Estatística UFPR" -bibliography: config/bibliography.bib -csl: config/ABNT_UFPR_2011-Mendeley.csl vignette: > %\VignetteIndexEntry{Guia de Contribuição e Estilo} %\VignetteEngine{knitr::rmarkdown} @@ -41,27 +39,28 @@ git config --global user.email "seuemail@aqui.com" git config --list ``` -Essas instruções escrevem um arquivo oculto na home do usuário chamado +Essas instruções escrevem um arquivo oculto na *home* do usuário chamado `.gitconfig`. Você pode abrir e editar esse arquivo se quiser, inclusive -para incluir atalhos (aliases) de comandos, mas tenha cuidado para não -comprometê-lo com erros. +para incluir atalhos (*aliases*) de comandos, mas tenha cuidado para não +comprometê-lo com erros. Veja um exemplo de arquivo +[`.gitconfig`](https://gitlab.c3sl.ufpr.br/walmes/linux-config/blob/master/dotgitconfig). ## Comunição do Cliente com o GitLab Depois de instalar o Git é necessário estabelecer comunição com o -servidor do serviço GitLab para que conteúdo (arquivos) sejam -transferidos entre cliente (computador do usuário) e servidor -(computador que hospeda o GitLab). A autenticação entre as máquinas é -baseada em chaves. Para gerar um par de chaves, execute as instruções -abaixo no terminal ou git-bash, substituindo o email pelo seu. O prompt -vai pedir para que você forneça *passphrase* mas você pode apenas -pressionar ENTER. +servidor do serviço GitLab para que conteúdo (arquivos) seja transferido +entre cliente (computador do usuário) e servidor (computador que hospeda +o GitLab). A autenticação entre as máquinas é baseada em +[chaves](https://www.vivaolinux.com.br/artigo/Conexoes-SSH-sem-senha-facil-e-descomplicado). +Para gerar um par de chaves, execute as instruções abaixo no terminal ou +git-bash, substituindo o email pelo seu. O *prompt* vai pedir para que +você forneça uma *passphrase* mas você pode apenas pressionar ENTER. ```sh ssh-keygen -t rsa -C "seuemail@aqui.com" ``` -No output do terminal será informado o endereço do par de arquivos +No *output* do terminal será informado o endereço do par de arquivos gerados: `id_rsa` e `id_rsa.pub`. Esse par é único. Abra o arquivo `id_rsa.pub` do editor de texto e copie o seu conteúdo sem modificá-lo. Entre em <https://gitlab.c3sl.ufpr.br/profile/keys>, cole o @@ -77,9 +76,11 @@ terminal ou git-bash a instrução abaixo. ssh -T git@gitlab.c3sl.ufpr.br ``` -Se for retornado um *Welcome*, então ok. Importante: Sempre que você -executar o comando que gera chaves, novas chaves serão geradas e você -terá que substituir as chaves cadastradas anteriormente. +Se for retornado um *Welcome*, então procedimento realizado com +sucesso. Importante: Sempre que você executar o comando que gera as +chaves, novas chaves serão geradas e você terá que substituir as chaves +cadastradas anteriormente (a menos que você gere em outro diretório ou +faça backup). ## Clonar o Repositório do LabestData @@ -109,10 +110,15 @@ cd labestData/ git status # Exibe todos os ramos presentes. Com asterisco é o ramo atual. +# Sem argumentos equivale a -l (local), -r (remotes), -a (all). git branch +git branch -l +git branch -r +git branch -a # Mostra o log (histórico) do projeto. Pressione q para sair. git log +git log --oneline # Abre a aplicação gitk para navegar no projeto. gitk @@ -123,23 +129,24 @@ gitk Toda obra no labestData é uma *milestone*. A tradução literal é pedra de milha. A *milestone* na realidade é a definição de uma meta. Uma *milestone* é um coletivo de *issues*. *Issue* é um assunto ou -tópico. No projeto, *issue* é a definição do trabalho de uma -semana. Portanto, uma *milestone* é uma obra, e os *issues* dessa +tópico. No projeto *labestData*, *issue* é a definição do trabalho de +uma semana. Portanto, uma *milestone* é uma obra, e os *issues* dessa *milestone* são fragmentos dessa obra que serão trabalhados cada um em uma semana. Para criar uma *milestone*, acesse <https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/milestones> e clique em *New Milestone*. Preencha o campo descrição com detalhes da -obra, como título, autores, ano, editora. Visite *milestones* já criadas -para ver exemplos. +obra, como título, autores, ano, editora. Visite as *milestones* já +criadas para ver exemplos. ## Criar *Issues* -Dentro da *milestone* recém criada, clique em `New Issue` para criar +Dentro da *milestone* recém criada, clique em `New Issue` para criar os *issues*. Na descrição dos *issues* indique com detalhes o trabalho a ser feito naquele *issue*. Por exemplo, indique a tabela/página dos -conjuntos de dados a serem incluídos com esse *issue*. +conjuntos de dados a serem incluídos com esse *issue*. Ao criar o +*issue* escolha uma *label* condizente com o tema da obra. Cada *issue* deve ter conteúdo programado para uma semana de desenvolvimento. Pela experiência adquirida, isso equivale à 2 tabelas @@ -150,8 +157,8 @@ na digitação dos mesmos. O ideal é que toda a obra seja fragmentada em *issues* dentro da *milestone* no início do período de desenvolvimento do projeto. Isso é -fundamental para o planejamento individual e coletivo das pessoas. Ao -criar o *issue* escolha uma *label* condizente com o tema da obra. +fundamental para o planejamento individual e coletivo dos +desenvolvedores do projeto. Você pode nagegar pelos *issues* do projeto em <https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/issues>. É @@ -165,10 +172,11 @@ Agora que a obra já possui *milestone* e *issues* com seus respectividos números, vamos criar ramos para inclusão das contribuições previstas no *issue*. -O *branch* de desenvolvimento autor numerado (e.g. `walmes159`, nome do -autor com número do *issue*) é extraído do *branch* `baby`. Antes, no -entanto, é recomendado incorporar possível atualizações no `baby`. Os -comandos abaixo ilustram isso. +O *branch* de desenvolvimento é autor numerado, ou seja, composto pelo +nome do autor e número do *issue* (e.g. `walmes159`). Esse ramo é sempre +extraído do *branch* `baby`, que tem apenas o conteúdo mínimo +necessário. Antes, no entanto, é recomendado incorporar possível +atualizações no `baby`. Os comandos abaixo ilustram isso. ```sh # Muda para o ramo baby. @@ -184,12 +192,17 @@ git checkout -b seunome123 git branch ``` +O ciclo de vida dos ramos de desenvolvimento (ou demanda) é de uma +semana. Ao final de cada semana eles são incorporados ao ramo `devel` e +depois são removidos. Só existem três ramos permanentes: `baby`, `devel` +e `master`. + ## Adicionar Contribuições Essa parte consiste basicamente em criar 4 arquivos para cada conjunto de dados: `data-raw/*.txt`, `data/*.rda`, `R/*.R` e `man/*.Rd`. Considerando que o nome do conjunto de dados seja `dados`, -teríamos então a seguinte estrutura. +por simplicidade, teríamos então a seguinte estrutura. ``` labestData/ @@ -198,40 +211,44 @@ labestData/ |-- data-raw/ | `-- dados.txt 1. Digitar os dados e criar arquivo txt. |-- data/ -| `-- dados.rda 2. Gerar rda com use_data(). +| `-- dados.rda 2. Gerar rda com use_data(dados). |-- R/ -| `-- dados.R 3. Gerar esqueleto com roxy_data() +| `-- dados.R 3. Gerar esqueleto com roxy_data(dados) `-- man/ e preencher. `-- dados.Rd 4. Gerar documentação com document(). ``` Algumas funções foram criadas para auxiliar no desenvolvimento do -labestData. Elas estão disponíveis no *snippet* 46 do GitLab: -<https://gitlab.c3sl.ufpr.br/snippets/46>. Recomenda-se que você tenha -um *script* com os código para trabalhar no *labestData* e que carrege -as funções no *snippet* ao iniciar sua sessão R. +*labestData*, como a `roxy_data()`. Elas estão disponíveis no *snippet* +46 do GitLab: <https://gitlab.c3sl.ufpr.br/snippets/46>. Recomenda-se +que você tenha um *script* com os código para trabalhar no *labestData* +e que carrege as funções no *snippet* ao iniciar sua sessão R. ```{r} +# Abre no navegador o snippet 46. +browseURL("https://gitlab.c3sl.ufpr.br/snippets/46/") + # Carrega as funções do definidas no snippet 46. source("https://gitlab.c3sl.ufpr.br/snippets/46/raw") ``` ### Arquivo `txt` -Para gerar o arquivo `*.txt` existem várias maneiras que destacamos -três: digitar na planilha e exportar pela planilha, digitar na planilha -e exportar pelo R, digitar no R e exportar pelo R. +Existem várias maneiras de gerar o arquivo `*.txt` e destacamos três: +digitar na planilha e exportar pela planilha, digitar na planilha e +exportar pelo R, digitar no R e exportar pelo R. Digitar na planilha e exportar pela planilha -: Digitar os dados na planilha eletrônica, copiar a região com os dados, - criar um arquivo `txt` vazio em `data-raw/` e colar o conteúdo copiado - da planilha dentro. As colunas serão separadas por tabulação. +: Consiste em digitar os dados na planilha eletrônica, copiar a região + com os dados, criar um arquivo `txt` vazio em `data-raw/` e colar o + conteúdo copiado da planilha dentro. As colunas serão separadas por + tabulação. Digitar na planilha e exportar com o R : Digitar os dados na planilha eletrônica, copiar a região com os dados, carregar pelo R com `read.table("clipboard", header = TRUE, sep = - "\t")`. Depois exporte com a função `write2txt(dados)`, disponível no - *snippet*. + "\t")`. Depois escrever em `data-raw/` com a função `write2txt(dados)` + (disponível no *snippet* 46). Digitar no R e exportar com o R : Digitar os dados com o R usando `scan()` ou `edit()` e exportar com a @@ -246,31 +263,60 @@ O arquivo `rda` pode ser gerado com a função `use_data()` do pacote `devtools`. ```{r} +# Gera o arquivo dados.rda no diretório data/. use_data(dados) ``` +Depois de criar o arquivo `rda`, você deve remover esse objeto do da +memória e carregar o *labestData* com `load_all()`. Esse é momento de +experimental o conjunto de dados para ver se ele não tem erros. + +```{r} +# Remove o objeto "dados" da memória. +rm("dados") + +# Carrega os objetos do labestData. Isso vai carregar o dados. +load_all() + +# Objetos do labestData. +ls("package:labestData") + +# Mostra a estrutura do objeto. +str(dados) +``` + ### Arquivo `R` O arquivo R vai conter a documentação do conjunto de dados escrito no -formato definido pelo `roxygen2`. Esse formato será transcrito para o -formato oficial de documentação R, cuaj extensão de arquivo é Rd (*R -documentation*), e se assemelha à textos LaTeX. +formato definido pelo pacote +[`roxygen2`](http://kbroman.org/pkg_primer/pages/docs.html). Esse +formato será transcrito para o formato oficial de documentação R, cuja +extensão de arquivo é `Rd` (*R documentation*), e se assemelha aos +textos LaTeX. Para gerar o arquivo R com a documentação começada, execute a função `roxy_data()` definida no *snippet*. ```{r} +# Cria o arquivo dados.R no diretório R/. roxy_data(dados) ``` + +A função `roxy_data()` vai criar o arquivo com parte da documentação +preenchida. Abra o arquivo e complete com as informações restantes. + ### Arquivo `Rd` -O arquivo Rd é gerado automaticamente, a partir do arquivo R, pela +O arquivo `Rd` é gerado automaticamente, a partir do arquivo R, pela função `document()` do *devtools*. A função `check_man()` verifica se existe problemas com a documentação gerara, como campos mal formados ou inexistentes. ```{r} +# Gera a documentação dados.Rd em man/. document() + +# Verifica se a documentação não contém erros. check_man() ``` @@ -328,30 +374,41 @@ dirtree("../") Depois de adicionados os 4 arquivos referentes ao conjunto de dados, é necessário fazer uma verificação integral do pacote. Caso erros tenham sido introduzidos, nessa fase serão indenficados para serem corrigidos -antes de serem enviados para o repositório remoto. +antes de serem enviados para o repositório remoto. Procure sempre subir +para o repositório remoto contribuições estáveis. ```{r} -# Verificação integral. Gera manual mas não vinhetas. Resultados ficam -# em diretório ao lado do atual. +# Verificação integral. Gera manual mas não as vinhetas. Resultados +# ficam em diretório ao lado do atual. check(manual = TRUE, vignettes = FALSE, check_dir = "../") -# Cria o arqquivo comprimido (zip, tar.gz) para distribuição do pacote. +# Cria o arquivo comprimido (zip, tar.gz) para distribuição do pacote. build(manual = TRUE, vignettes = TRUE) + +install.packages("MRDCr", + repos = "http://leg.ufpr.br/~walmes/pacotes/") + +install.packages("http://leg.ufpr.br/~walmes/pacotes/MRDCr_0.0-2.tar.gz") ``` ## Orientações de uso do Git Como fazer commits, periodicidade. -## Fazer Merge Request +## Fazer *Merge Request* Para fazer *merge request* visite: <https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/merge_requests>. Clique no botão *New Merge Request* para criar um novo MR. Detalhe no campo descrição todas as contribuições enviadas com o ramo que você -submeteu para a avaliação. - -## Referências Bibliográficas +submeteu para a avaliação. Escolha dentre os *mergers* do projeto aquele +que foi designado para você. + +Quando o seu MR não for aceito, o *merger* vai deixar descrição das +correções a serem feitas na página do seu MR. Todo MR tem um número +correspondente, como os *issues*. Quando fizer as correções por ele +apontadas, comente na página do MR que o ramo está pronto para +incorporação novamente. <!------------------------------------------- --> -- GitLab From c2f1c441d2b41e0c9d844a8738559008f41fff75 Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Mon, 29 Aug 2016 23:03:08 -0300 Subject: [PATCH 08/10] Conclui vinheta com o roteiro. --- vignettes/roteiro.Rmd | 93 ++++++++++++++++++++++++++++++++++++++----- 1 file changed, 82 insertions(+), 11 deletions(-) diff --git a/vignettes/roteiro.Rmd b/vignettes/roteiro.Rmd index 9a975869..22277ad5 100644 --- a/vignettes/roteiro.Rmd +++ b/vignettes/roteiro.Rmd @@ -1,5 +1,5 @@ --- -title: "Roteiro" +title: "Roteiro de Trabalho" author: "PET Estatística UFPR" vignette: > %\VignetteIndexEntry{Guia de Contribuição e Estilo} @@ -12,9 +12,18 @@ source("config/_setup.R") opts_chunk$set(eval = FALSE) ``` +Esse documento descreve o roteiro de trabalho no *labestData*, desde a +instalação do software até os passos para inclusão das contribuições. Os +primeiros 4 itens precisam ser feitos apenas uma vez por máquina, as +*milestones* e *issues* são feitos uma vez por obra, enquanto que os +demais procedimentos tem uma base semanal. + ## Instalação e Configuração do Git -Para instalar o Git no Linux, execute no terminal as instruções abaixo. +O +[Git](https://git-scm.com/book/pt-br/v1/Primeiros-passos-No%C3%A7%C3%B5es-B%C3%A1sicas-de-Git) +é um sistema de controle de versão. Para instalar o Git no Linux, +execute no terminal as instruções abaixo. ```sh # Instalar no Linux (Ubuntu e Mint). @@ -82,6 +91,35 @@ chaves, novas chaves serão geradas e você terá que substituir as chaves cadastradas anteriormente (a menos que você gere em outro diretório ou faça backup). +## Instalar os Pacotes `devtools` e `roxygen2` + +O desenvolvimento do pacote *labestData* é baseado no uso do pacote +`devtools` com a documentação escrita no formato `roxygen2`. + +Para instalar esses pacotes, execute em uma sessão R os códigos abaixo. + +```{r} +install.packages(c("devtools", "roxygen2"), + dependencies = TRUE + repos = ) +``` + +O `devtools` tem dependências do sistema operacional. Se a sua +instalação no Linux não der certo, leia o output no console que +normamente é indicado lá o que não foi encontrado. Normalmente basta +instalar as "libs" abaixo. + +``` +sudo apt-get install libcurl4-openssl-dev libssl-dev +``` + +Depois de instalar, tente carregar os dois pacotes. + +```{r} +library(devtools) +library(roxygen2) +``` + ## Clonar o Repositório do LabestData Para trabalhar no *labestData* você precisa ter uma cópia do @@ -92,7 +130,7 @@ mouse no espaço em branco do navegador de arquivos (Nautilus ou Windows Explorer) e clicar em *Open in Terminal* ou *Open gih-bash here* para abri-los no diretório exibido pelo navegador de arquivos. -Para clonar o repositório, execute as instruções abaixo. +Para clonar o repositório, execute as instrução abaixo. ```sh # Clona o repositório do labestData. @@ -103,6 +141,9 @@ Agora com a cópia, você pode explorar o projeto e fazer contribuições ao mesmo. Os comandos Git abaixo vão fazer um tour pelo labestData. ```sh +# Mostra o diretório atual. +pwd + # Move para o diretório recém clonado do labestData. cd labestData/ @@ -126,8 +167,8 @@ gitk ## Criar *Milestone* -Toda obra no labestData é uma *milestone*. A tradução literal é pedra de -milha. A *milestone* na realidade é a definição de uma meta. Uma +Toda obra no *labestData* é uma *milestone*. A tradução literal é pedra +de milha. A *milestone* na realidade é a definição de uma meta. Uma *milestone* é um coletivo de *issues*. *Issue* é um assunto ou tópico. No projeto *labestData*, *issue* é a definição do trabalho de uma semana. Portanto, uma *milestone* é uma obra, e os *issues* dessa @@ -384,16 +425,46 @@ check(manual = TRUE, vignettes = FALSE, check_dir = "../") # Cria o arquivo comprimido (zip, tar.gz) para distribuição do pacote. build(manual = TRUE, vignettes = TRUE) - -install.packages("MRDCr", - repos = "http://leg.ufpr.br/~walmes/pacotes/") - -install.packages("http://leg.ufpr.br/~walmes/pacotes/MRDCr_0.0-2.tar.gz") ``` ## Orientações de uso do Git -Como fazer commits, periodicidade. +O recurso que mais o desenvolvedor vai usar do Git e que é permanente no +projeto é o *commit*. Por isso, é importante fazer o *commit* de forma +correta para tirarmos ainda mais vatagem desse incrível recurso. Algumas +[diretrizes para fazer *commits*](https://git-scm.com/book/pt-br/v1/Git-Distribu%C3%ADdo-Contribuindo-Para-Um-Projeto#Diretrizes-de-Commit) +são dadas na página oficial do mesmo. Destacaremos as mais relevantes +para o *labestData*. + +Faça *commits* de mudanças completas +: Apenas faça *commits* de arquivos para unidades completas de algo. Por + exemplo, não faça *commit* de um texto com frases incompletas, não + faça commmit de uma função cujo código não foi terminado de escrever. + +Faça *commits* pensando que vai precisar revertê-los +: Antes de fazer um *commit*, imagine que vai precisar revertê-lo, + voltar para o instante antes de fazê-lo. Existe um jeito melhor de + agrupar mudanças que seja melhor para o caso de precisar retroceder? + Se sim, faça o agrupamento de mudanças para um *commit* com isso em + mente. + +Use uma mensagem curta e apropriada +: Prefira mensagens curtas e acertivas. Elas devem em poucas palavras + permitir se lembrar ou advinhar o que foi feito. Normalmente mensagens + que relatam o porquê das modificações são assim. Se um *commit* + precisar de uma mensagem longa demais, então é porque ele agrupa + modificações divisíveis. + +Use o tempo verbal como se fosse um comando +: Recomenda-se usar o tempo verbal no presente da segunda pessoa + (ele/ela): faz, corrige, remove, muda, fatora, rescreve, transfere, + copia, acrescenta, modifica. + +Adote o idioma plenamente +: Adotar o idioma plenamente, com palabras acentuadas e sinais de + pontuação facilita bastante quando for necessário fazer buscas nos + textos das mensagens pois só existe um jeito certo para a grafia das + palavras. ## Fazer *Merge Request* -- GitLab From 8e16e5619aba395ec522a7a28a4ca120cf3c50c5 Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Tue, 30 Aug 2016 15:03:01 -0300 Subject: [PATCH 09/10] =?UTF-8?q?Adiciona=20a=20se=C3=A7=C3=A3o=20Fluxo=20?= =?UTF-8?q?de=20Trabalho=20trazida=20do=20devel.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- vignettes/guia-contrib.Rmd | 48 ++++++++++++++++++++++++++ vignettes/img/workflow-labestData.png | Bin 0 -> 145869 bytes 2 files changed, 48 insertions(+) create mode 100644 vignettes/img/workflow-labestData.png diff --git a/vignettes/guia-contrib.Rmd b/vignettes/guia-contrib.Rmd index 2461a320..c0b8d7ff 100644 --- a/vignettes/guia-contrib.Rmd +++ b/vignettes/guia-contrib.Rmd @@ -365,6 +365,54 @@ por causa do nome, segue breve explicação. próprios dados (11). Depois da documentação, um `NULL` deve estar presente (14). +## Fluxo de Trabalho + +O fluxograma abaixo resumo em linhas gerais o fluxo de trabalho do +*labestData*. O fluxo é composto de 3 partes: 1) a da esquerda resume +ações feitas no gitlab ou entre gitlab e repositório local; 2) a do meio +são ações usando o R com o pacote *devtools*; e 3) são as ações usando o +Git. + + + +A primeira coisa é ler o Guia de Contribuição, que é este documento. Em +seguida, catalogar toda a obra criando uma +[*milestone*](https://gitlab.c3sl.ufpr.br/pet-estatistica/labestData/milestones) +para ela. Dentro da *milestone* devem ser criados *issues*. Cada *issue* +deve ter o conteúdo para uma semana de desenvolvimento. + +O desenvolvimento começa com a criação de um ramo para inclusão das +contribuições. Cada *issue* no gitlab é numerado e para uma fácil +indentificação, o padrão é criar ramos autor numerados: `jhenifer33`, +`alessandra90`, `walmes160`. O ramo de desenvolvimento deve ser tirado +do ramo *baby*. Antes, no entanto, atualize o ramo *baby*. + +Com o Git no ramo de desenvolvimento, o trabalho de inclusão do conjunto +de dados começa com a criação do arquivo texto `txt` no diretório +`data-raw/`. O arquivo deve ser um TSV (*tab separeted values*) com +valores separados por tabulação e a primeira linha como cabeçalho. Você +tem a opção de fazer *commits* quando convier. Carregue os dados em uma +sessão R e gere o binário `rda` no diretório `data/`. Em seguida, +carrege o pacote e experimente os dados que acabou de incluir para +eliminar qualquer eventual erro. Escreva a documentação do conjunto de +dados no diretório `R/`. Use a função `roxy_data()` definida em +<https://gitlab.c3sl.ufpr.br/snippets/46>. Por fim, gere e verifique se +a transcrição para o formato `Rd` aconteceu sem erros. + +Agora que todos os arquivos foram criados (`txt`, `rda`, `R` e `Rd`), é +necessário fazer uma verificação completa no pacote. Se problemas +forem indentificados nessa fase, deve procurar fazer a correção antes de +subir. Se não houveram erros, então faça o empacotamento para gerar o +`tar.gz` do pacote. Por fim, suba para o repositório remoto no gitlab. + +Na interface do gitlab, faça um *merge request* (requisição de fusão) +para o *merger* designado à você. Se o MR for aceito, ponto positivo, +você pode fechar o *issue* pois o completou e remover o ramo que já não +é mais necessário. Caso contrário, providencie as correções indicadas +pelo *merger* e, quando prontas, notifique-o novamente no mesmo MR. + +O Projeto só termina quando todas as obras tiverem sido concluídas. + ## Referências Bibliográficas <!------------------------------------------- --> diff --git a/vignettes/img/workflow-labestData.png b/vignettes/img/workflow-labestData.png new file mode 100644 index 0000000000000000000000000000000000000000..dba0b59622c4408cbb05a3224ea3cdda42c90999 GIT binary patch literal 145869 zcmeAS@N?(olHy`uVBq!ia0y~yVE)0tz&x3QiGhKkrOQ5&fq{X!*vT`5gM;JtL;nX1 z3=EtF9+AZi417mGm~pB$pELu50)wZEV@SoEH+RcpMBINfe7L#SX}X?=yUT<$M_1RQ z>jZ_8uN+yo@yXUBLcN9;BNiFD_3o9fSDVGc{Y^q=L6U1vM?=Gv#ox;g1-{$%=iiJy zzvKFpo_^Tz`RBib&u`3~UHdKX{kxktXGS)qMzSz~!3CWqtC+zo1_ljzm0u8MhJwcz z#tSk>j~>;nTj!%D+<nxGhYcjPinY^@;gzqBn7fOMjCEPgi3y79)~!1$RqA}XBq}PZ zpy0!*(A7CPIeoI$*UAd_2_821s+S(QZDHuE*S*$94S0MnfAZGS(mHhbFu$CQMcJDh zGmX=?6*lDapWb9?X?cBpeEj~p+VAh~Ha9g*2{k@!;QQZVgU;#?P1_}WFME1=IyyRb zi|cROzFl8iJJ@UMoVLD}Q>RXKbaWhU=db^8kbQp5r_LgCE{1^MnoxEIh78NDMf?7I z^4=Ix^Yc^cOdqqVFBwe=v;KXVZJr;uqu}Aq&FO}Qh8zp`)&AZVxg`I9fzN!q+9OGY zadC3<&mYg!a}6}{ecW>6%9SgJ4jsC5X_NPKz2xJ4U%!8U{`u;U*Q*ySSl~b3Zt2pc zBCa2Q*2wj@3mn?*6DU&7ci{0y7N&zgK0fA`v$?T4eEq3YUNslf?(8UB)f2bUZ=TK0 z!pFxB9Xj;tRaQ$tZtmJmS>L{Y-(UEct*+8=(x33#VuuZWNF46z?e+Hdj^2OwXt#L$ z{yJN2ZSMJL8n6E_YHMq+{_e42)v8aQKCN1_Mn_A_iKAD}HmXyam0^Xx>A$5c3?F{} znP2};QqiQ~!2$PvIaBjsdF!$_H#R0KD=Gc@`r3WclI`2eZ?~+}P*QsI@$vEanvbm8 zTU1V-IN{N9VUcS$pS)d8LV|#t+`9E3aQ^YfO`A3u85v!=bV)C6PX)-J<9(La*8e{q zm#_WxC9{yn#5aCVMWBK}&5wueUN@GeZQ8Qs%&Ak0GOJ!*TH4Mh>%{T%_iz8XR#%T4 zS>oKzr>d%IX=%B0=T1*g&*$gomlqWonVE@ox|sNuzrLnxY5DUl`<=41^Yd)0zr9I6 zKX2=^yKAP;n>TOm+PBZ=*WX*{%%1mf`~AA;pr9s!Tl;EvH#RcHX-xI<pKmvJ?%cIg z-pW}Pu_$iIy}fPy{(n)LqNlQ7cwD%8)z{lQSz?)czud-+8@=x9F*x`-F5+)cJ7C$> z-|yc&|MkO%3)in-|761}<Lql|f|vXG&M<JayZHRUu^fK>{&#nG7jvIIbEfLsn@)kK zjY+Nr1s~4LG@d+payzed+53BY<Mvi<RbX2g^6K5Yd6On>s{j9Q+Pik44;6d%)&73u zvcLTOz2N13Yom{yKY#w-y?NUC+1aZTJME6WT`ctS<;$}(ji0Yxzi(3fj{5&~b6)62 zY-sTQBIp#myDWBJ%}$~1dFkoPkK7V5DN&iAl9`>&-D$_rz+C%<F`zm%HC0kla>dfx z{6&iw2YUMpMLl?Sb~cA%eEj{Y>yKnVe)y2_;$`yjzP&X+jXWn!ojP@X?YGF&yWTHf zx^(H1B_=}0qLWiouU0V1%F6z%*%BGM`HDyM8&Ftxc6#1z{n6Oh*Y~H$*w{F4YS5Oi z)>i}m&Z=r*V2EN9s%5wm7ZM`kbmHR0i+AqqVfC+{-MKG9M^8h;fj9j|XJ_Y%i!Sou z^rsoTOrb?dS^59J-|xj*8n-W6zyAHpmp7Z1Yfp4g$k=mWPvz%(QPZ_}jVnGR{Cw>s zaqhk6q!5Y6iK(eyFS^U`-TQ!n;lbJl7kP%Q-~aq9zS6aDi^awF*VoTCO3rc!3KDYi zaCc`fKN=Vi8L27Md11CtZHs{47eS}(d3Uo4CI0^Yp8sFDO5JbHjiuh=q3#Q(srk=) z^Zfbp4FcvB*K@yZ+q5ZaciG$ME*=Jkd(*!CQ)XwVP@eO`{EABb^K)}!cbB=kxqYgz zk(ZYb4-Z#XUL3kQ?BUj=jTXwvhYuV$aP_LF;t_*0Cnu}d|NVOX$&)9R#m{Q~|NYLj z^`c4bzdt{Nm;1T8y578f`~BVB;s00`Z`=0m!b0ctb8|esy<gwh_;`k4@-*FOwfm8h z={M}`?7nVGIez^3WA=QXFV)}Q^~$HDrfRN9l6W>fzRt4lPeoDDril|Tb_gm<w9Pb1 zJ#}HBv*@9WCHMWjyiWDo|C5lC(wgXT=kDEhUTHO<&bpsZrypA!v}?nL4fAZPrKF_H zmKH=s-CF8BeVR_Bk_eY**wm?0WB1kEJbwK6*|WTgM>gfu)z#(Xyg5Bx|M$1I)&&n7 zT0ccbMiv$pax6?d+@^VD+Qf;1Qc|-fPIL^MGI#FX4-XH|ojW&rLw00j<aE8*Q)ka^ z-L_56EN4b*tLx*Zk<&osf{TkwV&cNtvuF4B_fMW2%)RZmn^5PI_51&A+PG2DAc4X6 za`?KK&b~f5gM@}dHf9$uUhJ2*KX>NLmMvS}Tw8m)Lr_^{*_Xfr250tGe_ynC@zJD> z+qZ9DzkdD3jfHzvi;Ii%@9mj6ZQ8Qct6#r)W0Q7f#x<UKoqc_Le0<Y9RL-3{w{PFR z-Z>`Mu3fXM_@H29v}wtbBPUL*aPOCMZs!Yq@qmRPz+Q*J;cV&KTcV0zK0I`8eVUq@ z`uW*eX_Jf#+wa#|=iV}LcX$7@(!TbWN%*sWe}98RVx!LNnKLa@P6!wq8_${bxnj?w zM@c`q7B5=#>-+otX=i5{r=R1IHseuz^5VsbwZ1++U%r38zd8N<+UV`y-rQ`S{Plj_ zZ{GDwHC~;!|9@m}fQ^mKvokY|3m+YMdwcuo>;LQjf3N3Q*e7efuW)**k>tJUox<v; z^y|OAnmT{}{p0fWd&=J4`hLIu{*@~t;-}A^J<6)3t=%tU*>w3-;9|G4vrM!9{P=i% zef;yR1sYk`*Tu@o$;H=xy}HP?yXwn}M&TX*|2((P?^(tA?%v*R<vSY^o$qd~{r%0? z$7f2sQO%EnmJ2%yAMa3gbaX6!e(vk1PlvvSgoG5Vo@ZCPtLEpYgU#%ZFR${RuJ`b1 zYip~Xp5Bf<3l}~-Jzf8)d0=ep+m|mhlah?`@9jBt$}6ujE$x}Rd~Hfvnpyd~J9l@N z>&NaAS-y&qkx^1o()a$;FJHdwEPl?#(xex=tKj6i-Mg*p4#*mOa&mIovv=>`KYzC6 z-rkmXcb8u5t_dnXuZG8mhK8Ef?v}`V{QP4D*XiJ(ps@9Ewpmv+Vq;@lF1)+DTUF>} z_4~c;i=}KT48o0UZ1%isZJMa;K5fdB6X6xVzGUuMwPJ;anwr}~n>%;z{8_*MUr>jl zws!WjGc&ouXU>^3XVIcXuikmwRc8GB{kuD;I-Qj`<Nf~sasO_y&OaZ&IgNMU-Uget z#6EfZyv)p(&!2D4ySwY{?d|-MMl9@=UtV0?^^}nziv?6H-hO?3ec_`;6TX~C+0@9) z&L?TqvMh5?OQJ+}c6LiZS(#ZlkH7Wjv*!0z)YYpiDq{9j1gcGbxN?V}lc1nr%*g`> z9FmhC@7Q7SM}J<`e1(o%x1y${Dk~{jmA;xXZJL_=jPCB!pP!$PoVHXW>*6BU#qRy@ zZfsO`I&u4U^_LeH7rXcK@$gLPmpp&C`Mi~s`c$vNmf~k;9*U)<r_Y`>>s0!g9Z&Dw zyeavA_PlxjPO8uEk+YS09;EEvcO>yd`mXympL=J{jC6El+|J_P_8FAi3|EO|s9apX zZk?Htk(a;!^!Nz#z1H>rK=HHVNUYt(`cF?z`rH3KV(MDlY4`2HLFPLlIqB))QBkLK z<M-9<+_$f;q-0CY!yP*;xVgE*!^3}81O*3w%&|;MOXK9^%)b-awdmT~=;f<d?@m1} zCZm4Xps=v;@-pAYlP>P+{MW`S&CzsYV>0{pB|COVynp}bX!rdcfvmi$zdSuXcbC0= zq;zv<@$(-aAOEbevkN)aFW=uCyQ6?naZB>?zD=7pojP?&TtDv23`1u7)W^qqKZzD~ z)_Hhz?A-bD%gf9BayC24-`{I!V8}~9eCW`QPcvuE{PpYC{F+amWo2c#xw%<cugdS& zE?>L0S3t@r#pAAQrp-lpvz!}qEQ{HArM{fj-+yOc?eFFD>mHq3sTa3LBYs}u3{~%G z3N71mZy$U5h3D{^`2BLz<2R*nKKaG4Lf_*HV?h26&wc6V=W(4j&$)5n`RAv``8G^f zPoDJLcVkcGX91_<{qplI3X}Z&__oWKzp}6R!0^BN`8ip;`TMi4>#aL5S>0d2Nls4g zM?61&Kc}#o#u0;}CmyYr`R^>6KWkRh`+Yq!mO_eKN?u+ve^;89r+3cj+S=&$=>|N_ z?|FOtZ8j`+?^kMhc5bfr|Co&tJp!AyZe1Jw_U-NMoJ|wXn@YC5ys}c*NyFIqb8p~Q zhUqV6&zxEM{+?|4l9$)l&!0YB{GI8<>C@HY_bvRAcestWRJgX)S3~8O&gn<94HR0^ z&d=+eerH!{_wmQEyUTp{MU<ABzMC&BBeN#JIVwtOU(ADN&(tQLl)8WOyxnge#Vys} z-|bpm_U=w({-XL%Pdr;LJUG}aT68wP{;%l#^hd@gmt|{QJicRI!nSSOxW)C>tXLt? zeRQ(A|2+G8JH3J*9}?~D?SCdnv>n{Jb?VfqHK8$!-amRIBqyi0|J8$o%@tGI+u6S_ zQdLorkd)Mn5&Q9S`TPRUR&MJzpvJ+4XJ=<WeeC1map3)x21e#5r{`M~GAUkJ?mvIm z%|CyBel85<Qh&n0V9EsQ=;WTCXUnmWm0RqD{+d;*UR_vt_{GJ=PsJboyk-CQOYqOu z9qoJD+mEjfU;kwK<8!((Ww%#{>o+<CgoU;JUz+)=ncq&qQz*UehuYkj)#~mGpZn+L zt_{#IF*D0s(I{}<^ylaE_WKLh&$p}X3Kq~)t^M*s&?)2fwY8s)+Wq^H+;ZXMWc8=w zZLO_WrFBnlQg-h%F)&!Ma^=Hm4-%O_*-n|#efrSv@9+PgHNT&8XGh`bX}Z#8IX_;l zUSF_(qMF*T<9)KAK%8#+%J++8+e4`t>*M#w#l+lM8N9sq_cu)u>w*UiPA85XTXxSp z@7kKk9c}mP|L>h>do+E?T&vPa^_7-)TvdL$#H&qy`1r$zhlhEmhQIjx)vZ_kmx$}b zeR^_oaw4t|TZKAXtWACW{rfvR11qlm{QSJo;M4N0F^kq0Tx)r_&yYj$T~<(P>eIWs z%cXDm{=AnO@wju}<jKKz&AH=i42+E*PrGvEipi&i-kzQZ*Sk&Ei(L>X&tS^hT*w%Z z|J842@y}0Budk2ypJCuwm+0Za;pDNe+R*p%k9$_1pPhaDt4^UsMaa|9k#YX{<DLgj zPuHJsU;pm?`}~xY7J*eORz&P7$*idOF;zRfz-ZOdrLE?>Dn34n+?@9H-CgPL+0S>K zNG>ca3|hIR{{O$PeqUpwqPlLsyl){Su2}N^o^8v7&Q8wh1`n6T|BPLx!L|G%m+h*L z+Q&+>o~NXzx3{(V%`{?t@8_%^wfE7ZN3ZtwUtQqXEE3n!)+1$_1uAO1Bc_!W6s%ag zHuuzJ>6yzmPYh*o{PXAYc{w>bRaMo`&(FWVxcGPrr*MHgU!_I*+e=Hm_vYVeV&(qO zUH|ly=ubZjt`7`7cD27w?BCN{{ow)Qyq>Gqu7xE|UAc1Qwryp;zP&~Hd`BOD^q90H z(@H_1;rQc+t-E&ZnrmHttpD}B8><&AV3_~n(Q!ULJ}%Z*bNOCxK5uteeNJIvVMR^T zym@lv2FaqLqMe<c73QBmf1bTn`Rl&OA2amz^wzCgckFt%oJ~c8eaY9p6=g+5Ql?o~ z&dxRu4hj+y68hkg$IwvK=pxVXRZLQ{^Oeue;#XHRC#l%~`QV(_>7lZ#>Z_Jh#)k(7 z?;M&kWy-5pSqlR!s=wv@T)uqiQpJ{<+S<Z(APp@SRs=47cV}nu!$Ym&`f)#g|6aaq zS&@0srR&${8>gS^6jtYxwJLdWL9w>>@4vsl{bv{?zPq#YlQMT<+uZ=U{^ga99Hy%C z5B&W8=xFyx-@dG@taI~hU%z~*Ie+~e%i?7#R-8C@&QH-YTZ88gcl^JQ#$}mzPCNZ` zU44B`<mM03isvs}*zj(NgRi?l%i6WM!oq*WHgDNtQ}yM=kxt>wn>U|5b4D+A*OGvS z)X196O>OVq9^D&%XK8blZQUOU#Us5O`CRYrWFGAjwJv*e;rjLKmoF=GELyf~*|u$B z_qEq9Tej?_sF|#s&n1D09wm>D^<KDe;lqalTU*<ACJXlL*^~FM>U`e^hN>2U@<|O- zr%t`Qr_$KO<jcLi)uExGcXyW`e}3lcwL39CTx1npE}PUHh?UHKa`tHX4sS27CKq{z zQkG6ThO9NKR%t0J9z1ZsVV|v?zW)1bYoq`E{yu$w{k3arqcdl1+qP|5e&G@07yXjP zZi!6pcdnh-dM<8%o$UX$D^|=fOg`4g%>L?`-tj)!*Z24T-&y=zNl6JLEd&BZudnIa zR0tkkS>W9H@APziL8ouuzR6mZWYnw|78Z7Pa@w+Gi<o{~&-9qRRiQd!ph1@y$yv)j z-dRvu{H5w}Lgcq6CnqyCCY+gJc<0dO^z)CNZ2jnBudd#H{`vK}_eu`6aDFo1n%lV8 zz5mh2%eh&HS~!!B_wn-a_4W4lc60>HDBZGX5fgvyv1I92uP!WX?(Fo;%*=fJTxG}8 z9h)|7y0=y5^tIR%ss}+$1f%38g)LxUmV4{Tg9iy|Y2VuJW>0K;rym^?18OKgKHkqS zX_RuXiFN<KU#lA%9lgA~il0k7wVQqCD3{IM%l!6#5)u<X{(L?^|JD{x_4{UKW}%^> zYi~?FR<ORnIbW|l>Do2*ISdVEOrT)bv9g+#IK!^?SHWE#0jKi!_fjR?{>@w8FK=J> z^_8g8iSy_E?V1l7KR;pqC;9ogxtA|qoM}<0<kYb&^Uj8<Z*Ok81r^Bko9Ex#Q~CMX zMxEIcCTu8we=qrXU+kWWjXQSC@IES)fAM%{U2t9~s4X-t_4?ZA<G%akq@-4TxMN%W z?LmfUQAwxEr&m|C7Y3{_SXdDk7w6>Ew0gDnyjVfSkdTm)mzPv0sp#tJ?o_*76&W4< zc;QK}<GxlmmmNBMSl+hk$-{>qKRrFI8N6&y#m7TOj<iH)CnPLbzFd8xhmo<d^s0r< z?R-m@F6G_Im3-^gtsR@I_hzqNz52D@lRg=L|MMRoA2-iTzctB6?e~Yn{PMO{CY7I_ z+^_#1`_K7$jHIL_hoW5n@ws7ZV|SPR{`U6nuF~oc4;+PeS8tX3J}osZt?2u*3CC-n zNY@uLGQ1VLBPq^c+V*>ab_vt5&94h|7tEYF^Y^#6hcDmLPT9M|HC}P{nUg0ge|&g& ztXKMDP0h@iGq-Ntx@*_2UK79L$Bq?sN;wMT<>k5e$sEj`bEoCIi0jqemVAC+?%!~< z*U)&e{eInSv)o&=OtYnKJ$>-tL04B-mGED2{kRP}x7S9Sx86J@nl-^|X}7rkJd;eJ z!v@Xl{CO*CxBq?c?wZO(50Nm<623qMq0VEy(%X}d_bphUpsTxf%^Dq>WX*7f{R=r3 zZrQS>YIdn)+sTtB9rLA5Hasuv>gidtUEC`%G4XEeovZ3k%Z}u4JUw0ivElvM=J|EW z)B3B$Oj*i9K7apy{CP-gYwPXp`R*KRBQ`!-oBGpZ-EGl4juqVBZ7*NExbnLR1H*-X zpn)l=!^SgBCcW@hnbgWH{_f^x_VQy#BlV{@JvbA+@cO}ZvAb<-Z9h)=#<6h96p@w* z4hkz~zbUfi3R@G=$nIOj(X=3QSM>J0Y15`vcse;T&3nW=-+s!}sVAS8>6|uGy;%R_ z!$VLzmPexC&yT{N6(95-%X)fvSQI`wGRrhuNlD47>`g~Jd*1Yqp{(yxlvPz(zlTq& zzZfwsc3;iUCRXlCmoLBGmvPE9aLS?PX%DU9Q`6J6*Btt+e$87)Z2$j%zZbjp&N9!R zw|e#KWxlfooWj?|94rri@F31psPoC0nZ~8so_>DQPNvk@)&KhPve(5T>xxE8fU9e( z(^Coai_2~D^Yd-ezD$p=dw5PFnsfg-p2J%n@Ya5O#OmY`9Uc8}*`BXyCwsqaPn1ae z|L<>9RFwUn56p2*_MI!viLTwVXHT2eRSnnk^K3sxycJgWE0F#E^r7&imBGso=@u~t z1W$Ouyx>^Dvx{q^w?js39^_rHNWXgRnx2l%9NX$|-`?KV)zLY0`0&q~ecj#O9v&yQ z<=z%>N=;4Ov9m9m$Bo0b;=_YaPfv^M#XMM+bx^l2X=6lPm}J+YJ{ikRd3UY;=$rRV z6BZT@4hs5oT)w{GrG?yun`@)Z+Y-;sv$ZaL74q|*)X$$kmo8n(q4@J4+ox5lSC_xJ zVOaCygTMV>6BQMf`yL#^-A7qjSyeo_S`Ve4pO<@M!^0z;!XH0=oH}*tk1dJc-`zcU z@E})WNLX0j%}uG7m-$*WKZ!G$>9Z~AXxG7Jc7ACyo__hSA3k{a`W`JlpdA|*C-<Gp zWU0-&$8p<l&U^j2_Q?ssb++>oXUw%Ow*z%ER)5gxTBPPbFD5j!^vMaqKW1wqHZsjO zSr@gHYrbG&_Vsl~r@NQEyL0mHs-EH>9}-(GOpmX-S;4;CwOj1r&$7B758F>q*DpRD zIqmNL`u~&F{R?<LInJ6j>)cFZcEu_4=ItwbdTQ6-AKYAA9}+K@{9sLw+;%UU<LcF` z7Wdb#Sg~Ta*nSREQ`3q|>Th0MT^(QdQ?*W~e%rBLw~nr^N$XouZ?28ro|cjlv!kHV z`r(tR6AwNbMAX#$Y2g(9@G<hc&4z`_jQaT*IxNR*R|hZm`!U7N)O6}>l_`_w&#(XZ z$Tc`Pxb^1(28LHp-kyKK$q>M$=l<ox2ML=B1M{op-{0L8blSFU8>r=E8@l6JnZEvd z-RNx(s-G6ke0pZ4@#RaGE?vI-{r&y>tHbptdZ_H5`s!7dja<or21Y|e!_Lmm<NfmA zKYzBa{bi!pV7zu^@bX8}?~Hhg-{0H&@9*#XyUYFe%?n)}rr6Tc({ty}9lPIej5}SF z_J8|+zyA0^pZRuwcfa3fUG?R~RPFFXhYue<bcl(WSzIR~Au%yAH&<3jDCm3XgP^_Z zVt4=g_3P2ef9L1fb_)n`wc6R)g|Cl$%Ju!_Wp>3UZ{Fl2Cl^0Bz?fI|A@%e$#TFi3 z-nVbx?p%3icj@akfuf?KS$4Hmm6es=_g5S%uuR%t_jgC<ZE2;cULWu7o-=puPHDN~ z)jPV?o7wsA?I?Ww>gww1@9+LzbeAtQUj1Mr?+hQc=nV;sPA{IFo&D+So|>OQ8X}MO zPMd#7{(cLi;*<C9_3fko^h%qTl$0#<nfdA1gUFq~iv?K>GcPS^X6Ki)tEqT#VId<U z<DHg|@%4YV{t5o{`SZ?yA&cF5xp;Zku30n1Yw5?2A6JL3H#0U4-celexU0K+r*TB9 z?C~AJ*Ir&;emz!NQnK^BTTgHA_Wb*GUtV0ixY%7kaudsZ0i_nbm>ma1@9n8Hjyv)A zqutLZlMlD^ySur??W?K$^yK8dd-u4^4@~k<*&%G>IqCFt{r_LD$3H(a^Ygvx_o-=V zkFrg@r|C@8zkgw(L!gM9U3PYM^!I<McV7R0a#A=i(bbjJ&iV4iixcOsjaQoZ<M(fA zX=(eK9~(UN^%xe!g4<)Q)^5_$()l+xx&CvPz5k}{$A^bIckcY88XFVi<m~)3`^LUn z>vOLJoYd6R?En2(e5f~PqjmYag3Y|2e*W>CtoCq@-03rC-dtSF9+#b%n3$EdE90V4 zt8~pKo!w<`qgp2H-CG+FFyYWD&&g`0S2*V#e;gSZ$;!eq$F4T&;T?y#>3XpqlVUcd zaF!b{v;X&lS<xiv2uJH@F`I7}j~`dJvWlv+w7XnTQZi+K=gQ5SH+OcPytlV{YTfn) zO-)Sx{{F3&GQ2!IF|n~v{k<(_&YUSHC%5Cea9UQ@tCue|>%BL9_)ze()8*@zFWd6& zdIgG1Z=0m@^1*`*+1J-inId9y^YoU?%dhgXzrVY?W6!p2-`aSkcRW4bFMph|<n67} z$H#iBzrC4hl-f0S?%jun+h_m#b!SK6;_&rxpQ`s3J@x8ZwBuW8lfs*~Z$GZc)6v)G zzyG7BdA;M$-@nyWR7?tYzrMb{yr}3=Us+7&+O=<gzu(`_9kZ)sW%l)TpJYR<%HF(q z_ikN*@ao#%-wMMguUWGu@9wUn|Gvj1a40r9Jb3!F^}WH~s;{panc3IH?w&ULijd-x zrAxnly&ix1{+^k_Vq(X5E3RI;bZc+5x$kA3!v*4ZVq#+c{rP;pt*_<El@Nb_|DXT< zs;Q~T$;o|k=a~K?J3G7l?X9o>{{F70%*)f8m(z9rx&Lgl-2eanf|B&^-M`!A>uy}| zUBk%mswv_1>?=GB3&bW(p8WRB8<BSoAz@+DCQn{`;ij#oCTIF#E>jUvQCD~O@>f?* zUcI_?;>T8@P8Bt^Wy_WwJABx=?wVhphl-b{r=hWNae4W4|K%1zD@`mdZ=OB7HqS3U zC}`2rrArqtKK%HjMBBuZDM2ekw5D#-$xccNGJm!!C@83;wDhSu+d>U3Wo74u`lk1$ zxhNfEc77TtA}T3)b9Z_EPjN+K<I8vM?9r`Kzibj46{RJ@#mdweprOLyq&4-C?Dfl+ zSMPT1T6F5vsSjHwF*P#mx7)gPtD2hHCr0n3m#$p7GG)q?K3VHsJ9j?(csXcgh|<It zuU>ts*t2St)+Cj$U%yIs_NLz4w8@B>nR%v<+vP2P6y9`ob-lj6{`j$DUMfPx#l`aS z^6~Nam)&RRUTv?ft!-?)dC8I^M~@!8dR274Lej>F@bGX2fh$+81c)p(c$!^R_3P{F z>&8Y#9+OH+N<eeYo7Ln*yN{aqJ`Rso5C{-yjn8dMEGUYJjg1WrZH-Tyq_VR)AU-~R z-+T$D6)RS7_=jKJo*)0`(Uoi0!a_q|zI?e+M|+|N4=-<}O<YjWq_u0;_Vx9-D0%w$ zoH=#s($%YP@9nKtHvSSG8tUrqK7HD>Z?CR$o8Q>16CD-R6))E5($u{EyN7|1k(R#x z^-Gt8xLTbSZn&qsWY?}Jt*NhGy?SI(T3Y(_{_YnqUR=0vVa^<x*w|Qi_v3=fZddkN zOE5URby&m?nn`D9U~4+K1I%IoPq%}a7aS(MV1DJfdLnEs09bTEqrydYFw2425ux2h z9xTSd3+feunNl1=wO|H=i2%x6K3EWJIG8o;4cxbinZe;_S67#ckf*DwYfjFZRmm&o z@7=q1>sC{z69*4EUfsyB;G0I*sdMMtIF24aK7IQ1)mC$URaR9=Nl46?J^S^`mn*HN zmAASmX@aKLZR`F-T-|7raiD>bL(#&(L0U0lT4*T`gGRfD%CG&8_s`j1aPQu>V)^%t ztN5Ou6`K4wDc+4w)+*)I7R_ch-k?$oh82=si<+9(zrVH9TWji0i|WYen=7prnXgzO zpuY6j()1<gW?Sb!Tl4bSvuCUNJd8b6COx*7x3B*<$;Yj<IIx*nS>4>&(6a6L<MaP> z-nDSbJ09bo!XZ?<fK#I@YF9~QQPQs|{m)CvO2SGl&IZTDRXx46^U9YW+~Q3S+T|P6 zx;i_5R$O}0`8fR-pTwfYYgfN2nANy!<&W@<``P7Y+mv3Kq&ole&w|X@nd@SAZ!3Db z>b!W(+h?y%K3;h_J32Oa>ZDl}4^H%3m%roS;0P$SaBy~5#D7KZ-`@GQ$%Xs(W!=%3 zH-G--y3bwt*VoRpEN)ws%(x)-vEQ3;o#^Fpn){kASRWK$_owWCoy44n+N~~1GcAkF zI=6_Q`R%kfsHW1ySJrahY)8}Oet)@qe=qo|aFIRBC%Nvu;jCrr;<&rIc-xoNGDt0w zRR1PpaX5S$JHOnS+23!z61~6ruIt^ZrJa+uzy0;?$H(LgtA)1+sr+*2)s5N`;ZP!B zpVzgDIdGXt;HN&@*U8C?A2!)BaH$A+u8-ThJ=ZQLC1ug8h$(E_ADsL3Mfk<qi%Cio zGd>-^Tz_Lre694S*NZZ<&i+zOKlk_Dix(?iMKnk?yU4FtJ!8g<sqr<N%f5z%vM;Jx zSl;BTyJi26q@Amn85h*fG)SEEf5pjJ7gMzRm#uU?z1+6`AJ49=Eex)K^XA>%URNG4 z+3){`PoFO3o9VQb$zPB%=(h{-7ICe$$^6un`Z`3`W4450&YPJB6efBsdF8;6;l3_* zx0_P#+0&l{oowXlzjnP(KR0LXD~BtW{{3ZF>zTc<GSbfJ#EBCrhjvK*{w^O-s^HM; zxQPGCrAtdsr=5>j!}#};^ry3{bd!&>1&AyKnJBIzbn?{H)naFUJ6&zuGWA^FIh9NM z%HGae#T;mCXlR(u)a=G1z512IEv_xU8^W5_Sv&j{5f$~FYqNXm+_J1ysfpKx+t_z- zx9mCQy-#nwp605Ol6C1NZ|*)|@z0kw=5D^`a%sW^>w~rIJL*3i{GA(U$?z)mVUufZ z6<>Z;aa~TzG=~%AU*BA*Fr1e9IR445iil6FUH6%N|92gbYgJpSDkj8oQ2die(}a^R z&gsei=6iSMvFTRF-eoIK8Xtf1^r@45@3P|3(%*%b7pj>(f1W;lxrzv%%+0MIle}!S z3^H}UDyRg;MD+?phXsX3>u%m+_(}F*PGahfDa)r%pT6$q4huWGbuXh?8klu|IsBbt z_47A7qx|+wLWP-EAKyMXRn)XsT>FIR`+Eh>QNjMFtqyPSf2a05W!hGwNo_y)BsL}g zK4-Q{hT&_`_q>SBR&V$8obl^8m$`@M^rq=`-8B{36BRmkWzYU0dhny{#i@ybb$vf3 z@3fOY|MjK)meV``ckd`vT=vrNbH$&P^5<(mJ@LFe|5Kl~me#9>SC_w>TV{0GOZnYW zlQ_4X?yOEPLUZoz^WC2F#@BAv&EJb>);_CyXrBLc!u6+DTPxSkj%c1Zv2*QK<$Xu> z8P2kT{8IAzSzW^Q{QShS)=7&_UC`Ed@BMCK7J8Or=lbiqyK0}S^_*vZzhlOX8F%ev zXPVYF7Omd<JA6;yybH(Aue>*99cz=HOUkmTYySM3pQqx!{q97sm#VMb%=WhZ`7@`w z|G!PmlL<kOE><k}`>UpxXmht(Yop&&InkxAQ|;?Ya}QoWY_+>&O8h*D+37jUu5S!( zSG)H4$xCK)ed`?uxT6@>@iTqBd~>0<_U4*tsokHng_1v4{kF=={Ji;+_hy%+wd|#R zRg)C;R=>J;{M?~i0*WdkpLUgOo)B`SsI#uDD$}WC-NKFQs{OOu5+}tyi;j@KW%1|o zJQXjkQy#i%9EbKU-x~DmbB}~nKu8Enr(MNySKE5S6Xg|`PkU#tyb{i8a<r=Ac1TC| zq{pAn>hM(9JW5U3*15B8JtLouoag19<nYgT&J^j*pL{JyU&-jSw`%NN-M4dmy1BJJ zhPU+16HpA%op{VGt@HFM>!{KXZ&IDF-BxthGfl}@wqn7e{~Pqq-U{~ieqH_jz3FSs z_nS^nUw7vJm(yxu%QDrp*Q%Irt~pSUo~b)^T7<^hrEhl6u&tltH^JrpLBCy9PD|xQ zx9jaU*=!PU;*+40UjD0)We2vd{(W*XyW&N5U5425hFPBe{>wFXO`YnYl`Y?@HuvXG zPv2f0dv}?lpHH9OSN?A!?0WJ=)1B+~>-MSXt#;yYZB74E_@po|P130&@rL()+tWf* zt;$UOyH0cOpRKcBOtIwSmCbX`Y&y6&Hdn@{Z0&Bj&*f>_%}3<yYL-l?VhD&|xpL($ ztFsc7^F^lDKYX%T+}~KhNngo`so!RwoQUjCi@OIro<CZdKE1x*h2v@Z^!s~6sy_$m z)On>voot<4KYPaOnKNGg-}S!nPdJOy3I+E+r|<o~yDOSk?yb;glj8f!qD_vPZ29`A zsq2ThWqO}`1%H9Wv-j8T%w77DEt{>>wAPF5XSt2#z6Xz1rXO^?xG?;2$=9v(Y(?Jw zey4VNlb5}gQBarenpwAU?sF(B3r}nOC%!;c;UfF1<^A6egk4*ZzrgmHvi_eNr_Sy8 zZ;(DK>E7%IPpucdep30DgK4RXh(Zfnf1&C2Kg$#CzP$3D<o-?m)>3ctZvN$!x62JD z$7_3ORmshJXMJa;3a9$@zUJdQ=Glqe`&Cycmv{GN*!-&u3*N=;>oGPl%B!mEk26~r z_kYU_KB=ckiK#bEo_o=(xtEQnSnkuj?3fTfrxUmCExCW8e%9^mRjKaV@BS><RX#mW zY%jZ2oyFbT3!3@9i#7^y{d$_&U-ylz%_{0vlV@?wrpw;)_dWA6UROpwW#8UnRc2bB zpY&a<<o}CHKY5*98J|B~%<ikN^S^KR_bp|w6LkeX+0D9n`}p~ni)ZfL?6P#~`s^un zA$!EajkgpDeQ62j^jgWjCtKkn`+JS1Klk|!`rTi=;4J;RRltc!@%*J@E0%eEyPx#G z#x2e*t^7}Z)cX65w{M;es>>~^*|%^b-}lA$uHOArTIn0P@yXgZTnr9^n%^1KD_d6X zw5!W`oDmeP8>}&TUXag(mcDfY|8E~YE_brl)qrRAq=1B!PyVMjZtFX+ue-9!tI&D& zw>P=gMRSht{NH`zyk7V-y~eO$8!f9>kM(o!{N1$6t8GecNXaI{Q|EtPPn;kzyZq~y z&#|x9#s7L6xw$F)l7rBPbB!+YD<o}g_wHAg-}X}N)nBW%>n2S#o3&%V-s)#^*{``c zCS7>H;O;4pxMS|KXJtN!O<>5F=Ge^Mb$Y7l-cZ~5?`LVP+_9!>l4;pjAD!=v*Ds1n zNWC@*`tkRq?b^4!{eMM{%?&Y$^@<8Ap8x5b)C+45&97IgAG&I~yYkEbe)DD1mLpDi zo!#lnzpH;g<EOuMTmHTB-K)K~r%h#N0JR4si;F*Zd8uxh{P17jnfm{m&g}mcRx~#+ zqU~VnuF~yQCDuDvZTfb9>YvTqR_{*D+^C}bb^fzCYqkWv|HtRF_8MQ=`V|7z6%|`H z2{Bxm+quy*v@~?{yh8>$*O$*sjBs05|9Ss(V-CgR>tuh{+`IdrzO?tjJ|&MyFJ9$I zepQ)U9Tr!%^E<=wUD8WaOjMHvoNVkYzjN>BDlFyR^&v7M!esRy>venfY<bzbvs^~; z$iLq!95^19d+l^T+VJpPp6!}C`!61KM!q$1iuIKbdp~_HekK2(_rUBAW_fp3ypmwZ zm^Z)dT}}R#c9ol-^7o#)Zo07k*wTGkDUnB>Pws!OlD=eGM&{?YbI*88s;IHvxnsel zQ|B~(Wu}ExxcN?9ldRr6@2_moBkpza9fH$CZTbDLUlTmynp&JKJLhbr&8Msf#m>Ta z5AC_Wva|K^^6z=Ii|Rl1ALbVS>#iZPZIc|s6{&vrdA7yt+QZ+gP3!MIRVOklCMF;; zW!3Cot3KRZ{AHF_=5asS9^bEBpS0!f`(3*x$g#B|@gQep=2EBJeckP;>d}k4m(NRG zCiZ;EbXV7u8`d-1{z>-lS6cI?=T23`{oNBICTNRs{PaH*w1?edSB1v8S)U9{G?jF= zu8DB^<e_b?%<L?y9sPK9<9Y7San)ZoWj@N?e97hHFWHvE?mXG|xWBBsbn&WZhyTWn z+w#30&gltyC%b;4hkUD=_|tHSSue^qnI>g?J9bo}MIin}b&Yjor#q{oz}{L}Nw&HF zEcYlpFOBS6q7eS)%|Z{grPcf;CRv}3oYjB4*uD4T>szA7@*C2cE59`Uy16@D|D@E` zw09|OX&JMge)OD`6fsTJqsd)J<S0jrO_M^3(JU3tBTBQ<e$)tU|Mh{@#zu4bjy0>2 z)t#M_WixeE_lqgEyl+fOOFU3|C#Uz-tW~+z`#E=)Z~q#~xZqt(?47<h_Lq+wGSc*& z#G)kNyjkb;sd_)jS&4<+I*uE3yie7B$X=DYb7m@&;{8+SIvhHFcPUh|^t)dYnLInR zO<>a&vsK^Mt+*7`bzGgZMWgE>cg2pqVxd_1YvcWQ6R(=T`a`+WTLsj4`zAs{gD z;+K{4>o&h?UnX+w{<j~p?ktZcs@OTPILV#fByw~D%fSmgjzV5GS{6E|r%ewNeH#Aa z73W!9-Yr{L&)&LxHCy~1=Wf<u-Da@{7x@+Q7cE-Uuu(qmc2UID#w}~T!~Obe&YLSJ zI9zRHSWwk1rn_x((d+BsmbII1tIt{{ra%9mkzU*R_UJn%Q)kcq%`eSw_V?M2R~q*A z&+jb#zq{h)o>k0@S)99S7{4ax<=IufT5`eq;3~c)yicD$cRAYTJdK}WTmJof@%7db zv6uJE`}OMSiH~>f-`?SitlRwO>-DW`t*@=J>N0b=eC5|!?LN87AKG*;l!1CNnI|Wm z*N^$RHuCU>D;)pQ_7^C6Ty12y5clEdpJK=KvbT5FymGkZl@lY<ob}+&zMV3%vZlN5 zK7X}!LH_l%hUVtsr3wzQp!U4b{PX;L*KV}Q{77S8pr@~|pDy06?mxS*U!^oKHn{Y| ziEW$H{a0HFY;Cz+`{{FWh-}BFhu*u5)6c<s1fqE-EPwtM3}s)GvavAm!&yFuy#?%Y zyxuP}W<~AKJi2p%@rBIgsXuD|{r#Qz+I;<m4fA5JnuZo+if@qv_oyO2?F>J^ZuND& zD?N5LCcd&ZyOiHN-1_?Z|DaMGhAr+jcK;6^u5Rzk-(BMBEVci#%gOF({<k+2@}Ajp zS?bxdXV3NL{7t$l)4TJ*=O-_l^~26u)<4vVxy8DcW%E0Rt?ELZ$NG3@7~~!6NK6iu z^*#;h)0I6xCwswDyutj|?)3Zz^3V50Zgs6)9=$O0)rpUHc~)7Lz6zgV7N`mD0C%On zF4;2G;P^(bkn16DZ|%N$^JwDzeR~TgvV%P#93Zl_{(qx!qvPe}b<duGJGax5XKDQW zwf6LfYJP{!4~+i=9=4NsWgfNn(%)CJR=t>UV*a<9@2}UZKR6QiGASv^Zk|cymyW`$ z@`NeVr{CLK{yFW%)MCf<2VDFCVjf=_pJ`}mas5&LaN=U}F}GuEzuao~u&=UObWBC< zcxdR}f7YK)rhoqb`Q#JNdGqG2>f>NAbq>5TS>6BN58Ds#?iwsVcTV=~+O=!ngvf?8 zYiS+vTv?b@xH3Q^Vq?+K4-XGNII^!dKm;_ZYQO%UXqo<+&5Mh})ytWgokQ8LE|_!Y z%%4L!6E%*WKcD}rXXW4D-`m@27Pw4!!F)C(Bt&JR$CQYLix)5UPzg$E<xpg2XMY;T zalpEJ(TX>3a#X`!ym-+e5cF<&oWDQ+u9*F)LY+%itnla*-FCDwF)xoVy>>yb!y<l% z$pS1j5eyaW0xXRJP5!n44D4(H`UbE0zynGQ^c{JM>RYtpzyXI&mqo7}7y_WfUk=_6 zMDAa^_U+cz?5e7&RebCWt}LfFt?FZBFm(|4kjVHz)=7ZHiNo%z1EZZmiczGK)1kf9 z-?!!5oHT!azd+T82aUbGy{i^8pIWkfd3s*nx>p)e+(qIHvp}ml?`ckW(OmVAnR$=0 zTaU!X!pCm$@$sSTmx?CrX1Jg-;RW*tzeX4NE8W%xmo8skAG@1P_t&gdixxe)wA5SL zEXRQ(GAe4GeSMto<=PXm3>iWmUl=QvJ1pXV75e=^#g`Ws7rA!dxqFwHnK@KkJVRK- zb*^=J-qTZ4Wv$D4`uf63Ep!=oax?TU)aW|@TzRL<{AebI3ke_xnU*BjRDC&d{5X4^ ztjVQDX7*`1kwU`4k6*rA`6^--Z`xhP1%`rxf}q_D{{HS9o+^`kXPf=~aF~A;9~T3I z!|zA0Uvo$9TlVYAWq(1Z=<Ru-r3$)?y1y9qIDUV3H#sS3N4>VTb|RlCgNfXh7tK`% z8$aenZOgg2ulDy9L&gTNT84WME-ZAu^Z5O~-+piHo`8}<2Cuxld`m!J;KWtTnPwo5 zGRMcq>+9?Psd##7>MCCFHlhWc3K!WQoGm!NXQ}ser(!#h#w)FA{4$zaT3sC-8k%~# zy4tm$RAR0^ys|!i|39^3YRl5p?Ck8M3Yg7&uP*nOZ@KW|;^I(Q4v<cV;LL<Y{()DP zy*HcB&Go6|ds$)G_k!2=PF|_mv%h=Q<E%52+b^ouTS`ld|NOYb^R@Y!=83=G_U_!d zbLmo5zweA7Gp;l(Q=MXHXejSL%clC+Bjw-cR#;6-+puMeoMDcRZ*aYPTlJ3Wx!hKV zOS#zJ9y!#?{csXDSYO98m0u#Ry0N=-EDdYF_X%6w+O>*rxoU+?-Tr;eyQ(YK|9K>x zF5X`I`<v6{I_r;*T)&)~TdiY#t7cn5->PJ=-5El>l0DH85icITOHF^et?X-<>Df<~ zR=0L#hv#qIT=co%yOxelNU6nptFA?9XJ?paT`2K>Hkmj6&%MK^-DT6SgZ7vmu=WrZ zs_k0z=TF<e9X|v1?`sZ`?Y{Kowe^eRXWRe$X$ulr`YPgHtbUx!?Woe7)eDczkvXbf z>f2(gs^l-eT<&<^oPg2{kcSxZ7jSm|`v)FiN(2p(IZQc&JjC=~X`SNz70;NN9n<r6 zPB7WxBJX_JjzP-j;bPxF5tAJZU5iwNI{yfDx-hY`W&FQlcTv341u?F4q$4r;JPTW= zi&7~2r@V>zC)7C`4@EU8EX<T=;QjXZ`+fhpR-*QNJUm~%eGALASz!C%^G{|ro*P>- zh5wabUgpcp#?w$(vf!^Wc>Gn@J#fnM^zUo$%jPV8R+Fi#I{8u+TU2gfrSR10)9W@T z7Utxb)GXY?D&l(fZ^^;0rv;ZCxv)!fAJeqdQz;k4&P|$d`+9<t9D|8lRn@M=i<Q5> zm#_bG@af+NvEN=?T-?aaUi9Ct=EsHW*TY*sHf+~4FetdSB~xi4Wcb*mziRsncJ}!E z-G0`Yovpvk?_2Hq+qY%fu0q9S+uW{+MOP}{X?%XHS6b`lFYBcr+y3lYkSWj5`{cm` zgVa+Z@9q~qKDN?8;zHezU%!fs<Etwx9jEbMX{u8HwY%)yCs~6fx>?gguCTGYuK!c_ zW|66K-1Kn!eUty}+Otd7?25?V>aV{)zlvXV>(}lD3*~<LGVcAxc)<p=45IGC-SYb{ zU%p&vCUK!o#;U~QAtS@vIZ~iyn^&)#xRqga_W8q?PP%qZ9?|XzX^9(NK42+6&6m4z z;W7gwBhKC8Y|VAIJc^}1y>41o%V5&e+<dr0P+7o<TU;-sRA+(g!>Er7E#+5moBDm( zym@nN)%L43vr<)sCaGv0xq2x|%idk4%(iiv<h0b!n@=BJr+($y2_^Z?y!dWy%{3{J zW{OtNj~$(HX3HcqE;dDz1L+xMWo5Uo{?E(ub*_uOu!X-tP0~DX&eEl-Jo_2Bmif$7 zy1$vbq0DdZ@p35%iEXZ1XRcKJ7-$(P^m6HarE1=S3c-njb?QgUE3S8adR1*6cX$8H z8S|C5Z81CJrOnCh_riF^W`_fdGt-XG+JEiszYWRD%`$&%-?k~cJL`U`ew@pG^Q<`w zHZ9+oFlE!LKlzvU-8j1Pc>itl!?`7l0r7Qpbtg}rT-C?4#hQ_kaTOn9Lt4ONm;e9% zvgd|uo;!JEwEyc%i%!j)&+o!9Gg6}EzNaIH<jhySKMp+pclOA^#W8E%^u&KJ|B?33 zviLOL-}bV^$ZwtzS(i@#G4uK&=u}u(m}P!#ckQIvQO}u!E=<~I)hj%yZQ7gT())h= zy|8exfg(RcueO#}(2RL|=3cmZ_3g#Q?p0O0Rxz)X|0A=atG~a0l{3Qv$txBY-`}}u zsA>0HH>X3T^S|vgK@LUX;@Xw~c4gVv+J%|!wJidU0%Bopmu{K8am!C<@BQU<L5%lj zspDlkhWrx!H~+4$zJ4KSUaoq1=<!PnvK{MJTeVb8nI@j{Z2zBMudfC#uVqSZy}wLc ze-ZON>GO{#mmkWrwA{MwusTD2qm=qDGc&VQe2juG>Yp>PT=Y12ZPf|^X$grf583W9 z=H8tUFK+UdIbeNt;`irgX6C2AG(3~OEnvagR|Qvu&ejN&*_K@{pO<`3`s?S9%B%R? zKcD>D#A2{!&HnE*QnjD2{g=ji=MmeM;w&49aDRXONAI`2+I!eY=kSI*$t?o=HcP~v z_*X7^*x*ibUT(C9S8sFL>}wf+uUP3a3x8q=xIV}7^YY$k<0bzqPJD{)asRZd?44o$ zr)A+AXJ%#=eE+g-=?CsZ>ZNCIe&^5UEiNkY_4N%dEnzTm>lLmoF8;h`j@i#L?~Zf6 z9p`-g_4+uxHFa0<?4H*ku&Y$l%zE*cb6YD~F09qokDngi9#<O~tIEB9_MG{#ee)$g zm!}2A?7Q@MVWyU?vgobmXt$lgueb2{oM2{nez3W{Y?_?Sq~)(1Oj@=-Kk?rD|AJQ< zCSl6^722BeZar20UEP0kQ>FEpdfr>QOy(i0SLR<|_de(P-pz|Q7p<OpGGmg0Kx0PN z!;hYAiIp~!mPxckv~bAHU!vJ|Tv?;*;b+fTiJnalK6=jVc{Y*d@P?YkN%aSk9xqx_ z^754a{(!u#@0r%Q?^_jA!y4ok;}p{#_xnNYw|)PA<drFZEeS147dl(~=ghBg&y59F z!(Yz&!L2k+^@Gpk1=shbar5xZG0UChp%S#a@I%&}Mg0P^%<Ioxe7t)~+**eNk3V|K z^^0VEth5PIcrZ~#QQ#Ac(>{kE=aVP7b8Y>h(to7&<7N-Jm0xt`FI)Myy>5<W_O7DU zS1aBwRNSwZaf|)EMW@T8NjgnB@jKbR|9$c7tU##y!oXQyxtV-_FR%@M?{fd(!NgBj zJQtQXh01zJ@2b*$al15o!F|8YD^|JJ1v{*-{h+6<rS)jC)v7+H%QI$2O&6KI%8Kjk z#in?H7hCyn>28(R-IsFm`Mh~|tG~ZW2i0g1Q}pfa)wRrO-XC1Miq9o?&)=1$QEX~Y z7#HkJG0Lp@ba~4ei-iumH+jWGN9U%#ys`dyMy>5pYxQehtCbfy{i^O4{Lt!k)8zCf zm&L-XANp<RozD0+Uc26rhxP7?qUsqF*tclEy1S@f;L+!w2M=D~_AX-eD~Bol%T|7! z9UikoV96_oD{j?!C)RV%`o@^CYtp7akC&T=c^!G|cJ{lx-RsHUr`LTtxarZQJFjM) z+SRJ9b$W4JTWIL@&8t|IlHax2*<AN%d?j`A<K_FFtKzj&iycCzd;*8n-oW23@}OO3 z7Nxh2v-iJSka_l{wEN{N6Cdwhc-c>Q>v?EBQK7tYjoF7!e$UU@*8Ki4`H8)Kbd*!B z`E$EAS)bR_%#B}e$$6*e%=|RwS+94Of%(R)B@Tg}eM??#-M8*hE9(NiDgU^c_I`8x zy^yoh&MD*Or_{}Me^V}g%FJAp5_)_QOXi{{uBVru{q<$?Oyl$wR$`_L;-KYCZ?|`s zhUV$-Z{M!paA)=G^#KcXr(RvQ<ha_>y&Cnge-s{NEp>?rn)bi^%iCGEv|`pQ(fR+f zd&2SaP1>qSEdr-E#WdasfB4bUU;3uW*$YRPRxUd>_rur5jup}2d9u?_F3~w{S6OFl zsLQ1o5;E!X$wQ7Yfu{_54qc9%c2@gLN5?Kv+5ZCOu6x(%bbD5W#LQAZ<yG<H%lS8Z zLRtbG1Fs!kUaz*yF8p=nhbtk{f14aG+hwSms9bdCU}a&kssHz8eRTSjU77Qjt!#EL z|5N(<%;)FlnV6VDWc{j_?}Pe}_v9(hR}1pjEROyEW#Y?7&h775-CXYeGJbMo^9<|M zM~hC}*j<13-`23GW`VA*-ScPsx^w7^p1S?lE3NX8)7GwAd4x63-sZcFnU3Ah_ifv> zCwm^A&w4$!E07ho7T`+QULT(Gx&lu{(>{3Ah2<4RJv;s4N4tpX)ypp@%$+VJS-pMR zwqKr4O253<`(@(H{<n0&5}p12{enxMwx+Lpml$bg_VDA=+4lGAM5fG}dSKHV{dDvD zwKWf2@6_hz?&Ut%zWA}c*4L@by_MYi6)tSy5Aj><*7f4$%h(+PC2wzSJ$ib1zntN^ z-QoF5{Wsn(yX126qT%_xwz!{}&&xbM&Tg9h@J5V**VT<0$LnW*JF4ero3O5y!9v9M zYOc=nlDBu1bw8(eX{23zBfol;)|M?LXMESn+5b*AGmF+v4_5YWQaIzgcDsCBM6B|~ ztA-M9jNg6SoM4?T{{P|T)A8cwA)6f(N{T-CobIX5e_<~kZe6-%`l&3XMNWTy)!sN< zD-f5lApOa0^8@Ertv+-)eyNSN-pQ{V9~?QpzBK%^TzUGbc=4a#KGy$II&$#X)#cAM zS^|6yE&g=<=;Pym*cGQtojqrg+~H8}TUVlgvp$^ltzXuft@v&8cK^jfwK@t4pvCO| z^K3Z(y*{>8dbzyKp8MO&>s7D$UpDDqe&*z-`F7m$CIuT-uYP^!zt7E`<;Fdi>ld5* z^%$h|++Hwool~x3X5iDS#^;0LMKw})vpDw1-M@SJ_OxXZ#i#k&j_q>&xxQI{Psfhy z5$%TiFXow=ZaQ}QL^Ee4LqI}ip7`Vs9zkDsE#&;c*|cS2ks7Da`2))JVHX_lt0=v? z_PQ%*VSuz^NNn)R)r<WFRGdy+J0+=@a^>KfiN4Q8mz0}qo*18$|M-`d>ZN<fp4O*w zUACTe>q@28sdL^_Ph~mD&k^O=(!!+seVyHobUx2dJv{$^#>}1>AzAw4eez?!n?G0P z*O)qJuS_X2n=yfXMOT_!R*hZ#g9D&ljXB+?%yVyTsr&nD+X_h&*Wg)+hw_d{&wf=~ zpRsBE<6obGI)k>|K6xzT^~IIudV7Doyqz6me@pXoEqiZCZSbP|Yd0-g_OjCs)X4mI z_U6Xw7l(`a=l`>;I<ckgl!?jKr}ES5ieBC+o^oHL<-%U|>Hq#tF)xohtLyPT<)Om< zC4Wi_JuB_ZAEu>Fo#E;c?Y;e7aptT?pIepLYA@Yjdvdt#rseH<T>7lem+b;L&-#41 z&F2~@ZI%<UIgNKt-~QUOS#6cN>)bd(_pJ*%wd`ljr{(c!EwTO9#eX*b`LsHH-p}5$ z>_0nahs9*vbi03W+21c;N<!Ng)P4E##pK@&1M{tNh94eJ_?^yUJ>%<J%SnIoo8q+B zF4LGfFOPj%YQ)a4nrW#Y;%6;1-W1RK>Nlg4hN^9wwd-@PE4z1I7hQUCQAYmyg&Yg- zG@0;=&!6&Th8|y>=%i0wr;KECZF6<+?m5JxyKvjejj4J2PTV=NYKKn0L(9sIOKWWT z%+~qGw>%N+Sfe8&=p^F%(L>Hr;M2uTJj(KHw+r}HFL=FuqNjaf3;#VMi$k;26%`r( zfBo_$q*Ukqv}b0AAIN{HO5b2$aOIoio1EnQPan#Xyqxx}+ZXnpaqiNfSDq0@PAk04 zz2_f{W$L$`H2+`HkKglbe_5T8E)Q9#<>{LH;ipE+gq^AE^AE<x*`4?D*A(KYn0K#i zZcgt%uC7bh1i!p`f8zP)clW&<I5IOo|K=$vdY}1QOYQr;vp>w=9ksr+#Xm5l;KNt_ zY4tacu4~_yXS-Ro$!$sM(TvxN<hTEQU|rC_rq0V;)o*J0vP4_wL*yCR+kUY;UwY%i zry26tmfbj$61YXfI8JMI?JuPz`TY|oz3TdK;x)&@4<}wTSN+~y_HkdyUytkOY<KPE zcj9n8cJJ-=>@%0e6*(5V*Z;qI`SAHy_j$i@EIhL1`9{u%78mt}#a)lyl{c;MTD#@f zjrXtj>}}(F`9E;G-d_E?7DgopSb~#J8x<ycM%E<;PK&<2kL&A>vX^)7|K2;<G5YTA zZ&xoGCS+vYIM6@e_5QjEQ{2^Uj7+zk(LZ%YS77ftovqsoOE-OY;CL#U>T=xv&AV%A z(-+@QeVgSYZt}KyduPMRJ+q!3Xk_-DrgL+D{r~6l>({-CxF=e4*1&nT-S?XY_5FVv z=U2^Kv*>00)(KxFUzofu-oKUGpS$Icarv~hvp(;h*?O?+JyYKQub-CZ|9_K`{AGTq zvijL~%Rd~^H)rqpx#Bp-_xIAb?kx9i*NL_-ySXL){oS7T_m0>7Y};7Fn1AdAbF<s7 zb$3JrKI;_!om9-RkU9O?oEz2GPhI<Qd%oSTvX3_}*eB24VXbp|%E?8#b5v(t-?BgX z_qk?vzUu0pqPLg4H7<meT4Z@@t?sO<{2zL2a_Q^qbyn%qRvpgtsjB+*J9(MUm-su6 zq*krc?(+UzVY9DuBI~?%cQ;SZCKZlJ%QPDuP8jf<4X}}$zf5z|6G0Zmy4W@A(~mso z%$ViG;;7J+m?_uazx&hY%C2;Gozt6iy4BxIKb7?%@#LnQP~WBV`WT%$5+%DPak55n zD0VG-wYEih<vI<`v&QCIuU)*B964=KijCa-L`f#awp5Qv?c0w(=gyd=#4#x`!)|}& z+q0>Ul)mq4`)q&tOj|=()=m8rw;c^bQ}^7yuw}g%6EpL2-`Q$HoiZ{qA+p||GtPaP zmCxuJ7`-jWkt6r!Ce~*stE{Kk9sao8+J2YNkL^3w?Ao#5(Y@Xup7X!)@09xer;}s- z+0%Oe-+uVJ>%7t1j04Zj&6s{quT6BVO!{N->wQmjc+!W*?279T9sYOSy8ier`}ytN z>*iM1J^ixTj(P4ZxoykNZPlOX;V1L|?PX8ty}NiDboL)@ValC9Z}GDJ_}!J0pVgbb zd?j%svV7~dH)qan(|o{PX=CR(iK$UQ(Ph$-27MLIpabHcJmfql9BY$htx<FosM*(W z{_*Duo0x|4kFU>OAk1>`?zC=e9nPi$k#<fUDjsv5Dz`|jYFWHIIU)V7sJpj7i-UrS z=OmDx8X3j@<Hu*(-s^sr_H%*Y+dq2R2G{K>xD_tuw-rA>_w@O5<(5yMKcAnQ{ig55 zg0Hud+LCRVb=AeYA2QDC-Y;qUzB|#>bkmX@HZ20af7gGUxA67OV^e>vI&f!Gb6xxY z)J0`;&pul(Q}^Z2AKU$BFBxBO;s`97dLo{8Lj9eC9>2SL|D87PDJ|M)V6ra#OWb3V z{B?ido8?Jfc+DK@zEH73<^0y-{qFqo`*&(E%<}7fw~49vZL=9`XI*fh$kw8#UhnRM zmejLvdb`EdxM%C$&V?KG90khPAD6vT_4&s;YwK(Oe!l)^uxHx&|Iaro2wb~dBwwaH zZ_x|Q&uj(WMwh$l?^VuTlu;Ntb;%+z{U?P}IbN+?@?K&2-Q{Vr_iL-qmmjRR&w8j* zHS5Y2|G+Ch7kn<e*0s66S?u*o!-{)*&WFgdGH6{p2N^{H%?0JJDt>;BSJo;-MM$y5 zMd{*&h0Y5D_v>n`mRy#%@888Q`$QkTdh%mWgXi8IGk+9pe5JKA`g{Gdga0zz;#&kf z|7FkHJ*DN(-~0D}oL@C@-{IJQvD%CNSF<kI<@M^?T`9#SYn3^E><|xU?suPL!=!kn zJYafLOkwK|H}~)x$FHwkc#~nalku!?^0qZ^Zta}EYH@(7r0P=1s7_HX)?3q-&As}4 z0>gr-S5_$Q*ISqQ|Mb-R4&F)uViJEYhCDvjJKL&MtM1K%2Lcij8WT0ro5~IZUOU3! zr2B75<vxyuy}#8$y_XzYR;89!RW|qRxBQ(OtNzLVW`6#s?)B&8{6W?dS@(BINf+w> zeD?H3=jLB?cW&0P-uvWRynecl%ja;u|Ecj2rBkP@21UvGq~d-53S(ZaZW8x5=K6eO zZcdMt#LKq0zv&KduU<YsE&t2=o96?kgjBpwJJi$KY(L{oY?RJN$vdvm?go!)&$BD8 zPt%wDbb4!Rf1bM9(dWE!SJzg{|9-LGIBHwJ*8B<Wi&nI9i>IZh`_Hj3w6?B(dTQ#g zU%$?-Qq<I3n*Ds9?(M3$#Ht*picsIB4f=0x?QGwi{C(P0W&fB!DaqpYMJXb>tEWr} zHc8FBxifyfVbmcucK$0!{lT-h!q#s2_3iM26E}8qr{x%$Z_Fxv^Z)Y2D~?JNGj4R` zGR#^O>$~={(T>djXCA(Id|da?ySpzhI&<F7c_7Qa`JIWh<ALsFHK*oEG%9d3PH;b& zAvgcYM~_J=8eI!hOb%}VZLcdS+PWZ9O?TsjYVFdJR<&opDkD=l6ep>0G%e6rcF%lQ z^TfW%-K{=u>C2~U-RV7j!o`2ZQSCF;XP-~j=>|0xSe%V@x+`jeqP$<0U$}Nv_z@G& z;ZGGye6HPMiw*TXF?r6MHH#MqhlGd-34zW6$<KfP?AnLV8-)w~j~;8&?b+!Qv*Y{! zFh8z{NB{o6nOhzq94X%Z{>%~qCdDZics$;RvMlM)=-}P(eOFoR>2>So?{W>lzG+(N z^?Rq+<%YiLRqEo<@R+F7A+oaR%Otl`PktvGqzQ^Ds!XYzU;FLkot@v$dGgFO-e3LB zQhupv4!i&4ch5!BdSr~Eo7eSjHQDs)T-;s5{8z`$Tl@+&O?|%p{Vd~`>87E*>-Q>k zEt>s**59{tWH*(5xxDGoKZ`H>^=6ANdK_79*BqdtqjS>e?d_|@^2IxJgeK}7_T64_ zZSJ}`QOj!+I4hfu@!D0rQJ6PjxpqVP-Gc`+?Tz}Ei*z6Tqo&x^#abiSul-=d&l`$m zVJc4X`*luNfAzc7|GenO(pFOqEw{jp0UcZ{i~McRnO-Rje#C7wsoQ?t&gk&N>ol?% z7&uy2c(ic+P^z0OP<=LEh>0PB*T$1wM6~?QY4*7?ThBi%kh7^Mcztc{rcImnR)3eX zC|Iy=9iMe-Uf#LKA0It>B*2nrG;@;T*RNlnpPPGoYxecCv&~(VB9ATI;?U{C%Ahe( zQ+B?VwY}=IpL0JdPxsnW!_csb>+adi7wI78w6=SvDywfje9FwAQW;y2;wn79`uV|^ z=fAI9xjN&~=O@YMmv{8+oHOO0$40X+Dps0G^B4UoJzcVib@I2v|8&E`llN3iT;<?h zu*>?#TsHTKC9f+^>A9-AzIAtZ|Nr4IKWKmD-s<gbZO4vwi~s%eXM_6!<MeZP_EcUz zcu-MMG4aKPg%QbRW#6`BUS?uqnx+?9_4pWXeSLkSgMxOlouhWNY>QH2-Nn;8mi(@4 zeaXNesHLTO+S{-H5%;WlYIo~@zw_<>CwTF{)lHr$OR}e2xL?S@;GiNTwzqcfEXiim zYv$LMq#e6*Wv_7e(W_gZo)1>8^p$xNQkq+NsJmmwk!qc?zst{vE?l%`&XE}{w_8<j z&fh4xd~Z$S>(d)Q?>G6F8f>t;)@0M`O`j*t&0*KN&?eXH^G@OZI{9Tw*J|B;B%V?J z_$B}A@}7yUy|PZd8Eg6dCEr+<eLM5B;)<Q$?*rGH3q;)bJC?r*Dsj8=@595xix(|Q zN=hnwe~;I3!pxa7moHCGO<lTe+qUJ)m+#zZ$>O+e+qPM=W^LWNRZ2=qJAB<7lgvrm zwwW;`{Qvitjg3v+e_qU<io)Z%nby2(Ze@Sx>y<IOeKzw&>+9X8wYz+J-y{p=O%D~> zqj_%4Dotgf6ThsEP5S3slNWk6`usm-d(*^7*N2anU$=~zwzzjYhv?GuqjnuTZHoUy zsctF?`n7n+k!mrub6zP=r%b;Xqqn+$UFM<g58^ZZr=7X;?PJ~RQ?s`F3%}oK!Q&{v z6t?$kuvzuazDYmTF9$#TbYtaALjxXZ=^G3e_6Qu$ezfP5Z&Kl_nY)&`v0Y<m*wl5X zYt<w*JM;Yp%uNZ>+~GOtuD-FZaf!PEGz`qku3WnC`%35!rnqynLoV<8W|<!(9btMc z?XT$zD|!C(jjy#=dHe9>sxp7>j(e3U?J1}HIQY=qw>2kJB-glnElMe3UwBcoIGj(c z^MbOqvP$p7a-(0>GlN1;Y%<uqSRf&_wj$@rRh?#o&A%U-SC?I}n|*d)jpmb6Pgi%D zEfL)jvu?5T{#Nd3b^G$#7DenSIe22Ca#Zi9S6$B@eW_UTNV7RH$-iUy8><Nkrm-KF z^xmIuUGidu&!TUfEKL(93O?IxWogOCASETWW$V_NKA>}-y1TnWLqiogR;^sQ@bXLl zc{V@){eHi(QA<lJFE5Xile4Jo%lsqvuUs>_a4m_6;nz+6zK(q_o?4wcS@vM{9+m%% z!7EOg@NEy=Wk35e2ZMwC+`nxr)3ef_PMjdb$l#E0<hHJc-bXnGhnb6BJ+_mo=4CLr zV19kcYbSvt7v60C{6R>sf345Y^Y2nZdgkrkReY_bbk?g~3=GD}?Pu%H{p&fq>9<Ff zk#EhtllA7-w|{9&%v>1wT=i|a^7$7=zqBS!J-k@o>h{kaR=>Dge0kSMaWw6;F=IIE z&*EG2Zf%F~x3GCig3sSvl?`^UU%&e9_N&~5m2<55{Vr!lrMdBGg;ZU+{Q9w*&c6za z)<wSz%#IwnU}kN<bY<u3gttF`y!`5UQ2T!L>Dq~cdn=w@JNGZ5%FJj_v(Fsk2M_P| zoGiBWd(-(RM0d)%2C0iuPiM07%rQ*r`F--TdsW<(y1IX}b@%6XbM${Hlukb=vnHc> zmwdha&izR@zdt_SAHT22vpbf>_U-OVZr|SC7MGC7NNPIXrNIz$;(d;lzGD9t7u%vI zCl)MN5WBmKk-;qgUXN+l(MOv$8F|V}^)6ele|qk++=WYY`dw7qkHshoc`8jjapM3R z1H(asxyKGPz0A~lb?NU*6J4gph|teryFMO0t*)B7Q#4d{o!`H2VR8mv=I5-v@cTm* z$1j1u9>Eto{5kV8)+kP#!oUzCx4Lz4d~Ec+1FH_EBrq_jh^Aaxb=D$RQCIugmi4mV zVwSjsP5bfdv764pee0~E+9n!KkCFY$`&IYFs;KjmoNQy-yxS&wPPr+3E!p-c!=6*# zm#)71tz)TUry6tV_|=p5FQ>9FG@MTE|1>)}-I9T!VNu5F!|c2gr<1OC2V8vpXUea( zEcR@FL9LLmtbb}MOWh-9?pzUY^~tB3Uwl$3*cAm5q}`uA3k{dwd+ULCihSAM$qPR$ zn`WgKr{<zm^gAfXSysGBL02}kTz+%UlSfT=yp#ktmK$C%UT}Z!BqxOfWq)~idrarM z?2$6N7I;9sEzVz*)780IcFWf*d9glgR%QIT5^BfKBPbbgVDajow*I&3WkhZ3-)#zX z-Z#@eb;6?Dm+MxnHk4Uodp}gHpF^Vf<tcl<KE6r8doNye5B&1w<>lJn-;T=GS}NBo z&R^s+$#3G#)f1*}(HH8Bdb83sFhoPd&E5U~kH`HC4I4HXO!QC@>rRvaRg@kcC+1id zZ^)ZDbEdRe&WjJxnc7T>``0b>QV}vL@%_6;eVfJam4{djc%o<ST9R%nYm%@=W#6Hb zWec{6eZKLNchVn&6+0py3U?n}d+Pu5_3yWt6!J-!h%$Wmar0}x^#Y}d5juG(*AxAv za{QW~Tv?uT?5EPyt4pn-*luL+3SnFRXw#f6XLj8BRURW3t&sCiFym3N=aT<Nk{2X> zNiDMx>%Dv-qB-@=%k=lz`F|H$$$hM?l3{AhNWM4c5$A31zaI-Ynj~iZ3cZ>yEuB4k z){Z@DdQ8F_-p>nA>G9{AZChBYUMpfNH}k$D(=iLX9h2kYPw%W&t^B3*-rw@q{y&C# zs{0h4oY}nfw)^oX`F+(hYM-7lb{1YcRoZRcoVsNS+b<pK-1+DELl&i??_OP7ljkpe z&D5j2W$xYHOOv~opZorWdyBUI%Idk1dGC`f62CPlT$h!N)C*9ZwZNuXPVMda`TGlk z9`LI?dTu2DU<<2k+d+f*H|zgy{eR`<<4MQv?T{32dpKpvl#7eqwQo(h*E+{rbXL@> zH~T-F{X1p-j^$ZKA<t^fD^4#wx&M#hy94`+`Qv8&KFbw9Q#vhap>1K`oK-HRHj4f( zE-n=n6*V<A9v&S_3jhE6d-dwo<YPTEEsLM+sr;-V!o~35$H&JtcJ=@N{r&m#r*_zy zj;^j-TQV;%^PT<Xt+n>`g&es%P1pX&^(*zAIkB<y+-z|fJ??A~E>;Ex!>+EQ^Y`rR zldutXoG|<0@k(Fa?U_lBY&$*Ht<rnSJ&S>1rX}YdHNI^>C1wZfxVf%avEj+oZPOST z6t*j@y*kA=N~%ihRMy7x?-SDF_w}_isJI0(IIK2%yoJ@MQ>pXlBh$hS9dq^^>e;a3 z^WQhM>g?;M_&xpkasR2u%dZ!6U#hV^c2;8dvD>Bs*(!o3L%LQyvG4rv7#Nf}QG4ap zhrg`UcCu!ggz_pgzkbrAaZ<|f*y`mzw#FwF&xK!<ET8Z&Synl386$(9On>P|gN>W= zQ-22bd(O8x|M}qC5)sk=wI2+d4%nZu6|Yo({AJ&YQ=6XIeqVW>`*8lU#PydacfD_2 zBEa$C{p<WV`{@Or*1PXJoa_Itw&Z2X9eL@z@1|Fiq%zAc<VYwPJ!o(bU(NgFY?Xu4 zyrw3mSYP2gr>Bd)%IfL(;PKMQ-}YhThtC~HAH8_-;`#ac!5Sj@`T6ed$Gf_^-23Gs zBO@)XtoGIZ{&sP(``_Q+^|iIT`}^f>DmKiX9bHxRYj5@UoSYmcW@hW4eIo46ih@5Y zZ@xb#+k3MzsY?3yZ<dJlcjflfzCAm+-gNoi%gL9@=gumuiobF_E^6{ZqpDf2SMFWA z{QTy^BsTxI^-s@iUO#u+-4d5u-#>n={PsqY#WCU#yV1-uk3S|zv?W@os4UsAA;90C zKf6Vt!$W1(j2TOoElW#DVPLqnK7Rd@E1moAo}c8z$WYi>zWMW{N?#ei?Hd=ZN_jOS zbe~+Z_G<6`_!|kCuav|V&w5qWR;v@VIY~Nl>&El%ts<&duDTHI;~Kh5cjnf=j%SuW zer_Hy>)YjPNnJ-X>H?R|oX9-UfsH}JNH=uFm&5<pT)$>iuua-UNo#L~<XV@ox~bDy z7%FC!+~53PL)&=z>+k&$Gb}7`@v$(dEVY+<WExm?TdYaoSpP4xC+8Y3eX?1#X_ou` zhYU=d`bv9Z+-q|-&z@ZWytc%aGue4|^~Cz!mh2Nco~)VkJR&*p<!ifL%YIq8F*JM$ zUpVQUh-#K|GOyU;^Uq8&GGB;J*;7<5waW3jSZ9lVyn4-A@q4d6*zHm)mzyJJSfLg= zQ>^H_!nX6$qKh|nmLKPv{<?1JJV*7rjxw>ojY_W8-4JS#4GT5#i+-^;vGR1&cNw#I z6{lR8nJ3TRlbD^o+)h8m^us;rYgIn`12k6Y<R1vqdcMDoouMK+gquM_bH&5Yts<#6 z_q56>zkPqd`o=vWe<xLMCbn}HB_B@A`oH!V-|pAui{Hvvm#tZ{<jM8;dS5TEU!Tw0 zpPyqXEF`ok@9r+=c0Nlht9kbI|CZ0M<KpAnwt2Ji<de+od@<YeWV?@U+OlPiUG1-b ze}AW+pSSi!`GviK2`+ZGo;?i=)}Fin+_^Zrw<S4G+I!klRZGqFRkl6e#oQj{Kg0Gx zaNobVr%#sasc%od)pz0Didv(cmgg9EcRL8EWHK^HNK0>j!N#B<)OqgQ+co9CLwP<) zSRct&(sDbh(bW|w(Ui#2s3_62AX50+Rnw47mb_Lx&Pt6cLY&9@W4N3*aEK}uytc0r zQO%n0KSoe%)!Nk=Dc4s9T$Rb$Be=uTWWHBmtYLY1ZE~;HR6mtT*L3VS4jObVvf^o0 zj1zWIQshyd+!S`jJY;3SOO}=&pSyw?np6&}N=QenkJ_=lG1NIQNOkg*x~Mv#XhVmD zC9P-Y{<`>8rH41?Oph%8oH*y;s~b$-s*7+kFq|v1d%o_SO?ByV50wS0J+HbgxTJeF z=G)vTUWO<31)HX|&D);+;BCj`%=M3M%wbz)^fr6_y;lXcvWwlq)=q3R?Obw1{6mRE z8$-h#^UPHtrEhLBFMnHdPd4Qh)B2~E{X+L<$MJdjYyEnA;EBE2ot5jKdX%qT|Mbs} zACF$$XPR$U<*T4{-_K67R!q@k{Re?g-TyZXqt?AWx#h;Pq{ZLf-`VNBFyPOhKUNm! z=j|{1x9im!AD=@9Uo1}l_2S{xxF;{#+uLW)n6W_P)w5^ImMvprh}c!~^5f&P7rnEu zt+A~5uwecA_nT5rGcY_qH&<In$ENrh4}*f4nVF6bPx+VIy^DfgUw9$%U!l6o$n(H| z|BUukvnK8Cx7@tm%_pTSFKp+Rl{>ZBpYLBc;oB!em0i2Jd{36|;B}rJHX-__g^951 zQ7@52lXnZYI(hl)N!eZFbiH_c`Xs5>l?)7x4mTpst7;2!xU~4F?fN-mZ{^><MLuOE zZ>!&(5SCtU_sp#7`Z=|dXXzKLjQme5jxflVU^Dpff{)vA!me4{epU1HSL&}m{6SnM zgT-x&$(N|J8#@$OJS}zCEL(Y`zy1F2r<1hnmc7ty5{P<x?NHhrGbYCi1@~X>lY1<{ zqA28H_iiyGL&>abmu~Ji-;}-bRF-bhLtmM#J%^JuCu-c-e(27P!k>5U%IJBAw(>d8 z?@nF1az(xQ|MOzKYx%;LUaJ51&g9$Ih|Ny~uB~$lJ^VePMs#i!`^Dr-p;xD<#Mv<@ zJPP}De)n<z*axjoZ@LIbxXrr$d8O8q_HtvD?!7`gWcKwY&u=d`o}zK&fahNoQ%OOV zHo+f%vpE<T94DyE@h|cU)9|{rzxumguiNV#i~E&}qcVJK?cM6{?Wt_%lf88H>Rg-3 zqQpeSYaI&mcC0$p3g2#>I_34twEgpZ_3Am>l%IFha5^`?O|Q4suwB`4^}uYK^WK-< zy~^G7_r;dyhC9pGsmOEAeE%j-#rD+AyE|H6>-SESOul|nvXDRif3?y%{R{7&tUb!Y zbm#u*l(W+wEPc(iFY;k@{Ao$cgFmmVRb^l>&c4gJnO#C6`(ItouNj%^7?Wkp-p{sp zecMsHPSUV)Ui-?a=bA$6xWhExOy3xM`bAyWjT<*IFE0}n5jpX^$YQU6s?pM;MjSkc zvsTTLPv6s~(BT#6y5v?T%cNPWjy>O7lk?!Xx5<1dy_cN_IK=+1T%UZ$UEKfwg)pnH ze2*^NFF4-$(qz}B=K|cG$sa_fFH<{ce!7-f{p;s%+l#&%zBWH_!~TRE!-J>kTMM@S zU+R88wkM|0Ea&DI*Lyc6M2ibQU;oLvGW#R{epXw)(?&*@`Q|-JdY@#Fv}bbT#AiPu z-_`!g@|nr=v$GYp7T`TAL&TP2@u6!i`wCCloZq+1NGwuBXe;PoCt2&V6VIb8WEVcy z{-x~Rw`RqPj-H-9B`<>l0s<l<XSN+ve|^>4{mJ8tKi@hxT7K$1BeB|ywXf)>tm{$B znNOcCEw%PPcfjxOpW{22qn%%8?__8=zHp}S{*NA=`V)9mCJH{etabXAY_ik(<<~+s zGBDh}7Sn&`jzQkE-%o@6WA~o@RVnfQ*Gn^o1seNb9cmVpiqhH{`P5ur#c$s8kAK(f z-}q2CjsJl;=W{mMYsLZk+Uxe#{rmZU8(aCU^b2ZFblz51R_ey?x^m-2#j7hTZ*R-Z zp7=<dot@piN#>nG<jSS@d#rdI8Jg_xJk5{y+Ew??vO>PsIP=2%Btr*|4Xb8d+P(d2 zea@cG&q`S%J72uGRetu`gK9<1tykX|v&-GzF~LJgSu~ZGg{kIGzlTI)gM`lfswfqw zP8AmohwXpg|9bX*y^v=|gFX|(4#Rqp#cSVPoz6H{>+SO=Pg+`A3wOq-t1n;Z++Jic zXT}VPMhAneD=Us2JNDv5hSAJ3DMtDC_vNOgnWdeX@#)j22@?d2X4+JL%XxXjPv+<4 z&$55#*Z-?LJx%xE!GoZaZ}{{5dUfU+ZaA8)W4-A~z`1K><s!3{@1H&XCbw{H%HNPr z*<PWlv!h=9V7(Q6<CXbG7Mpnsb}VqKN+>%P&At1Yc9N68lSi4K&M(Y(GvV;F<?5n0 zcT2?CeGO3&nJQ*>{<GFz5rzd$%E{-MFD+0qd3sZt!6C9xmw`dlG<xY;_wF-)SiK(! zR=qv?D*uVpk{e1{^%o~q7VUU(v|C(1ZqJJc4-D%5RM^|w+wJ${6F>SgC}3rX;w_`C zf`06oDOZI!=8J6DCHQG)GY8AsJ2z)noLxBY((No)rIJT;7`;RuJq`BXIBf>|dX+9a zh6U@ES#IatW*B}e^?=%us13b485qvoeQ#r>nPqQk`W1A-aM4q**x0*kA~(13$x4Ze zZY_HoRbF0xW^>f;GTr8bA3l88uyyNP`}(?&5RvJpzkc{|V{`iX%gg=!=iBKD8yDPi zKVSYuSxM<f&A#c=!$U%@Y|FiEVq(H4Z#QTD{Q8%dRK2}Vr=OoUb?Vf)w$;}T9a1ti zHPzHyxn;|h<HwKRzc0@)VbY|cZ*OkSG)~w0<y#^xG*8v^Ba4=Y`{nkn{7Qlslj}TI zEIJr)G){nngT=A`-Tprzv!1YTH{K>Q$EKp??c(41_IBKk0?yA5>)D1W`%en>J@i~u z>g48j6VX)OZ?CfL%-4KYbU4Mb(Jd!uj*b4TY15XiUAuPS!h=~)7%t?#Qd+E`<<$Da z>?Yr#1cMi^v}zdn&o5JVel#int+nLp3~eiy>AKV7f{(ts{Qa==l?91r56v%Ut-d*5 za#2Bw9%wXn^UWN)`RmuOumAACk>S9JiOR}KN>b9&j0}&D_wTR$ZPtDC*5-761_evY zpYQJOj*N_SQ4(bMaM|C!^at<5l8$-ui~m14Ia$&;%|N0jzW#6N!6sIQ2Fv1SSFT*S zv!n3v&6|}M7rEw`{XW#neIqHj4tzxXfktLVhSlNgK?kOpWKLRi-?2RD;iH{5EA>|# zdujS-%K0U_?^Wg<e<C?6<0tDaMg{?vZ_=slxh<>KKYfxijn(gsI_GhvN&keitN+Fv zTKrqT{;qjp!}^^iyX7YH9S%4&`A&o3S=VO@97bC&?W}*x%D~|EK#b8oVs6Mpj?jg* z1xZmQ&4MqC6P-RS37inWyhQuY$({Sp&l4y&3SREV%3xt(k+6ENprGLCX}XuMT*=!0 zQ8ZLFv0wjAmqn%apCdO{TRXp#J5w`1DzGi(`SK^?ds!H4>dKOzKU7`+IetrRPHJgp z(k<tiv#&7!s6D=IN>7Gs^u^+YVyQD{dRK<5TEv@a-*xNqRk3&RwI4s^9qYF~elF^j zar(~neRjF0U#;#kdv*GRS(d$l!G;wpJi^1vZ)`~Hm$N<8Bx|?%`oxndNpW`ju5Z-7 z@L9B0sPoB#2MTwau702RuP<qR=l@W_4bCs~EOHwUChYO(wl8~fW!L||i#q!h4t~=9 z_U~8f&2#ekx%O7NKVM3RF@Jx!clzPumggePUL5*(V=MQ$_xlaL$NbpTqF!lYy7WWz z%a8rVOODr>KR)xtmHEGgt@iuS%CIQS>4&dh46pva?caLe@7vbxEPL_k&sXbXHaq6N zGrRES!L|)^&J^_@6pM4#$t>|YkiqV`a>~o@J^k;xJbF(5cdf7S`0~9zXHRy<qSS;X zk`^oDYjxGNOfDY^)35NVZ_~@Y7Bs)uecqN;UrsZI=&TU4momKf_sPo`%Ox2a8X6Tp zKc)Kk^h}?AeR_30=f(&b+4|3=b*FAT?B4jrB5C7}4JOu_Zx{CNe0}{~SX^XCT;Pk8 z+f`!E=ll^*5juM0LfM4|!<Uiq+usF-1x}bHdHH^#$Le&~6))a3U*=sCC0%@-Ev&cw zw1?5k?HYID?#;W&%Kgjw*VbLzMW1JTo~`=xIe)ciuB-LSO-}nvp7$TqxYbgoq@8*H z#tjQ~_2)M?r<>>9iP&4Ub>YH?CnhS}UzNQ7`o`54Kl|+ZoFaBqyu0zy(fKda{igv} zJNqt7H;OvZRnO-dZ~3`r;p(Wc7<HkAiPwV@C4@L!Zc3&q&)GgZ>Sc#ZMqSy_<FgmG zIDL8F-2dP1M?}A8x>V-1s~fsMt=^z;dQ#J@!g;&T=6qpbIR4!w>Eg7`jg`TFza{P7 z%E0hPZK3ev`lOJaMM)x})sp`gc`d#YvT@S<XYrPQMcNc~mPXZm+x`Enb^F`PK~tvR z*Ek`*VoA$s!<R<Q2R(eJMk;konSQabvwV8}=IGX2e|R_@CkS3%wdz@}bz1eT68Xl7 z{+7QQ|K0b9bN+C>wq173UYRxaKNEt(<1J4l%e3E~5I!R@@zI^?JvHDK@z(0&r=G5^ zxpQo$)Xm55>ULL#N6wk|m&H|zo$t%PqWA0ClfIXH6-p7>x<C1N-%{`Cpp)h*EBDs@ zjZzS3c(?6(ppMvc@x3)at>oGS_BGr-vFdWj_1Ee49`VO_+%2~A=G$ygIBiL6UitiU zY~^1Ht+-u1f5-6c*VzB-@5G2t%F03u*T+w*Ev$(2jE(e+?RHxzP&+kD>#owxVAY#D zRrj9uIv}37yJ(|3tB5GGBG(cvO)s;$lfstVKZQ~xLK?a*zDPHp^OntXPYtKg+da$H zEn1+`eL7Y0+eVWM=FAKmEO}W~BVT1%8Sp%RvOi#P=FO;G$^TTF1Wu@U3D0L|NZ9!L zQ+M30=*lO1JY5rxoVl@a#TV1AE*+maD&dvkk$<f0TUYsP-u_KR$iufLFVWMiNx<j# zt<Iy5x?W8(cb%Dc&iQCk;mzGmU8^3|ecN}#p|N59)Zcp+ZajA4z_R{zoy&IRmF8A{ zye%Wql&K}J)KKX==gl4wvE6>bvDXhBk^FaRdH1_RI|`HAc%`d;2A!Cudz+{9?Y?bt zx_r}*pE}bkZD052rg!_UWU1A8ich|)SZTbye&x!U8HUN<-rTILtZZv*b98k4{{DXb zj}MB|Pwy>zD+TICO><gkQ}Lm}Y2lq6h05C6udl2OE`ENFm0?4~nz`2HdXbx4LPNI( z-;0*cc=UPQU3(uj&0ZO!=*~4f8@#Tbe?M*7^R2fpx*vVfJ^f<ItZV6Wer)?Pk$K1B z{>wWxylx%OZ2Z&u=Ul_lRjadCT)LK0x9afe>zqGbC6(FEKPr&YyK^Hs@6ChfwwlJz zD^t!q-RGm7>$}V<*4pNm)6L!HhijInKUaM&zRx9L$-0H7?w#7aL`PlkW1MSfVW_WU z=u9_-334_&uehHNdGuocIe*Q?`xa`gc0GRI>ulFt<B!MpG=1q%pT6cyjL+{|SIxtY zFK<y_?!MFNXL#83V=8y*zTdl8|9hQ+<==^Wr>e6Yy#7u;?%&yUm=j}cjsc;*kvATH zUfiy$Ab9e-(*Me7GFHWZqMj`F`C!YeHTBooJ2&s2nJX(Tt-Z3~($X1rwN?xd{`~w5 zntggvQsr<!v(j$e=?Ux9o@lS0uw4JszuyOvJ@e+sdAcw8`}X#BaS@RzQ>O4p7&yeo z%QF~Me0Xr=hzmzki<2UQf`x^|9`W~w4;>O<dHDG!14DRtxZV8zMH+z%`-{t!&u_5g zo!lJm^(yv&Ku+$p`A73KUu~6@Xc9kv=hjENq6N|ad>)kOi%4wkXBJU^QqJZixXtO( zFT4DG4dvF4o*a6)Ur>O_H#B+4{WZb=|E1->efsLf_eW2KbA8pqW=%P}&i`zeEZef^ zS>H~dsa)r@lwa0Dk|7}}LwI_{`3?O~HTGMU@`jeo3ablbQ~Q=|VDh_SHyaa!&+l8Z zztaESF3-==xwGkW@P^GLv#v2bPdxcDkbxn#ZQ<m%2R0lRXJGKHxwqf^yUyIb&YeDt z3<3g5ERJlyp3N$W1r3hZmdV8(db)9{rq*})xm&lEga?K(GxSIpy*~d~d$O_IZmVw} z4o!}*X;`#2gZ0eC`DVGZ7V*BcEb�kDhK;x9s=Y?#}o3w)rf-_Bmtz7XHH<Iy*Z% zPqugEdwHF`*mlX-WB;_AwvZog$7k*8+Op<`=E3`0S7fQjviyBqnjp4(-vSG7@7R9* z94*b$#pQel#4_Kmv6*y9?ptcq#SqgCe7kPdGBPA>+_C9dZsJL85mC#C>cA;0R!BT8 zkXEgY@_F&n$SH3=gWmc_CpeF)J$bp+WBIk0@8awj8rCgyRnpqKS}W^oj%z6A`cCKI zz~g)~tI{}}Dx&A{Gc+X5Sa&T(+$Vf@zVQC3A@6P!O>W$0$<W|;dD0e-fbi_Nx~tcc zf~Ksvp|T;QV`quX{wJlGm2xZxXH4g3*kJaapJBnuj3dii+U@tv_@KnZaNz020K=$| zS-OVve1cvr&JK#2cmG;H8~gI?%c;SyMV^H5mEXE1y{Cq!b;?Cnh9k$c)R=QTBl#E{ zqF)!kKCrQ~TxQMQH*0O)xy|eB*~!CjqUP_PupcLvpIpeF>?{<lywUa6@$-3i`YdKn z6aBvJ5AU^yv7wx1C-0uve_ER><_-JxD|>HOR-D|Ky?ayf<fXs2%m~oS-z$0N;_->{ zGq&u1d0z7A10(sjy8BmkF^O_(UHowHv1#}HXJxMoWHS>uwiy+Bp6ywizvgGi{A1r& zZ!}<;-08LIee83yPbXg(t>nF<(beVRWShJAd;26_>9sn4KhLu0ePi{o-hb}?ebTP3 zjLpk_RrO3&Sth_-xcEwt(M*@XrI#4_{LI}oM9$5#v`=`zW2GN4HRID$#!Uw<xD>x) zT5oxpEz>B3fnnJ+tHsN|@y~nI^fdmR`2mZHuG2Fz*9ovl&dTte^}6w?i<-cL#AMm$ zwdNIHuKc@Ib@pj+NQPJA<X^R$50!uLh?e;0Bqga`{r6?}o@TY(0vrYm4$j`GKP=R} zt!>rK7vH?k=Ol3B-qD0RKIW=ih1Y`QrPZHZKc}x9(y3MwS8(8f<mU8q#}DOO%|3C$ z!`<Ee=kDLRk?h}I$!kQi*G($ey=d2!vnS)5*ZDeh6s!HS$UbD1GjZF#jkoF_OsNbu zkD6hXEW5$;mDDPs%Svm{{5ou4v*3Qg#t56lE8DL<`wNZ+yZ5rp<zEV)^g1o6Rpr_k z{`BXoM5lcw%53LDl(ggb?cKg>Tg<M#+x9s{cdzsbJbT9TK-4R#RVPwXeHMy$2X4H= zzxPQuyK_OXu=}pSU)GwoUK&CkRm)P3R_$gDoU(#}L1<!3SRey~K=)Bi$^L`CC!I+W zIl9c~g1LKwik+p8(OM2s(P?`wT{B`}cp|nW@oyrBnc0SuHFtAtwA{2;d%x9TFZscI z_+X$4m*A)4KE<*|m-MV3uie}Iuyb}dBSYoQ_d0LBgyr(}?3&NX;8FK2?a&-XPyf%E zC8v&9GMoLgY+U8U#*kxgwRYpY-`^XLi)fuJZ_#BqaH419>nA-s+SmWL6?`t9QU2*# z(wXM}5-g41=gho%y{GVD#G1y9&;E56Gcw>9DDu9>mUGKovmnUcIz8?7^XZmF)4qkT zkDEJf+OxNB-@bTJ@&4Z4Q>RXy+o#l~cUXYoLSJbDN7Mh!2e=QHNICn4Ha7@t_$L(F z;i7U_pyw{fs_fG<s+QfD7XKms>58K*MW7fFX|P#Z%d0!}>~Hm>({n<D!}ETxa6FuI zhka)K&Uon$5;+^+eZMIEf7XL1X)2RB?fv^jJ}q6S5h#BC&Z5<Kzu)-DE57c(;KwJI z{<^0-zmwC^I;$u+^%!6L7n6^5HC`2<<uymDCpU*r>Ugr`%ZgRAHl3OC{AhmhMo)`5 z$Ci68WMBwZZohKohVk_6)567$+U#d$=%}sx{&qJLgTuMmSIk{!y5`3xFWoWa#Hs#A z>;6^0UcY-{Ju?H_F4pAWn=^Lrt^NM&#!p_wa(<()XBZd^Ik$J6E(+e9Bz?2gfAYIv z%`F?1#oUkI-%(N>pK|8ug%zJ~>^k!Gw|icjth#^)L&K6U?oJa6jy#Cm`gQ7exqqLR zS-k#u`Sreek4q)kKK*YgEJ!&zzxvy*uiqyvpU^*1D8As?fyYml=bNqP+PL9raPV>l z2EX^ci?RdO%Km0xm=bz|^Wx5<`Kw-MTe_FqPvH3?ljIqu#MSy@>16-;u1^^luDzEK zt}|Y{tn29058K!7%uBtWen;nfnEosIl>DTXvSqfRI%5B;mCmUj*ySJJTkn5FbnnV% z;6bW+=D%LNo}POBy#4j$OW$+$7}vh|=l<RJwq3n?qv!9uzkB`WSa6oAX=!QQ5WRfq zl3TCT(zR>XE?>UA=;^6*b<MYC`IMTzz45%<UiDS8|9a-_5fA=OiCN(jC~I63=<;Ph zf3h=I*XCt?abH(*YpTe5_D}j%uuJ@t=ZWCpqqlbdy!T`MpO-QwXJ%bJksTP~?KFR% zl>J+&==jr}yXI$REUK(Iug<+7>-9x9|F`mG%2(}A{F{FvfBCPswKIc0mF7Rlej&NC zbYF*&tLcgQcP9>R&U&RC@uq54*DkAA>Dw8pd2e>qyjxcudi0dY)rb3xH+-4G7dG$Q zHoF(qEAMSt|JPsJKQU<U+@-rS<E<syI$1s~U`%eS@SSjnr-x^axZiyq1&;1BGmT%S zOSDNxmS&mwzP$3jcILGI(M26+GXsLJGBMnkvAc^=p!?!S<>`k6bc8q+IW`%Vo0=E# zRM*@)dCfgIR-C~=GsCskc`DabKZg$c^%krO9F2m!yS`1D8Lhp_n}Ok8o}&ws=e+q^ ze0^sk_dU8TuK9BNx_cMh+5{i0pAcnrV)ypa%i@)<4PWMjO^(nB3l3km{%KgKNn2dC zVQJ%afA4>?X2%Slysubeto7@`|GD<Ro*Xy|N-6W*_S$X!Z^+`PH&5-qOqSl0Gl`!s zPwsjX%cDQP>eoltx4)&ef=}Mhl{xvC%VN#4-{HX<EM!7jmf2J@GiYe9V`W&NRG68_ zyG?b$tJvh*&)=)GXe<}&1Pz(YvE2Op{QT>k;zC@!JUpjPpJrtE_wOI*YOUqVmrtB{ zabN9ktM`i-7?>I@@{T;ZJbl|8E_=h84?ZW$G(}vcBTOfiCanLr_`vbk2QG2%(YU3= z=D3S_{`t*DZ=b&vyYlGOrP?ST4f6tbdH0DY)D`<ZzFb|p(ro>&n2E)*wp*tfpWDG} zvU$VR-Cy%BrB?+_IT>BI<5<=M+g;x`-DgM+*T3vn^rbo|Ypz+70!v$)owM_PSL>NB zhF7*v$Ws*ZWMKI5mnp5d=-2miR$`6J3=N4w3=G=2Yzz~A+?)~Je|1ZisjN}w3YVbC zA$xwE|Ey)Ep4QAYweID$dozWvtqOW+z~a5_n-GWmBT0c41<t?6559aSz|pe*{Je^d zR#(d}2#7ZBmbw^acimQKlftWir|<5+!^of$`CGB``On3M|L^=SyY9c;bjymTOV=(5 zv-wi}W9j5VJH~6m&v<SW*4zr&Un{_3SduY`Z;e}AYUJzH7gU5Aj|>0V`tsiK<xx}I zr`YBE{xjEcuLAeQn!hGmcdl%?JUvD)eqT&noL%XwE4jC~o!t4OxpCjmM>C_}+gnvX zI5TTs?HZG-r8n=iEmK>U{y(r}*0mcCyFn$Cf=gT4{P3NgH>^H<zQVrst7v9qp@{0L zrJ4IbomzBd%?-D(+&7<h^IeNurB$-V+3lOLE^qC!d6{{Mw`MPzKGX8NB1c=|jcbQ$ z9rh<)sy(H3&%<Bi{Pz3WGE8&y`f8Tcaxlf!O)LA$6Ss74t;{q|hJ+WF?$n+!n$*o* zq}}Oq<lfPM^9^<1y}E>2Z=63o!@*(E;msR1Mp>=;=lG3-$)4}Dj^+x_PW=t9(-TtH z$48%Cw=%_3@1V)0g0E(avo+L@K3%RV#>l|+dDdZpt5>F8HC?%pf3x-DwO@r4_eW2T z|FUUk0QW7`S1ykpoZwYgKfdZ!dAC?y_3vA`r4!@Ry?=8segAG``RzC}L&Nm>s!azN zOx$CZsEeki@3~u7^6KB(g_Hi>*lhdlzo<R`{q3q>e*JtN`7(dI%p4uDZsB=P*m??g z6h5?MU}#bZ)}DLV`Vb>S*<YTv{?a4!R1M}Gf8rPaB=_-=Gc|!s3<^SmjSekmdlWWY zd8%;oVfwT8IR=XLPk;T)zJ7mFzgb9daByJY!32XR1#9~+UQ0SRZ^u0S2ccJ|aJTrr zGGX)Gx-%$o_3HzEW_EhtoR1`lM02HOyfD|lw8)7?&BH1oeW#6?uj}FZ2O_$>wF@W2 z2ThZftG#&dl=H6szG;nLT0XJ#Up)R&=!9Zc{k`&L-M3!^S?+!Qz9#=VKQjZ1->dCU zFHG6DjEAA2SGf4+`NPZ4d}m_VQ8oKte)fj?3ASbhZ%VFjG`_Pb$h%YJ(5>9Xj12Z~ zrB*LoI%#g8S@OpN^4m=Gud?=(&DdRZVy?Gm`FfT78^(1{_2oA`Ib^Wq@sBOO_uHSO zOk<vT>9O*sYMx_kW@Xcur=7XAY}u-n8PNp=Pk0+0EGl1RR9q32vt1N7;p)okLY)^* zSWE7gpZ)E2qo>U}1_pz|a|}uwD_P(FxhT=5$NTvxBSQ)At3B`A7#Py(UngfQvdmrh z{fq0p!^bSnMZMbma<>4(forDMXSmIJUEWjp)hu?G-h&6*4Bn*IyxcYI>OQ6SDRb`0 zm%h68$oIEe-T&7s-q*=?DtvfSIgib4R^#MfKl!#ZGDO^X#p?g^{DsA}n-7J1yMHzQ zT(0%CNk`81QD)E!|NVdb^Ry3~o~9c-Wx9T&OUR|`hOcfP4|?=8IpOtzs8>~!lAgFI zakeG0C?<IC=5SI_U;))CLf6<|J2-H#v`m;Lsx9y-R`zcX@0zo{vbDCyCU!g#0~L4v z3LAf{UMy8*DbP}%G1ntCb?KR<wY%6%zny)i>HN>jUyF^wC-%YDzv~y@`Spi`p~K^U z=4t-xhK=>FnAT4eo|DdJ&A<?`yVfMMbx-2YRCV*kp|jo3O4SL>KBa#_?~|Wfd@!5Z z)!*zl>vz}Ph&X>&BsD1Inf~OO|2mp07#S>fO3v+%kbASuSpT;yL&D2l4U?K)ooD~K zh1uuC|65Y+vF+K{^XAwKzDsz!GQ+t_q|kGF|Gb-u&!>Kz=aQQG^z-xc!otGld3QJ% zA~q(q?%ut7`EvEiC*P<#7S8Po(73a)_WV72zmip3_#G$gTUeD^$-LjwLq*Yn$DmM_ zp+Ui*)ho%=MEp>5VuynZOO4>fmW~#UnNB8~FFpM1S{eCtk|GOJPTFF2h7;%O+C$HW z1}~4P*pM{q|G!^Re%;=eO;;Ry)^jKPY42AX28PH^g$LaU5>0|L?yIN>BycpjC{1y2 zX<-r+JN)_MpSkXvC+x5KckAowT_?UvHZ6z`pBuVGR95Nl)yq%5tcVo8mbklg^XK4A zpC>i9mpy80*BAQ#>C@f|(KlY}eLUaOti15^qHo>zP1581d(H+g67Wo6+V80$QWxPO z+!<AATd+d(+3sYQdnXwfKJ56j^fi;lDHW-?O{$*_H(v`44xct9#<Mo=M8421D`P|V z`11~bFTCFr)B9FZ@aMsUjjQ+lW-R}b+QA|ERBZ2oy??$big1OmkGq?cz2M1(bLZZD zdwcsw`fW!JmP7vg|Ky+A!s%SY>~d9XuE<t>v2Jhf+4b95|NLh;-RZL8$Z2+l1uG;z zuif~+IKnsL%2E?2#a~)$Lw2P;6Po`vJHPJDQ)Y%&SvNF4=A29v=J$T2$L1t5n=5;I z*$ex5`zKFGcd1){=v)!Q?8^oJFGiM{vT3=UbUC#`akFUd74{Do=B{6`Y15^X2j{wN zC@CtK9?f;*UT046+wCVhTtfq^riN+#oa@RlY3Z&ot<u#OrhJ+4Uo*<(`hvLLNKw&Q zKaaOro9nB1%};t^_I{;M_t6}&^^5i}T2IO4YL%O;Jl{c~N8bKlZ0bhP$j1}WCIA0? z?(f>RD0<SodH0t4&p)riaPq_n12Z$bf(H#XtGK`B`1tyMy0<54)4lCNyL4Tm3#ae4 zSpLnftMY@_#jqMyrzydlcjGqQGk<?p`_Ad<mI5riFU)hEOo)`zQ{MBd|J8d77ROx| z)=HLtxqWJ*@^T&Dxi|9P%sjRDM*bUJ-?@FVmP<1hR~Z@g+)~#TWMo+N{_~=qneTRe zUj9r~SFb()@eOu{1ulwgey`M5dUYrm^f)jy>}X#fyVv(^ERX8u$XhR0UeI9OIhCQI zk@4D%V3)kGN?%d!gpy*8Ub)HlBF<L}#y7~$ih3n6>x6>Q?&q#g^y7D`*#7QZwDyJN z5w*KBOe&iet$k6qWchMy3yYADkeZFpKRrDizCKQueR7q}j4l67G(-3Te;c(Qex`k^ zWxa!<;7^NKcAGnYPH&Mi)e~F1wJAilxXk5=Z0mddmp4mnvhH6AdcMAR^VF43TGV&G zIkxQf^hrVU#gmpl(~<sicm3i?k3QYsvu?$zj5#}xq#yq!Z5sL}bhevjU`Mstz1jln z+NW(3FN;^+-#O*T!w=lW+Rp3u@A#EsI{k2e?TopTBlkT#|IuD=U&a4d-1+sZb=%eC z|0^4rudX?vv3vFZBm3(j+hSF9z8=5)d+|S8!Rr&xFWl|^q`vFo!N;e%R{y@uf4tjy ztF)k&mhS0p?|r7_|IV2HKOF8d_c3fOz}*Y$oi#+hy}ayx>vVWnSlpJ3iTn21u{ipu z1&4;38XJH9@$vEc`2EMMmMmR*^Y(4+6Zht|)hzl}tsZNj^gp@Ep{GvV#mY^-{L6la z;te}?d`&2{i;CyH`@i;iKDYS!srz&HcAfw4TqCEW*6yRY>e7@`UQy5dmSqQcrYu>s zrqQ9{XcB|60E^=a4$*E#r-qFj^1IkduPzI$|5vqr+bmuNg-HUkwOcP8ippVSa8uCX z35jgYNn9KreO9k7Saq(ZWZOcq$|?K1o^|{&e5dX&|8kT4HQ9v=79{+?cQ|}~+*ZTS zOEgw$+?tceHvM?j)c-jrFS&Z}kM&s^B%15@J^AUWsh0$;>+0%eo9F*~Iz3*_E=RA$ zePKYKtaaJTOG~ZGXBBH^WoJ*HHtpL9dpFmK)2H8G8TfmzfR57t#OeJfj?4Z%$58&| zwu^LYO3bb4(sL(HSl*jq6f*6<jZ?p8yve^EHtV^o)=l_t=(O;|y}iHRpW6NC-So%D z`)AFX$t(G0d4_Y;!9$16oW3nwZgtxowD03vyHZA5TieN#Cl4MxSXlT!vR>LK#iOvW z(C=J((9P%P=Ys|>|M0wJeQ;^tnipbD`&jN=e9u$h{{M8%+PWU^-$jd+FV*elocHL` z^(hY@Wg4YlQQR53<v91xyBr)%%lzh6Jv_wfD&3@<oRplrckf=+_I5tmqQb($^78+W z9RB>i;Q56u^ZuEr>-Hz^U2xHUm-y|jw&teN!@IgC=rfjov1ZP6m%rb0TS#Z?xnu9o zzijf%Em!s2FiUU7mXE)SE1c$?bKAyQdF#a92~+C%Tu)y<{oZh8X+gm*BTY@sOYQ5{ zt-E<MS1VptQu3yy*w?aM)lPCsoHMsw@SfDTHdJigx6^+0(NPhfZ#SO2EM8f^?0I<O z@@oe(Mekhv&p+vkm6Xc!^}KwI3K7judeomxWG>QJe4A;ZK(1+OQTm0?L9ZV?D2a?} zdGX@Ki!C2_?pm~{>1<m4PWf}!FRvB;WKfc6|5oa{((=tFDXND)+D`0$x8G)m?VE2) zRr(J;Guo*)FN*zn@PocOV^&tyw*sH+*`|Mc+UB(6?>RQ{PlW|fJiAwPo;l-_{rbO4 z509i#%IRsk7cXA4E`OI}IPLJux~gJxr)QV!E_)=u;n|)a_QUE+zTfmUYn;AuZjgI$ z`%TvD$k%@HPk8@c_YA+jgirc$#@idm4~69)T&1{J%}V(M`|*<t_dndy8W${HVc2W3 zK}^SxdHUhy7d06eIGWzX@_+^p@A#PO=(-5|&zKz9H`i$U#afwb7u6+WP8|Pfvtu!T zi_^n%_y50m{@|*e;{W7=%=o+$@weXF6e!BGyZ@`Gtn`$R+g*0{<jIqlKRa)I*3K{g z@6&1hbLY;jT)Fa+tt1cIyxN7ECobF~Z*VK|-6_R#J=ME=C+$f*|6}U@9tMUA-i;Ca zlY6%B7iDnh_ng16;z7Ulaj#V?6L@6bet3Pa)B8FbkNoS1(1TH%RV%JO3%s#XzK(m# zhO4_PY~F=Ny}WrLwb}i~r597cjpH0!lc&3T7c-!@cv(Ep?@8Et|MZkeeA9y8FgpEX zFxTJL@cn6>MeeiM)QwvbF5Z^?yJt^Laqw(=^Sf^sO!#lOV~f6dRl}Bk?w=MGTnBI7 zjQsWCNT=|^g$vdF=b4!Q7YJxv`A=!0$FAl3_wTRKIr4JH7XLuCzq`sGt=!Ac$`t4t zd3c)qI{iNf?_UX0e-u{rX|s96{7sW~ZEjy|FIWBZ%H^gzU31QCs*QG9Ki}J;{>#Y& z3$HOSwEt^6e9Wr#kF35}ckm-_J(>QyJIbA$WxwB$=VxHBKV!T7=WhXq12+%*%eAK- zv#BV3@x5SsW7?!lTej#IuU6;A7VnkKXJ34r<EM4`f4S)u@fX9sXk6MnUnhR2OVN#L z+1iBxJHBq8`&VWUhpC;BAS5NaeV_WR5EPe<5fKp{@{2U2BqTrwKb|;oVzGO_UgV~f zV?C0$x99u&`=395e)>B}2?>pO?`l)oDc{bnDZP4S>ixaB`%IVE=|3^&%$+-vfnnl@ zX0w*AsPlEoB8!%~ZoTn(&6e$2tGpN(!t*bm`o!irzvV?t8=r5#XTIUI<4^Tt#Wz$H zKRB>3EbEngQQI%}TYvZcOWXbV?H2~c_(KO8@3}seR0{d>be%<RgZ_iiEBg$Mj3#aQ z669{LuYdo_jaLV@U9dYb<=nYT9iRg0w&(916Z)GMM@aCr&A(rNO1Z;j(f)tGR_EW} zxBu_A=&-P`s;Xbpbfax-ZH0w|mh1*?eBL+hQAx<H=_!W<!3~>7duRJ8m{>cx2wiH+ zwA=BFM>h0ic9^oiic|Kgh)c0ArLL?tT)oK2`2UT9=g(SQUIst!J2GMFt<SUXC%4pO zis{GwFtV2W{?)pVL)7(HjAhxI6(z~*i@z8u-anjbvGUyZ$t{2S4=%0Uc`<fLZOn<| z2VW}1?5X(pIHP)FL`+bSkf`X?S+jl>md*YA{QP6aUt9}oFV(@CAfNTu!kQoq3=fKa znDzOrslDT4&fw53QOm&4bb#a2Lc!M)KB$D>4`7ZKV_>*pVdT7iZ^k3ejj4>GvxFE9 zT=Mg8b<;etmW6?bXT!96PggHpob@{ALuvlLbk3ibYW8P6Wr)9Ae0}?|<t>jt{(9Sd zHnXFu>hGVkx!u!zKY#i*#qR2Et~AX(LhNyF;dvSxdfth@v^|<v%~Nr3&AhXFtG~PT zN?kp6uCA_*U(V)5NOi%!6W6C*{Q7PCt)h%iAMKTjH=k<n*|htY|DV^>QyCiS<c=L* zuYc;Kj<)8CzCE)y{=Rai`SxMI_uY?*e%v_lar2$<e7>5QL3`@6Goq3vZr}g(p!esp z|24ngJXGhd{~&LEIQRT9YbV85?~==2eBbaZN{`_|)gAs6)k9l1b58d=8e6+**6D}G z?arJ#sdN9s^B?l!@q6mOvN9x`UU>4<sVAYu|1w|yej9c)?{<5DMo({N^!9J=e7ifB z-7@0fdTwlDa!vAE>c9NEuNs-7HBVoNmiem}8ZE8ASle7A$nCrFgQI!7HFqq&|JbtN z!GTXtPw&5xduocNy5F1yK`V<4IG=adOs!bH#%bGzi>ueBiSJ+Obdi4^zw68;2Lm)g zgLDTBSR5w=ba=%mZxV7mAfBjc%E}~ojnPd(r+1l}^V0Q_i+}iTE!kto;&`jdB*&X! zV#|vctEY-xOM1;PsWC$6yqQ(P-E}u~{iZJpxA?^+4$aHgCw?nb-2c1D`q$pZrlzI^ z3l{YB^n{%^lISr`Ki4B;8FVh}Va+_frH@X|xu@{tafzAjor~`u*)xKQI}z=-kDcnu z*~`CFb2=?Fu(7c*G&I!GdUbKJI|GBXv~+!aeR=u!i;LYKJJn5J%6+O*mR<Z)VTzM~ z*_Yi%<L&g`p5}E0WxxB(2W0=ood{<Qf1oi(Z{6!!(H#@|m7RB8Q*(_}^jy0*#C(f( z^-l)>6Uy#S=1*YvU)$V#SvGTGn!APwSF4k&Wb<XWlnA%*jbE-@v9jn|#BTK~qVLb) z+lwV0EqM1SqW}4=>C#1~xAs2=<(*|Z5gQUdKRbKlHMh8)goK2Nsj22Ql{sdYJ{s-f zTH^lf#PL82+fx_cyE*+k{@~KSJ1=rF<w2G1F4NoFa&PY_RQ^`=>&r{;X*vfNf8H&4 zH{{mw)|xqfi=H2OQQqD0XIq2&+ta=0I&K|T{#30}(NmY7d}~XlxPIJ`xXlqdcP_r~ zE1ABc)<#KwdGJfluDb1FkXUHTSqjP7hB>#l@m6olysUQT^!sHc++e${X6LPc@m)gk ze{xmx7JU(}={k`?K|w}|hgv30nsjw_`05oaPTcS5^ZvbK!u`z$MgPWiEMA-(6&2;` z>gxaZ=UdwnU$8MxoXyL=-2S`Vx_09BUSVO;g*NLLT#vdaeX=pre^a%pWaXao4k}8; z`=x6>R^&L#Zr{7Dp4Ha+dYzviU#ru~HEVi0IzD{<TwGWfxWMo&I5^+)KIp5{Px<`p zY&*Zap0;-I7DbCq3%yS^RrJ-!?7SH3Ty8Zf>iM6G5=@MS8?W5l_3YQTt>$@uXK$(e zzeF{g`If~Tx8*FpWf!mgUZS6oxZ1ob>;HPAm&RWjT5M$ao*!&x-=23@OI!Q)?(+Ab zYo1@d+7SHg*)tnCeLX!sM*+3Tnvy~B@%8WS?2O%Ac6U!@u!_*h<LAm$o*WE*{ouiu zkUxL^sQJ!XlA&FY;wJ8SqIvnXgA<MK`d^%WQtHkx+2ou#GmP715AfC7o1Hz;W0-m( zZf3-euOCDfI&3LCDmwFw+QQ#nzZWiC`1;yfXMrQvuU|iT^5uz%$~JQPhK7PopgrOt z;o-Y??v%ACP|()aHZ>J(TJYx0o6yx^bM0zpc`en8-nM4J0tFkJIUXvf&OX@Y0g9j1 z2Sop#Yd)J+?#tPH_~DV`$NA-KA}+RVVVdf7l)39xFB3Q+Otimy#&P1GTB8m}*~s3E zj}?o3R8yBu)e7wRYtzHYqN2XqreIO=iTfY7Ud>rHv2FEs$yjGgO+9<vjT{UM(ihkr zIIi<8vCK7+8Pr6QH#iX!*;=EovJ}*T5%}P`#%-R_)Rsj_a^VY{f<MXT9lo$s^huZ< z-`Skxh6~5x8;Ni4`}^I!|8Q?l&#nLeo}T_doz3AJ@9@My)}YPrymegZ)8UUDH8OMf zCQO_4?Rxxg<wMFZS6Ov!dph~e%|f4xYFn5ZJ2vbHt$%aVwCD*(OvaBWgUtAIfxpiR z{(Sv>eQZ7VfAzx?)$cyLt)}{fUsWLWbGm1k(gLN8@e}s$Yy8#rG(2XnFQ`iRzD<rH zA!(&>q4wRYw@Vt<AN}?}HvIY`xm_mjJ&&wb-mTQMe8-v}l}A+W+iRbaN~^c-Sh#xE z_wB#Wy>kms4(tDT<7$4x#`g6)12kSGulV@B^G138>+5;)e=kp}-zoFYe>Z5|<mQAk zfeSaxEuFQY#paLH<T}2%*L5*lU$sxY`}BL0gMx&lWTNWRxpU?)F!1v7-nw<mN3Hn( zzrRP19$mF+l>p1tD_1VO{G#qZujc>X?>8JoMMcfcx3{#gR9gLdQ0p`=EmQul!dr9h zpO5eQ&pY>4Pu`BtFI-vIH22Mo&a^haYiZ2S{3VxU6z@{4VSN8y`Fps|?|-*by|4Yr z-@54R%d`Z}%4I&Y734GJg+I-I<Yd>U^g_<?*W8dd({6?r-*U>AYqzibaBr8?x5*vh z{)>yg@Lm=7w=hio5N~>QP5gI1o2}m$Iw-8t$iDIE@Yh!RAI874<nDf5(5cSAkYN;Z zEr-|Y<8x)k_$eP$`mdh&ES)MYI%}rH^#2daj(y+!udn}H?EYk*A7{7B(h{3~`2MzM zyQbF8FWh{`I>StC>;LD=c0XHYR$2LT(+`y=T+iMmgDM>bfj76dW*=_jHMsL9SET#s zCFutlCbRbK+qY*e3qy^_)_(UVj~|?9*_f>E#~JhZrO=XfZO7+t5f%zOdGOZf*`532 zEUNb|Sm1E+S&8=(0kCR~IqTlND9`Hqv*%5Dy?l*~=qybkQ|~uQg1?j&2Iz=|hj02d z%izkDsfLa63=@9snQ&iaOKDotT?WvIzpGNoJFojoUxRjO%>MMow^Y@;s*a;6#>Q9c z)U5Oe8-Bj@bp58+Cc9l`@;6RXyT3Afw*A`{tRYfXbI#9IMQH1d;O<2$0yKL1`nGM~ z&d$)%+S=)&v@wF`@P`Kno1LAURPGuX8>{=zTf?xJks)a3w{F+;4>CV3EM(PnP0yaW z(CHEqv_(<2_4<*g+!bBhm?|v#Z|(oSVbR(b>q@fL)!Mk*`Gqg=w*EC&<w?EV$NJ<K zlDoD%E895Z?4!^r<{o|%PjECg{HcBLapC>L{_neQ?Rex>QgM1dCr6WnmB~rP)f2-b zuU$OkBhS-t^_N00Uk<ma>9$v=F4e*Ix$Zeq%g*rT{{H>Dc2%93VQ8FwZjO1rT&oi! zgN%LMob%7$-`{U<Z(o13OEfSraJE_Qtu2|t-wYNwi0REc{piX=Cp$jB<3C@o|9dTs zd0*KShXej+dv?lIeaU-re|p~g-|8vHn`fNXDbu!JKK1I-&P@K)#Fy$1O$(Fe-T(Rc zg^`|r;>l>07Y01*;`ZM9`gGp9o-^PQ@}*Tt;QFP;N}rZ0PUKJt(ta=Nm>`kKr*rbG z*7}u6tUYBmo9($6793w<e(iJI5pfTz{T>=394?KMWB%FwkjPe?B)}No(iH$|;yUPv zsoR|7m3Un6_)swe1B>IbFst_RmeU`46E5xBaPHFK)QahAcRzgm`16~a#vDx>q6KIA zJo{K-z;oC@Mo1_qB4Wkz<?W_U0xl{-zCJ!d!NJBxMhpzEudfdediCv;JRct)+w8M^ z+_f7DZe2h6H2nIs_<eiNAH0=aa)3$a*!s@%yXC4{PA9Jnh+cL~Yqf^Q*`Am04P4UP z>RW^&ZyvkzHZn-V*LCmbb(hLw-Z16e-DRA2N5WP5Qt!mXD|T`d`!6qj(bZL#&izw3 zZFe=_Mw4w9{-w3*hfdYW{QeEJTc`M=!OUF;xET&S{cv4>mqq%|1uwhz+^s$HOy_&7 z<zt?H?FnDj>*Po5e{pEj{I<V8&%Xgpg?)I=;@hUhprB@CozZprrL}j-m#f>>?L203 zDQ16i&+6?jFO@Q~Z*P5?GVSyqS;2(VHj5V@zO7iN`F8Tj6s3tC3IYbxWt$Y%usRAz zwDtD(PMtDkgPTxii|YsBPM35rxO4jW!Iz#PVPRP-Ue;X|*tg*2p<eqlzH|1(xO<j; zn&9bW_H132$=Uwj))CcbXK!+3+g3NNYt<vWs%4j~`$Re#_f?jL_AXlcg0m#x7N`ZL z=W+eiV*UA6S5s7*0vfuGCMj_~H1AZI&(P`P;HuHp)v2<i^ZFj1RY=Y2Nh!yC*50$c zSM8q{X35~t>9l3T)zuo=8v1J|$27Su=V;Yvzska(Adp}zZOh<L_szO4`1!hZk5so> z`#Cx?HXmFNv{Lt$;)?9Q8y}nyw&~xuMngk`L&~o7(2D%qb}CO(zntChID5L>LXE9| zR<kf{u=vV)G&1T{RZU{BXXL!y#SZY5v<wU(J^OUe>ua0~TDHRKMuo6I6NhM`>>Jp+ zy_c^g>R(+lEq#9}-u7#uyzG3Td+yh-INbM9c%r_<Wy-YY8!dU4x$)V(JIK&*>eZ#^ zD<}HatkXMu;c)7a<DajXhV0d>Iw@{)Gm>wC*5z40?i`ww!=iX0#5C^t(u@nGYtF<( zy!mxz4hxH-#Z4X+fqm<8JaTK7uAP0WsrBxfBVOUlWOsi1DD%@IcCy}*7pHZV_IIj_ zbOwlsntyD$v`!i{En>FaTgr0HGI37U*2<|u`tuk0I0@`nvqa4LNg-=yr|YFSJB9@d z`?@QCGB7Lzt#|&VwRX$qy)_q}F8%wisjKVMv$L~r=4@NUd+^{v#-mHuXKKA#TlJHn z;mq~(`K|M7X36|AFjFx!-Lz?!iQ2<&lUr`zxcQs^e`2w8sYKgH&4&;B^%)p8@b%BX zyF<3nNLTw^?$6o&vD=sEn421#S?gO`+P-@Fx`L^(V^PMN&%6J=sdeX@sq5rgTjI;W zz^c0bQoJqihncHZt_u$h{`S$P(DS=+kkXsAHd{?+x}W=d=IO@IT$kS4Tm9D1Q_*}Y z=-OGO{m3Qb%1(Fx^^-cDv`p!+=Jz}OAo%c0iFnnwkDcuN!k2k>?3*h)Q9n9o?#zeg zmv8j?c9}hyyh3noYiaH7qAUNzSFTwTvS7ZfjLe?G$H#i5>+;$$WET<F#wo?tU~r za`2@jhpUsw-;}q4=IZ~Sd~s)Ku}FW^4_>S~4ZQsHY_|TpzipW-Uo$eWIMrRboDEx< z8eZx7k9m2()J&PY$IH{wUd_B}8nS=2R!~^j(WFK>``ruI9$lgl*s7H1n`^mE<imrL zOC=v)6W}<qYS#8NH$Gjp#Eq{H%g2K@T{b$Hm~By<tg*gGc<x)a)aT1Tu=*aZUCzvK zN{cJ*`ThvAboM3z28M|njn=K|yKHw$0$jzG6pFmx7ZMis?fvtMACtC!I(YKziR_N2 z$3&-#=AIBgu;efEZKr-&>#&eX%QK31Y0ucr&+y^<_wX&c78ZL&V%rj<!gOX|b_iXz z^%i4O0&{IK1H;^9tPBkg_|1is8fCtIk&3@?<nhLxd(z%AG$mT~E?l;Xk>SUmyj!bg zZ5LpPp1F&GA;56fjBf=e&*U;RT(3MS(#7T4`D@*(h)7S@&NXMAZruEN(w{x*+h#2M z5^KkEu<(ESd%MT8cHLrVus0XxsD8iKTxn4Qv*T-rwU4f4-MzMLeeTMw+rrkChD5I} zy_UN*YwNqUD;m1GPE6bTeV$^Aiuum>?cJHDCJAyp_*wr!-0z(2cTT5whbI@G@7&|N z-1vpbvW@#hy&YK@G(@x{br~{Ny`CN_HYsx7vR(Te4!l29&iPXDZO-Cuv)!)0Sa1H% zShaGcZv4JK-(!y#Ec9HzcHzy`jq8h&;-8+d>f(FYomKheiv0fno`I5g&)>2<Ki}TI z-~j`Jg|#(18`~t;TC2Uqo6`hYCUR*TPj5f3XIEYNxjFFjtyj&7YePCMV!k~zzJH$o zk6Zk4o$Usuw(4<<>f7@c>FS&;DgUHuef?S}S7Bq*o+Re&cBb0L9Ii7l7;SpY`*kfx zlgGIVUH#=t7G3%CEJ0CEKyXpwyT{S%_^w>@ei>oD<olMWTkfqjOZHEwU3CAnbzu3- zJxtBFFC2B^ZcF4*3oUw8-><|GxK+XLc-QAYforCT-KyABTp+{G#Z^>RW>@iH!S?Oj z*Bo}7@O|#Iw#NPE&pc4CU#*eNS19dVIs5YGA2BlG8$_mXI=Kk^KlfJA#W#N1wCARu zc1mUKVsTuOe*EBV>rF>wqo&4BIrq3&*LQBKQes`;ubzhUC(6odw{~qx^Nn?NI>jBD z>Z=yKaEH$FO}lOc+}AQSp5>S>^)h<ul;<zA{-%4oIM-@(wMxzZbmw%f4TAuSqR1l? zsaPYnCWU{(^|v=F8mUCyVrK|B;r^?8pHcWS@v=qljP^4e&(_};xBaoKw}`fe(R9|I zhBMCAzqS9BQW5d%m}ar<Ez4;Km-x<kxUKU3nf3Kt7mP#R`faHR%;k*vQ~3SQjUOCS zo|Zcn6@6OjJ^j(6M*-9N6>3|qKj7SK|HsJa+rxwQ*JJnBe<}R2H2Zu1y}B>zQ@y%- zsv}~f#peI9F*TNA@H+MR(WJvS=gblhEH5?foho{@Z|?t(bvG<aL+7&TSt~wu4Q~JS z>cffKZ+^|1_Pk26R)4(#FGH7i@s*G*N34Hr5}9&(HP`(8`;1F2u$z{O{%p<U`sCG+ z*tt^BD(cvrwq0GTl-9V~#zh9^zS<$G_;9-Zojbo@+_c{=H}^@w>q(cCKX+Z)^m&p| z@%<;F%a*3>S+_!`tM2j^dG7cF)nb+1$De<DU@r1fXp>%K-0Zlx*?piC-fg!%DM9?& zmRGFV+x-(Yjm&HA-Mdl~?7h}rPdD1)p+jci=d)7&_kVx6cJxKJdfb-MH$NQ0orS+P z-C1RMdJnI!2@~7@I|p8VS<e2*sqVw#XpN)Ot+woW_M1m{y{2w#L|kwX^YqxjP@koj zu7sAJD6L>&vYYCq%rUV;;9@4vLIHIK4T)BrIoz!kv9()Qb*cS4?cL!b(PmmI@Gyj{ z*C{jZtx%^+%3_A+=C2PtHaC(idgA%Agzaa8+u~#iwF5sxw0bYy;!$FFz+JKQ>CaPM zSx@fBF`io<up-5VfkDEJ&1bo>i;|#Y2S?L_fR(wu*My?tHk(fj-g)6E!%O{NckVBK zd*_Fev(v-f_TFbtYREs|wf5?AmqX=yl%J%B-`gw0&2UkFle~Jq!PZNDUAiwqT51Aw zRm;9VziY1>-+Aw~AdBP-ktb7oc&DgDpJ<V8aAIX(_%tnyVL^ZdgTvyBS3|cl-t()? zfAuxLecF+kwsWuTVV?QadrrtB$L@2JBubV|-1l_9VYl`6j&`SoU*`JX5@eBN_!YB= z|I&=D`HxpTH@&rN&yshU1x2~0;tX@xrLFmllsGD+=EO`0W@T_olbWZj)10qju~Yiy zZmFYgDf_Et-8{#k!s_}gLBH5ezFu+`AH%e=UGtQ6&dYMDa~!%6Q~W|>we|F*SFfc` zo?GYa!(Kf*U1hq#(|^VC>8BI!xjdijA9?fjRFP{-_G-TR(d}ydNsz@+fW>jbv|o8o z7i4e#X2`>ROD5rYj>LDZ@)HH8SAMo-eDHcc(;C??=j3bW3B^}DyO+N2vFw!4r^{=f z{Cs?G=KOm5bC<%xRYYWW?<=}u@q3$_z-PJKy?Mvm?fz|JSdhNLs{ZMR_ho)d0}Mn> zTP5ZB@9wC!@}9`az@>9++5L2ll_&OA%`&`k{Lsm}9yU&=6OQ<2W@y&!%zU(opZ{@% zd;T#exEsU19_`u}A@23NJG}o;;l-`R6B#B<4NFU0{n+NlkLH!@l4Z6tIQY1n+qw9m zbp3q0Q@@ToTg&P2f2yv~Zd`MgUoy|KrYHBs-X+tNJ^JKploPMqzOrY>f@fzIsvFzM zaWQPY%G+LFyQ5;O{?9AFVjBa`Z=T1toWbGGYn$}%%St7pc-5ZdDgAuYcK7oB=t@29 zwQH2`%Y>Y87XSy~t&8Q_zmn!^z3rDtpFcg)&u-nyM=rMKKYiG!p}$hNyyB~hv$uQX z`GC-lZiWRK>$`INJvCA^Pj0nx+8oTGdg|?@$?si-KL6PJH)qr3|7WisEq}X3l!xKP zi`6MA)0gbaOlAK%EkIG;vC7xakB{NTty`z8!1lhJQ#awo;oFz~b+4%IU3GA4)046) zEv=I;B~9<Y4Dfz_fA;oQH+!8Hu2{8bU!?p;-Y;wWE-200UY>2ZBDZ9L*Sbk7*Dd{V zF2Soi%lW<PwtA^#-bC11fH(#PjzCfSw$y18W=VFx+wD3buHe^~Ooks%Ci|zzax^J$ zG?n=M_xR!|tNGTxevVb`!+_M#%EHsDmrMRS_KGjB?aB0SdTrm=9r+|x$R*0$$tuRs z;B+ubmXTpa2-i({h8?^$)zg<<Tvlu1Qlrr7CHP<Zqe|_+QxAPCr5G&u&8}SxUKphL zmW7$Y$8y$dfne6KYH#xePId8z9~K-sd^lB>^-^<z%>5mOi}&xh|J5t)abwP`MVE43 z_T4<N_IP1q$#E9}mY2)^O?lzW?)96!oMpMHSZtk`$QH{7$M+iB)aVE;`c(h_<-2v0 zxsUl3%GqALSUBP0HPi4Zp--o?|71R}N7U}orQM$sgztak({=ywar;-9M9Yj7Gykio zGwi6>J$LZzi}%M@*V`J}>lukNOk@4|QgW5v&m<EDoj)Zlefv&r%U@?S<4d;wHJKe7 zZX64=SG2lcKWXyp<(aDwPDsCQ9P+#7Z$)zP*|2yEtta12W%$xRKResi)%E^e*OzEc zPEKwy9fk(q*=8rL#9U^5;<~JqEWhpk@>R=vj_1GmF{6K8Y>yYm%eWYhCWWAD@!uH^ z74Dh4^;_>*(=8>TMaHMJPu)oAZkx8Kb7@#znX09$++hQ&W~~R@nI&Bw9vrPoR&%w4 z1Vyye9&pd@J&<t8#YxbSVXE81&jkz<!V^|xYl=M&XJ%+^N|aC&5)6@YJs^HbGDJ~N zh|5)?E%T*Tr;CfL=Iop$L7GgB8&VCDM7Y$1wtl*Qaf{nOzb$V2bS6rt6<W->apQ)2 zzg+H}9fAxwxw-G}?bUvLLExpgmsiyGyx5u=8-@jIH!WE)TRP3tJL%Tyo;g1>lc#UH z{QNnyc9`y;$jFbf#+IHrerF#VzqXJ6!#!E?|GRsa+RV<p^36D`v!wpz<<;-DEWX)f zbIL^8CrS9=o;9cTtnoVeZ|c*pQ=k4ncUqmJ$>-+DEpiMeL}D~@Qdu^sd*sYMn)^Wf znc3Z=+J0wGrXQWl*`%SJck1!U%^fa>!kPuMXFgrLv~)@K`+IvC85y5FdlqY5b7qDi zzx==DTr(z3N=i#p>%B0+&OJQ5{Qkb$ZZX}YjS-vrSSR*<TD53OkA|o!FVEp4=4qi< zr=&hpd$8lcsWYy@vHT2Or;AQ&aaGjhg}syJS$re9dO~!});F4Bf}anZEo|}GRKwyp zq3p|bm-#C9+{&My-@R2+SW-kZ(p|+jV{`ONp-vaj47Q=+%c4c{GBPo7adMK9Kd;Bv z&$X|Y3vjJ>Fg7t+a`D%9YZaxHD@>k$ddqy+R{gs9m1C-QSFal~Gsw-aR{k+#^4jSE zHwvD8>az^qcjc;?;DbH8erfS6E|9ilU|`vDb+XLN<Ij)ntK9Ty@mizmT#hD%+!x=c z8=kyWSKGQ#>aOdiE%*HwI@S3v2+%MzG`uV0;_aP%sD)El&BvnZ%ZqifyUp_ML_|cq zc>7j&Du*D;OUs87xBqcJvuU#o4@2pjQ*LtN3^RCswqCw&>U)gA<7CgJt7eARwugmY zs*x<spYhw`<HNPzROWYiae%h#rSPus5^hppcHZy*#q-gnf9vAwt_$?OzrM6K<ivEY zCWU!6l|qt|n)>?hA3uKl=uuEun3#}IQg-(1M~{LaCk|J9c<|`aqmB-a`1t#Z&TT3x zDtC4kAHR3cPC=nz&z$YeN0V}IY*5tD(9qFYQywSSq;NMdE^@`%i(4MeT(v38vr>+s zgCj60%cZI;Cbl+IcK4}6M>^jecw8*Wv+T*k+^<JkD_p+(Z8g63^^v!u0L#l2b@6}1 zl)Zmn{P=LkugO|<JdPdrYJKFJr(K)4NZGy5rsl_o)B5|reE4u<Z?!o?%&wBmo10QO zIXM{$zP-8W+AUW5|L^yO3l}O)%=q!)p|p9PP3fyCvu54eQ~CKs>1FGtqe;Fq3>LD- zvo$FM9ZET6UNC!Fdd3se3B_Ly$HkmI(J615bL-E_>>3-UBXgtgW!wxqZ?37&^Ht|+ zXlay8<CoI!@9%&A`jwZ9Ygg6RSDnJ@DYAS`Upg8mznJXf>wDRFa@`%<{VaN)T(@rG zTP}P->gT1e4-PgTJLWdg!zAUzgwog77!RxpU9F>|b0Yovn#jfL*V|`ZS>Zd|Y;E-R zbC)g|nVXkiUl)6Ny8e8t(pP_fe@~UNZc@0Eo|Ymn`F(-{2je;a^L?t)#aux-XYO7J z-D=3=?NhD#PDlUvs^suOY0Eoqey*W~(YCHF8h^g#=6CLqf9XEM=UK0`IUBE3NK}+n z_BEZz_GSg!qz0e66I~WxoVGs3#<bv)#Qug$C1LmHZ|zTe^1VgXd)k>9hL4YQ3jh1} z&wHBA#*G^p8MMCMpWBmZGHc~Z&7U`}T?_kE=;Gp%-`=g@!T(vx=HYwkYQ8y9r&F{f zq;G6^y_)gBapebTA3pw=@_bI4)wHHfJ2ne>Up;oI_I;-U!<qUYI=-cQ!>ZF#j%#nc z@}<-#^;6e`awQHWZSB_|A0NNG%(uIzr>Cpy)2C0LzJ67m|Mklk9&YZ_=gyUtmWBrW zD4+Xox_<n=y1!C~H++12yu9)w8_P>&wuD9gmo8oE>g~7qbi6Zv|IdZ`=Wn?if2uyw z!YO>})G0aJs*;C?T0JMLiHeJ_UcGwz)yN{Zf7a>Gl{qfSpEMM;oA*(+{q(fy$$|I6 z>erl!v5Wtc&AdI%GjQss`;#v8bj~+5xpvy{$;yzZXj{=ptvWm7s-LY2vf;tO#eaT$ ze0zKQ@ngqk&7K{+@`_>dv6#J8rI(g?G8klETVtAiZN{uw=jPl0Khi0Dd6_SBgK74) zi0J6`QCnXf?G``W&Tn7x;=+@YlT-g%2`qX2t7PTw-_zE|%$X&5+Q|Dw^X6|Cd;Z96 zt@~Rg)@@q(>B;5g{@U8+Q}4GpE&T8{j`OTsx6A*36&<$)StJu8K6#xLs<P@`xM+!A z=EsBjZHYRSsz#^tS1;e!H?vW1)sJtnSy@@qW;qNED}$G_v9i|we!IP{uI`cP#QMKq zuRlE8ety1v{lO;Ig$oxleE9VAbho&^UhJ+ZP75oltLuNgT&^9q#-Tb{@$apMwJ*BA zp1owJ_2m1O2M-eL=D&aYR#r-CSMF`I($cTa?R=@Jsj)i>4jw!9?CI(0M~@y&KR0LN zwrzdg-Q8VXS~@y1hDj~^_uDfZIdWu<W%0Ac{dSYSb~^~LIPPk_!|QBgdHL$qts6E> zsEG*<{`_|P{UnKLbLOmByqK9GF){JiuV0VOm)6$S?*ISq_n$vC$;ru*Eqw}?3_b|g z2Hl?tPQ-o7{pT-RvgFG3>-o2~c)Gf>GT8n5@%ZWK>D;YOO$sqFF?Rp|6fX?uNSrZq z=FKlJFLO32bpLX6bj-fC=3rsWwe<{+0xT1a3Wel_gf<mCJoMv7MQG?%-RNygmMod@ z_UO^0kItPsbt*(lG<N00y4(i;yAxfeeM{Y~z#kR0{JMbzPkMT~zP`TEX?BLn%1W)N zrxFZi_$>QjIM;9b<jIRKW|UaXJ(<G9FxPK+(8?#tERF(8;+2;tdHJ1C$+l8dRBUT& zTeWJH44=A=PS2eAk6*u@J$v@=UthB~rI(a^IWyDv>C>mFf)-64$E&Bjn4DsoEq@l= zY@Tp0BsO+$?rk%M8{6~a<KpCQN(c&q#^pXfK7Rb@(VxG5y}P~r{K=D=T3Vol=iJ6~ zb5rW+HIbY3Vt19iy|wkki4%W+e?R?2RKcS>@%`IaHQ&wOI`7Tcdf!C3UVYZY`~8VG ze*Zq*q;P4{<jKaFcjmklwx3$6!0c6;yYsNX)YQ`#zb>_$=yBxvXGxwm2ZaSeD@~+& z&p!{=5Lp;-BE={>JNxzP*StJDEKH0yPb3&HEZDNeL|6Chp+ipb@%x|7c=ANP#M0qc z_xIGkI`6&4P*1(gzA;Cttaj_ZzL_G&pO{=Zd2-_lk*sK0j;0msbhDqBzQ~Z=e!2H} z{*s^-CQ`9o8~1M45b2sTM~0yzJ$cefo67ceU0qz3+b8=iZ$9FtZDnQkWbaN6BZfWY z!R0DnzpSY>QI>ZUSi*lw+o!vy_D0?ORkMub_HS%vR$IE)s<be>)HgC()`GY6`2Tw~ zFTXWf_xsQPQEeQ5AbWLsVCJ`po29!>7g<+iff^lqu6Nq4R8M=mSn?-FlS1vS-P?{? z7ky)wn}2)a#7&<kImN~N)F@cHY**ao<z1(X@@;K68C0KEo-2zx{X93$sG51QqWtV1 zA`E#p7GY8I?!OT*R^Gi)`T3mv+g5MdwPf*nR!4y)yc!qTCzNH%i-LNYyB4onX0qO( zx8}}))a7YzllxgM?CmW7WFG0gvPR<K?Oi<q9s50Ne}1`o_Rpd(-`aK8YgPSvl~(hq zc%lbK{_}|Nt5aN$*;Wabu3xk&Gxq4CO?P%IDUh2#d+KjBJ<XVg&$nN3GAKEfyuNrc z^Razk*st^VZcn|cIz3N*$JY-nYnNIxM9i?@E0kqskZ999p?$SDi{ZerOMh?uRSthA zx9Zn>cgAVU&Mj{9-Cg%TBYl59N0Y+Y1up;N@9Mu@>}1!Z;PL&b*fO_cwo3Bh*QeRn zlufMpbA4)j)+?<oro6(F=G#|&<7en_S#)`Nxrj)5*2>rSxoxHA|Jk$Fu-mKn-@a|p zolB$c2mF3>)pygx<InGL*tsnXXmvU`^R%_ssUk*)hR?5Ftv2X6l>5Y_;HJZto5Bp6 zJ`06TG5NB^_lWwc<nX&Zc7;FBIjY}I^nRYR$)t1|kMep0U1jxqC(m&+<ea%X?fmVW z^p}M%zx|8m_rH2IynFXftG*TaD|B^EzIs+J<T&B`o!`~Qd8>DA?$x{XM$A!Q$@31E zMT;h_xp?ogFHg>zvv+s&er1?2OVanC#$&g$%nZJzf4#T!TimYPT2)c;MEAeo<~KU* z%nq`<H%&aw%An?4_wY-p@9Px|OH$lkX3ds(9lcsBb6?Lc^E0(`etZb4W^#yhZQR(n zHD$tYzq-ek8E-c2v`^AaV=vtCX7%@fKQs!~POG|Hq$kmKGm>}PMwu@kUbg;Kzh3kG zr{Si#O@V99#Bg;P^OT%j`suE-z>~i%LVv?b${gjkY~gEC@bF(8pb>n0?T(t?4SV)X zTK-yMlSW+3wBW$dk{|2k85$H^Cb@o0JEhIN)s*Mt@l~gyRG(HdC@8sft`vNEv#|7Q zXz3d*ZejIJ%>Cz64gPJ;j*GUH-jU-vZB@#I?)3HhrHh`u+H3!(CT*2QrU&1o$@5ck z5-#hMuV1;k;>Q;!+vRB=*T}2f4xM6}eRJyE-*So^O@G9_zC>UD2&!3>Ihs7g=N>z7 z|6I@XJ<8YaRduYr`ruB}l?~$IK}L(8*ZmM}R($@<qG-$aFXeqFL5;baQdzqgE}Y0# zc>bb&?~bV8aKo${CaJDle>^Gp7-g<|-6MbX@=1%Ld~;h<{B3hDyBc2yWs&Fhw`JGZ z*0!-2Ncu*vew87$`N`Cyw$hb%(kGfvzN}Qcmsxg=?d)2n1MAj@g<h+9{@SUEz3=hk z<Nf!yWD5UGt*H31%y;&?dwadtUFlS)6`QsA{=9GLpmN|nGhci2;~gp9m6bc!G&xTA z-ZE{MW1^>6A2&x+#pGX;a@MTV?e?wdVoXa*dHz=Lz`FHp4Bo=aTc(KLapPn7z`CdF z)uV04OpG`6_f&fbv@kqho_>5%uO+Ld*|WS?t8PiOsV>_qR6cEb^3{#2cl65SDYx(W zx^3;eUsh=^Eep?X^FL&8=49E8Q~lc*4t(5i-hF#z$gC$>_Q%iXFA7?rZFlQYhVhoj zY5oE(X?aZ(_l2hKFZJMGcrl|}O!w2rkBa-heEb->B}4Gkr-}Rc|Mu*2jt2D^>iwro zpUy9BmUDewEQ5fY+`g=<tF~reKR4Gp{92*n35R8iQ&W;3mi>6c&-KacmsOh5LIDPY zo=<9DpPqj4yQqlk>zrFBlczH@tlQRkeuAg_xx5Pjm)E9-_kEbNXyvt<UhhfQA8^*+ zzft_)N|ajg!5atK{#YMGX-Xd2zqL$t+N$2AzwZe<GR*k@A#&EMs@$(87q%`4T9FxP zXeQP?YwkqH>7PH(eE9H{eqN<yt-iALzt2baPl&HG`5T?;x;1RE@5zp&OHY^XUMhac z*Eszg4;Pn~rY0jpZ0y~c#_6Z5lvpawd2%1$aeVsp>610Jp}UfMAN2N#s{gpCYoh$W z)}Z{|ozKtDPwp=*E&crYbD$`@<1RII_4G?SEHA6q-I{oAPMejQ^S+yM8=2<ZKam{} z5-?Gxv71A%J@|N%X0QPl!yR7B;IKf2$}8;3&nJC9SF|Ii(o)Rz(K&6#bNLUhX=|<u z`d4i&<|x41`?ZLtQfun9y7Ntsdb-WO>(2Xo*gE|dN2^8rfyvX8x87g7#peH=t+B=S zJeMvSW$jmAxog{<#Ew&&p00Rx<?*?>*5>*5Y#1!6zv-;{q41Z<>x=dC6Y}a|HJhG% zSonCwg#Z6eoIGi0oV{xGLi2K#mwkS!zhaNATYs>X>7<zJG_JYFUhFhhTk6hc|Finq zldHR;j@^~f($@c&_M!7+^7L7fH%mVVOnLELO6K^>5-SD{7N(Goj=xyHB;T?;9j^E6 zF|Wqy`t_ie?@Z(8e|~;`u{nz6rJA#|vtM%mdX>dXR{VPB7nGX+bm8*cRSN5`{9R~r z<;%45xBr}5wSUQuCFzaa```RqIk9}v#f*Rd{ykxiJl>=r+mv_gt&GfZ`~QE6Bi$Rn zZ1cDOE5cy+^NH}6XMGBH9T#6*c7BH5y{}~ofx#D(jGpYW@9UaWwR}^}LXR2YpVEF5 z%zrmu>Sc#!@G_s7My}Ta6+GM*y6i8WG<h<kg1Wl<wMK=#r><TVW%%>w4`@j4OLg|X zpGJzNKGy<yWLl5T)DG91UMli_;zVWlJ{ij(xc)<j4lz8qwl;bbAIr;79kJ6lZ_f1j zF39qdPghshS9a=_H4%~QMgj#=uimxJjr{u3E0X=wz6S*sj`8bm|NJ~J?X;e<$NW~I zzkUY_YhGVl%i!>@dr$bjf4{QDRtwKxuFP?1TD{(U^9?C;{-g)jd@A0zAn@A5FW!}{ zncL;%ea~_4tA1})mHkRKeEl5*<4xZ63nj|7p7OYFWM<}fO;GW~?uDV{R*rkti80tz ze>-#gcJ#K73VWZOkXLVNYFg&YZBzG&-^5qmaS7A$kJjby*lM?`DI14g+xW#eYn7Du zbiMe`XQyX$KEHSHVZkz%Gd_JQ0|YA*C0H3;S{6*=ko><;eV2wpt&G<fYp&yk%F4<` z%Xt_I%F6n>o$Jr?*H~Iw?o&Q)HcfKX#n@LLWg3&t+-1KW8ylMfy6V8TJ7&3jtkT5Q z;dyH!e$5oBpCYsM=lswdM=`LGvvyq$6ciNPw{PFgn>QII%$@u8!2<y~Ilb2lCdjos z{&8-8Id9RoWud(R={pi7Ts!mD-Lj~B^Wi7AeblLk1u3!$O$r>Bnk{7d_P;-JUM&CW z5$5Q$p9~6>fexF$P29&B`o+5I@WTn86%5zBoUNAU$TsiH8J+(ZAD?itYcu^{J!8!y z8Owe3mzFThY-v~U@OKvd`#r|G_0P0`O!=3a0~X!SeB>f8IiW!2{>H!C=i0x&w#+9b zAmr97H@^!qCTHG!y88LWds`OCihxD`?`2sk?^nLCrgllbQ*gP!llYl4BgN9T{oa1p zc)__m_0#MOTyEDF_4rn~nHq1}UG>y$y=#X8N7EOXqRhE(Ja|J7Eq@$ow`Z?LOUybK z?oSG}Tv~qRQmbC@d!#7-{~mk%N=uzdm(y{6mDLvKntRvZ-__yuo5Lt!LD#?E%d(*k z4i0dYcbvubvwd58mf&QosZS5z*77S`!lw0BnWO1TaID^w?JZuvJ?1xcU7p*f^^4ha zI`>aq!Il-%KHWLzD?Ig^U<!kS=-=-xTeyDeF1%!SNqj+<-KT%A{1o@A@+@8<WVd2V zzXHdlc#n+}?h9$XRjy@(I*}nr2W&FOrTY&p{FYy4T(D*h&s#fdg|9J+`&C13xu<Z1 zewp~auY?<HZqt|Gr%#`*4qsnZP@u56hT+1sYsU<7-rd<*{_f7i+?)=PuNg3HqRXv$ zL%;l9FQ*H&pnr~adEUJ}m2XRC*j9hrn0)-g`=b5VX179OtX3oat;v)Z--Bn)j9l#A zD;gHH`oi0)&wF|g6`3i2`LOYC@N(aGXFn@(TynJN>z6ivcX6@%`!_4su9X!OOw7u< z_1RJJ()E>R^Q!r7xrx8@eV=)5SNZ#U4Gj#%#h>+Lx`qDMEe8eJ!b^5dUs7kA=il2= zn9OdSot-T%Cbp<3=fBczr#kNyTl&Au`fivm+UfG{-MiUlxwDK?y~O$4JL~={t%k@e z)CM>?HErI!Ii<U)=}?!b_Lr|;4S9@BOhST!yu7@us=j1IMM>R!SpWa`{rCI->vbng zT=zm5>Pc3pC&i8Qp@DM!#fukHrcUkL|K;=N+j}ZM^V|RV@Z)3hCfB&Qe<vm?i|fVg zD1AL`M|4fip2?Gg^N)9x1jTEE^?LYA|FG0{6!4#C)7jHAW%~5*A3qir7HVp1b8~WT z+`6^2uuxM=i;I&}(x#%Iu&~g@rDgs4_Y)MIg@lCO-PxI(pD!;U;P7sy5~u2~zfSix zpKSjUH}zX_QBjJl)Bco<jE;4`_A02WA3t-(=g-oO8w*QHzC1ZOdA@zU-p$-EFE0N4 z`Saz=myf2^{{B|`?PmI3ag9rrwc94#7mB=PUsUsdi6`TxzNN<tE#`dsR21oc@qfwB zYYQ6ZZ<e#G*|A_j!sTVYfq{YS{Bky>udW<yX5at!+wEp{e$W8S^!Pf^4MFPu^WMC8 zaU#XYJona@x7+VuyMF!ljT<$8zh3|S?QQgqg2c^?fs5`R|9a4=&YOAPmh%q_^x}4G zNj+`mogD7U${X2!`Fw%&>)=gs=jIuI{{8he+mn9x`-RWX&FvIc@7ixu@nHdYH~DjG z{x6?DSO55s=-<{>5_@0&$#$1%-`aaN>?!!TzVTP|{K=Cy|2)3-Aio@Mp``ljh+i{T z&APN_lKJcF_2$LbzMT74!SiR1se!?TJ9lbsZ_6#QvNbimdh8e*!<{>KnwpxPouALo zux#0~`1-%5k+Ta63O;=JU{U%?gh3}}M}UIB9P9FRHyboAzCZn|NOAwt#;9BNRZosQ zli%JWVRZJ;l}@jPr>y4Gd1?rWiKW~1?|W#R^x|T2{Ryi%jM-mbU9JB9PPAT9QgY^; zIeQWgHucGL>#@`Z+iQWn!2fS!c|)worcImdC9LDZ58t_)*)z-Q|L^*j+$~CpX?}+$ zhld~QmA}2R+v)!g@9oypbRvsBJaCMSy&JhX?dh{;lX^p5?LW!h>n2>Ukd&RR{d32{ zg$u)zU3W1a|G3uvt;{n!zjbLo`%ipgbm&{Pw3EGVTgB@A?_K!Xm0uSuVLtwGZS*$X zxqENkx+9wUGuCZsKrio_bpKygdRmgc^{*@^ZT`&Y;O@TsvGKAC|GhyITz_iSK}M*_ z-H_j0!w|4&_G&Y~xQ!ovH<ko4G@K7xJI^Akb^rO8DNoBKr#fvlE049RE_Mt0d3pJH ztGWjV{J*IC%m@ezEBo}sQ>xc2^U{)4t5%g+d7nFxZ)q+6a&uMH=G*g(KWw|WxA^(G z-H#(8-3<$P%A~fx|L(l0FX=$mH@o>$rlh2QpKo;V#l^+jb8dcma&q!q>vA*eYZoqT zIR4n#YRz=>-ES?QnC;3G>|rbp)X>*oud&uubKjPV9Y1pK-}>`*h3wxS(-$^hTOWTu zX``C|yqaHMGE-AiHw9{laJ3!^lkav>`nd5?*^=|G`dj}@V++c(f3ezh+qC8s*`o&* zE>11^`6*TAc&hA)10n(+=2y$FkJ<U?)vH%epQ`3n{`v8d-~P{oXV1jM#no?KzIaja zuI^oTo(88nZ?BTijKzUJQlICk&z`ucFX=&orbhUbYh{1ho;A*Y!OqTJ|M{%>_4V=p zf4yG6J@@vqb?fS0Tv)hf%^GfTy*)KQi_Xupg$(?8`uY9){eJ)AMT_3u-L1awsFs@A zvokY|H}%SAy8qXGvfaeM>$jz)<+C<Do?Ua+FiQs9kv)EIXL0zoKpvm7(@xlwy}7Zs z`g@<eeO_v+YM#pTN9L=4_sH4qDpzv3rGC`O&bxDGQt$s+YbTri5&Loa<In8v{ufOH zriRUlRruU}=-%Gy&6_suvOl-9UQbdwqP$+l<;=;nC-3fC?V5W0!2b19&Ocuc9x1f8 zuvoET1p~wM)2Rj$P75a}a7^@Yu{&nqqakuB!(`LMlPO#*OkAx^k1ZyjoFXG|x97I_ zm+qydyWF;Me|mFs^Yd3%R|~88T)1$dprAm)EGJ?)-}#d#Iit2-zIpET-PnnItJmq4 zODx)y^D`-u-G~8PC8|cR2zm8<e*M3z;qiC(R-2odO*@-rZDG+PWBI9De_zGdS5tS~ zetUbny3dRYuRkjNpY-mMmESwJ`)}v$s(ril$MwpT(`!`YR@Y1HfB3nZKVPlH`bOTw zldcPAM|XQk+2!=?5C6={vvldi>k7xGr13Ryf4tL_!Y#bK-0W09X>O(C*>3OYdSy#K zA6Wmwn3zG!GjCp&SWWfHo%U3@)^R%b&uxCcvbX!+EGoG6tk$^MjQvkZ!nO4KwF~ms zTyrkeg03c-`@1H-EmX#C{`-dyKVFZo*VNF+$jIQ4wc28SzE5FqzuV%uw$)*qTs1`A z-Q0Zq$dM<@=hu1p`T2Qx+}M=bJ$?H0lxgpuKX2bub92(Wo*K)_Uww-|`~Q(sI`@h3 z!J&`Or~j+@dHG*t)UH!^W%kcbDGG$ntDXN;Ez*Aa-_HYGU8|B#y6s!Aan-Udr;|VZ zxD(CqU$$i9eu*EQc19CQirwnGoG$)c{4n@A@6LMNyz6bzx39&R8U+4Vf8$;1dvsn$ zSai7M2W5ZL-gP1gRe9I;1!&a#{q^<YV)vaf?`9gOm%X_$an>v^yQ2vPIXOA=Y^%e< z!_(8!)b{xYYKYw1QTTZK{W|N??LXc4U~2(hg~Z0r6=`-9m^s_JeBJ!{@tfV66u7v! zoSdB>KYA4Pk7=HL{l4vsoM*l6l>GU4*{)ZTEA4iDT^9L!rnCRl(5JQP78)8x?mb(j ztyX0^O<y|q9cX&J+(T8=^1r8_e7)JFOMc=EPoBJtTfEl2XX|C-py+Q`U#yE|ihA`j zdgrCfm%qQi|Npf9ein9iW{1ego2}g9C!&LI<a~R3d%L_{&5TKtKAqOzAG5b=szS%3 zM~`ZMf0MN=YB~Pc({=`5(1hR^!~g1~rm`oGy=d8xK5_dkt0l=%vE57e>s@FPs$Ft_ z!l|A=v$XgaI9in$9+-XL|M$lsbnep!*OXVMKS`O=Uwk(#D&+Ro!__OgCeN9(C;52a z*6i!+;`h%x{&?xKWxICo78e(1b_fc(RDQoUJtv2UVcxuXDapyn$qo(;jg1FiU0q#i zGq1VXxvXs4mL|su`#{IL-nw;5_D#*VH<7w)8H<jm@4xKq{rZN*OY!H|J6z7HKb<!H z%GK+px2#@O_iu~a{@7W*KAPczamd{LML)`|mj`J`FjV}A$g#IE{}g#_ZT+JEJGNXo zd-=-Y<Bw*qo&0?5hnri{f1NoRr<D~nJK|FD(!V=)?9ku$BkAL#qo1Fhy}dD+9eEZK zv<u?u>Tu9qobG)xf#KotyGmY)$JcBueC+1xdbIZUx3w`lgSsYe>C%7Tdc>werf%h$ zMGAJ7Hn!G$pvmpWljlzl6*+YKzqz1dmp9jWZJ*qXgyX8M;v(tWtfG|HE1G?Lx%ou2 z<<FCk-13y4r+)bxzVRS0Z|R4!BVp3NWv9GQ{@Wlj{aR*OeJfM9qDa@J$zGs!A~naY zb^eq*X)m^o@bV4b23l^U|0U*A>-!s;=RR@uOw%=yI$GNCa!KU7lzQ3Psh*qf^qw(c zIB+AT_}Qbxu2Xk+8Hc_Km2r1JuIfGQ!_PloUtiac-Sy?c!DbPzr!OxrXIQX!@#fm! zW%>E<-|zo_@7S?tN4v!tHl&}I)78~2FE7`cx-01@m$mio(%08Y?Ri*UT5s91Wz(ij zY3JwNtuxQfef#6bkDbNOzxjo9ERl<ia`$asy5!O?=~7=&cLf2q`yL&2H$xt1=&i6U ze$lz(@UPg*>*jZ_S^F$(%BI8bRL@43yvZy$)qSC)HhJsR%l&7+-3^`+uX{J6deN5u zPfiN+wI6=|`RmuO{4y2{46DP|ZrZRxVLmSp&zFxM4Gj!_yxo3(noguq^|v>-x97`S z6eL_+<QiZ5_3Gc>-<JwGM{_h;l;?_X-xwEv{LPuCvaU;SYMq+J(D1m)P44-tz4k4O z>cv&FA8fLW+14RoT5yxe@wL3^ow|~)%K_@gLn=NzsY$ux%<$l&bpQXoks3!NOLkT- z^ez4wmHVbYU{U{<Qrj(C_=5YEEnffW>9U5m+3Tl@Tr-%lrCEIXG_mXREWflITyn4D z$FT!0v3~RF-rVZCu-o%_zpcFKJ;&<~TT{E|b{|}of4uI?$pVH2L7I%l?78+f#}Bx~ zy80#_JML`$Zr-_|H}7)gg4RE}kYN%U8ft24$}nN_<jtEmE2}?Qv2tZ=OUs(b&1r|* zczJnwpDYtjOiW~BV|$cbTU)EDuC09Hz=5QV=jPkj|Ni!No7eCEzwiI&;^v;c_EPhg zzIk!V_QqR7VuJ%+efLFLw<X^CrPXQplR@Fg|JbT%l^iXJjZ<cbnOW5_`psYWJK^Q@ z#nRHOnVm-&6hyj`;-3n!1V+Z4f9_eI8?!QAgo%mi)2B}*rKR>i9yCvwAW+o1vTU1} zsfmfo`=s}+Yh7PkZjH(NyCU&&j_%#Nb8Ahne%)%y!*Iak{-w*gYo3Hji1Zkpsh!id zs&DGd&j#NM(~f;x%V&}MNBy3hFuQfX-22@MhNesmk0u}1^^w_YtG3IE=X=3N<=2gC z&Az#3NG2?KKPe(Aou^mt>C#fBv|Y&(IlrHI#f7Od=tP(<+O^3}a~lJL-n<&iv`wF< zORLNL`?_%AOts*7ae>F~?R{ysd|rCWvWsg}t>>0M4?1(_={=Aa``&X#e%T+$5D<O0 z;K%j$?(pAU+6k7c#Dw|(<b1rw{F~3a{4MK8>8H=m&R)ED@%s4veTg?dKR<s|_JpO4 zN@{9qZEbDlTq(z2Q#ggyrc9ewWHD#W8lCj?bcP+Zzqjq(yVv5VW7W)xOj+MR1-G{= zFFpBud}Vyj41>py6OWhKPs=Hn%Q>^|sof4a|2ogbrmPO>0r$5B81iuMoL%w%RsFU| z28KmPT@+SMe&l-a%o!b9+rLjwPrtq{mYa*q$jmJ7dD-W<dr?!CE;u7@@=Sc`>Xli` zQ;+sZo9_Sn&&F>1U)6b^yDvYUJTLtEv?6IsraAl!Pp7t8&2oFPc~!pox2&xj?VUtx zm-N4SY5GZje&3ES=`1s!G9O6D=RSGz%ldg~7CWWWmrvc>d9GUE|KI!l;pgKXxh_r8 zjb>mt{(tj<Z69(sx~qsZhIp>-Qr_t)(|Jez-N(nr`}+DM+EP<emMmK~>GB-6e!1G; z-*OAjs##f89c*H~TOr7C>H5Y9ox-Pehgvu_PEVg2cl(W*;j#yRE`B(=x>oi5^+}VL zum4r{W|nHY^iC#F#q>6I*1WmjE($O#2-tAzRoj;(j~XPKkNnj8Y0fa!Yhgh3<9oiD zu_9$}Zd|-@;lbOte^2Z0|MB}bHw)7X<LK@n4H16v|JMEf@q0Fwcf6iau6OeOKlzB6 zJM-VQ&y#&(l6CFL)ywL2US>v;pLk=;e(sof-J$PdR&srdQ0<cQ6R)OipOn4g>gLK+ z)lv(+D6_8~2Oh|NUw6!Ro^eIxg!<EBo9w5m{S;K+`tw52)w7(lJUu<t{pacE>;Hed z{r-vaVul?xKZ|^Pd=e5Kyt})bnVC6$Z&hkaO3CMEXYbs(^Z)Pr`nb5b$?E=me0={N z_uKpU_)OD{R(pH>%60*kgX`8$EEVZE^XC5k_&>8-AA<^Bt9_iRN}_xB-+a3*f8D>0 z#y>9Ddz=3ev#4G8eA9Zj_4iG4?_aAHOnjNr{`>kPnL9oI>h}D)F8ukiQZZvf<b?Tq zn3CUa+HBVMtKRlU&et|h`!}=9GG^@T-@o=bhxhlyXT{ShzdJoq=#Bgx8XEff`T6}t zPfzLZ|C5xHW0QGF<>R$Q>*MzBDthWwQSsyP@qT%`8VNbMy0^EsK6&y)Slw^J@oU$w zzrV9{^4T=+ucm*Gzy5Jt*iC<iRbA`SnV+rAjV4V`o*F75z!DfR=i;W~xWrkF>st5q zX*TOkpYW+E$HaJBzjxKK$L2yT6X(d?^h@?uny6v-)3X2k+o)uHhv4!F`&5mMv%jp^ zc*rYT_t%nnKdh%5T+sP{s>nx`+LPk@iawQWsz`pHRPgvuwt9IoukO(c)t)zBrYbG; zIPbAGm7AeJ`o}Y~TTeF1*SuJ?M9F>KF^7dgNB(<VzpdrBbLPam50if{_nUp^WAfTH zYySQDe13EK`A<J<q<YyvD;YwxrYdlln{NlrI-ESYa^*@^HnvH^CYdI;wq{>9GB!Sa z>eRC{GnMc4FZ#{GR2TGX^_o2{Y_aS1Eu41z@vGOfcuRjfOuYI><muGbovkaI=T;Z! zU%K?^&+o+NVm|S+qi0Bcd$elOqFYxAwXG_290m4%_-T46`^wd;qN1~>-7z&Xx^(TD zoB4xp%Me4bT35GSpJpP`*>RbD{v69MB{d6Pf8X!3w^;MpiS_(P<$p3ceCf`S|IGU; zs_W>_s|*4)wsMCJWW<;5)0BI^?e3v4cMXx$rPBmi4klbm>${^XB=|_uZtntXaaM*K z`)aHG{QMjp4_;X4eDdT>`T9Q}KRrEtGHdVV&7Yr~ocu8N<G+7@e}`yIJ^!4!p}n1b z{(13Em$PQ`CMz{5Y%%4T?-C=<RhXyTuF%1H`MTB#?bf|}rcIIa6gYCRSeo6kPs-{A z^QQf)|90$O_om06FFYvZw?@I*J$LHUOm<rK{doQ9obmK>u2!bdsmr8`&h)$iUCB2; zX7QROdC7(x;#{|~a#pU|_T|)F=g-UPa#NpOYCRU$U{?9oWQ%bg|I601dAe^)p6h&_ zwfBnko4QN$e;-zwm(nqRk@1TCe|I`KHWudicTAkw);8_YLfM0M|F*^d7b&Rm=a}pG zRVHz3?OW61j&5h8vQ}BFdbOth&^`gK&M!+IX{X2K+S@!o+5F@(`{6%KbEdQZoNM{z z$&-5*^z=8~w7Z$N_;%3o@?&e)=<Td1UcY(ncZ2UAK^Lo5{5iJz`@avL=Pg{CcwtR( zO;JV4oyDq~&A)hD$bYP<b+&AiEE~i0_cA7zw#z+wb$=przKum%=Ch>yrx%MiE}UCf zE!p?j&CN|!RrSgA^Yd&!e|xv|(wl0(U9<0&HSXNHZSrnIh6<kT5<eSj9sN?1d>nr) zzA|BV=U#cA>tD8ZGnG`Q-+A)ox+Uw$$F=rK`}Y()E;m0u@!GR>Z)KXe3+?s?I_~=_ zTjZi7I6L@kP{6{#|G}TKpA@bP(VBa#B0bsoj+@_Rdv&X;H(2N1k`#ZsW^S9%-+2mp zPrkp1k(KIg3N(mOSaeaNp|Rn9P1?eZJKJ_G3v%=Ftc_K^xoF|ijI5=xk;l%R)W~1m zDie7<VC$YGeb+lKONLCGupq#or-}22lU1|U5m%?o^Vg?e(a=dZcG?|q^rex^@ss|{ zvtA}FIxqf#@Bh|&=T05IpS~=mx~6Ey+NIUMzXyJ8Vy>_I{gC}MZ^_yFH-lA#a_{c` z@%iZfRa)8KVr(=nzOQ|LZtiUJd^ylArODN7inhKnC*IH9Y4zS^VZyg{ZEee>_}3lX z8k4lY|MlN)C+l4^UpyC2joDXRuwnE1raeK0k$HuY-`pFsXZAevR@obFHTA_}%U>Nm zU!V2V$cS_PaB5OuVM;u$BhT<@lU8#4(~iwG3@dcj_gBqRoq2hCj-tEXiItB`A2BFA z;BIxA=%DcAb3v2B51T#in`>VDlogJC^sz!uPw(Nwhq2Z+hPsP3?K)EZ;Yixsb7l9Q zn9MU@sqcNN=yTVldG2>byINR}&b-LE@KN5>tE%ghn&<D|7kqvtD?=gszJ~8gukr#j zKmXm+qV(|fj^nMWkt~i!)a~nkyisD{DERk!$MKbshEE=UIC0x`sU^b!@ef&9r%Si= zoJ^M9@#ckj;`R6PYgeylYuIyW%khWP-?jb=J-v>l;ngjp%1T$Q)??x(OboMwg#|x9 z`1N=3Ny+sm4;vTXKce0aS_bjz;N;JlksDL2^^Q!w9Dkp~ZeI9|Yg^wdURs=XF6Wmp zsH3r|_et%A-^QP;om7<WxjetWTj=)tO*Ipax-uUBXqbGg<maLbe9E<_mlm66t#}!@ z(!_oC!tV6kiu0TQoO9~5Q}VXmyXD;P#m~!pazwk2Ds2yV8MSME{ETI5R$RNLKEpF} zqPd(*y<qM8!XHbo7xtgh=AOTI*Uv9keLvltaYTLP%!^jDj<u@JT(1A$M}Xy~;+v;i zXCFNNc=CMlsejZjKIg9R%v>LL>`wj@Qy2A?XW~nzhl)&@@_esn<wq^O8K>7iH@UJj z^=QlfeZI>tGA>x76d!%L<B!MoMY}At6tA2tlZd}CW9n};EyXFfBkXTg?^-siPI>*p zX|bZe9<7p@{8i^un(gv+i+25pJ26vnU2<Es-@cM;`{fJuRE@2y6qhVoWwBr5uWyt~ zS)5XPG&_Tho%x%iqRGtJwz-pEm?zHt`%ZChgWKY>GmY69Y;0{)Wlu9)&-Q-3C%@|F zB8SBn#dM>tJneS+Eg~B7W)0i!8^32r+?o(<JF(CCzP^iD%GNFC4yZ*QJy><)Sg$mr zf}P#H<Hy+#Z`fJ<e4cgrx&;dsC>K6*iYY4Hme#i8*Xq?-msfo0Pp{dY@N4_7sAKE+ z4j(-)^)i~bSUx`~!}wx;V5BSK_KD7AD^kOM@z39za?UNA+x+B3iIQcD&jvI$gr8qo zy77CW(bK0hKJmtEoBh}$Px<(j6Mah;<Rm`wS$xUl>Q}}EJ9OITY;hJiVsHL^r}a;> zf}3A?ORqg!cac-^Nna12*}Pe=erb8V`en83T-m+Hwe~^bSNHw?@kL<!Mv1nSt6yyp znezJ8>Reqm#snSK)O`)lpW4M~2uZz&VsQ8{c|Y&hwGt&e*X&v1*r&YvlYQ@(Jq-;E z_4WV5mak9@x@gY*li4RfPUOVRyeF=X{{H!2UtKMKcgImX?4(Q;xAO$XR)&QRH#Ywk zDVx7;T47C*#qx!HOBdY9V&_>b@iLl`!ScK8WQ~U!+N<1;*sMqnH<T!1IFP$0d_wpU z4Uy1PT~XCihJdh;Y_llc-ILC)G`zBT!NnJ<sXM)NLW`5zt;$4uy_AoiKj&|9Y5Oq) z9?)QcFHa8Rf)ysw4WBP>e%#`8@XyNZ7bR`GKfeeT-@a;P#!l;Axi>~qAeC>{+A=bT zKdNlaWV3n(TEAms7ar`(&%otv^tHrC*GFb&@0=>Xwaa$N=^eShWS_~E%{{(VR(V%y zjMA3yfBN)E$-LdI%A=~vEh$N9?)$cjfoC_eCrY%Qy6*4O^YZNEX;Y@e?73mmJm<xB z?F;-o8W-JDn%x%H{y%KK`MICGZI;gdLlM32n(Vf`wcDn!I#6#_dENoglI&x>(sSp| z<(IS3h?}gUuD)FPc+||DHZ^4*Z?2v#-!toa*!*pEa_8dyUOjdv_st1Q27zy%R=NB) zyZ%sH<DAK*?Uw>Bt8y&bVUqr3%X&ryW%GkqR%AARIWxz6nVYY?w&>K9iRSzwQ`2Tj z-rjw~e6NY1V$rtGW!t`LX`K7<`<PsHHa~0S(nXi%Omtq(<WQNqP|3U1Z85WhZ|=@* zZGv;pt;k=IdOdvijo%Coafz!Y&QoPw9CA%$v&a-x`^6RWr%s>#{@>g0TfW#;EoSOJ z&dpn^^jafo;mU=U`Ty=bJY1V1>#=>uu3b;WQ*|P@e0sN)U229t>+6+YC3hdY6LtIU z=|A&>^{X>#*e08$ZJPX?WA(0CZJXQYi;90aaZgssDZsO(hyROBozddu_Vc*-`M-bs z$k+gCGEMfkyLc(<*Oav1{=0YEs5uJQ)Ge0T?C*0b|4HFYo}FduOlyU`z6eHc+F)@0 zjNeV9>FFig+^UynywV7r^6f#I{N9EdbNMI9Wk0iu^mSGqdsv_szwge|RQ9bVJb!A_ z*zA8syG9mw+?F_Xd(OP$&mZk*Sh~PRK&k0Rc^<!F)~_H9p=V-Cc;t;F8H|b^9eo|& zX}x9D29?P%+h?3zc~E1<ylt8cDbH1B&9;~}?fL5r$<*hnyR7@Q)@ubNtqi+9?d0i= zSvN!9{E}*HU}s=)6cI@`n)zvKsc2Z59$S@IloVT0k&fK_=;&}o{pB;lXSgjlmfDfC z(8FVCfbwIx-p_OS8Cq2%f9-nar4!0<Lf6Oi%62Wy^VttJu`<c+{8E=$xo=gM*kr}W zp=~LTUS3YWz5U%9jkTqlBr{i7`CNPW#oXz}hO+Xwlas!_-ap$iyGlONbt89%$*uY6 zeMgTS>y@`|jeEb$rT%+R_}*jpt`>Znb1+x+msC_&@UyBpKWvwre*Bx&;+6Euy&S%? zH=n6K^u>{}xjyf~hut<&t8X;vG$x&C1}$=^PJZ|;bamL@ACLPT9UX)IH2R#YsD1u% zzT@fdp3AO>nx^WoKD}4}+@>(`v%q!3N!GhQu=akP6IB{IH?D6<aKNJe6Ek*fd2e48 zQ#&*9{giJnd0xHTJ-^oOd5cZ=#t)Y#9zK4f?!l(D%l);|GMB%$KY8*-%;%qvuiXBB zq@;dp*r&UHeti5pS&h|0^-y_|(agIs#TT+au<(}dWncI_?zp|#rOhEhA*)xf7wc>h zcGK^G?Z}OZ>q|{GT(QJPU(a&R*_D-orPnXNWsdg#zPkMX2D9?gLJ2;GKu$%zYtD}+ z9lrVX>cffK=f2%DRU~xw+|?^oPUrvdVbIVyX>w(=ioV3vt*J9DIiDTtQ*sJ9z0Sv{ z+VoIyk!vWYqk!hji|hCfuRRlUF7|fm>xZ79qPpVN^FOURbo}9Tt}bIu5w8a=p&~s& z!QqM`oQv<b@JXBSEe<F#>D9k)myni|za-!F+$VjVb0&rx6q8r1(mUG9S~jiu>lR<b zo}!P}>|}kFvx~2PH$MG8?QFTfoNMogIfsfeYTt={@>|^IE83-Izh~x#)YIFpY&lX_ ztM7PU=k5Jn61A_BN}|v6$tRoFKD_Ww<=4-fQ_J;_gStC!j-QnFS-WL&l66Ucu=|%Z z#rZ9de|&y^e(68+<x^*#ZaR=ZTl8Z8oWF@z56!Rsf3`U7!2c=#tW8a<6xXcTl<;YW z>RuVo<qK3FTJt);e({}0=6L<@uixiy|GUhw=l#n|cFmr%_ZR&*xpyIpqfh*cmrt`l zUp>Cuy68cFb-E3&UuA{yLhJPVl{xqBp5FLvU7PoQnZ4PE*Y5vUaqH>AS@+J`f3f*- z{C(}hRo6fAZayNl<4xD9B(15-)~#}0cUW2A!^#jT#}1d44!>lMRtrXlgBnhXev2=1 zDrCLZ5{X=8q7|!ggz<2L0>fbq30I9nD@CGCn@av*l50MfBQ?`a+1^3G+{;dl!>Qr( z(YL*O*cc`xo2_M6J@B)pZt;(OOic<b7XEu)?e|bgD$bfB5_(iV-~+3TRj*^*A{F_^ zI~Gj5exZo@!8V=^rC%&%`qpl}eCg)wRM`^@g7g2>JUsPrvbz7IQiULeub1}iTJ~sy z;Ix~WOFwb>i1Saj=Wk(bSUY*&?&+1Wyx-qFm5>o<Y-m!teD?B{gJ(6&lzv~m>;oF_ z{I-rQ>|0g%xjjq_QoWDNPoBKsvUkyxze*-+*X+o9#Iv1swVR&A{`qdpjb?tCmTqWv z{lmA-sYaRR`Yxf<u6MKVDb`GTwkUD^{PfPtRr2+><-ec%aiCIL(&zicrSo_14Lwo6 zyl>6o_|xmUDuvw^UzA;A8*IE-*JtjQD_@O^9$E6{uvWT$4BK=xb!Vz5>-Bf?^Nh+Q z+XCOLwT-%aYSqN!zUTX%np~MFaqCs)><PW0rb}PmEc{f|RTkF#(u8gK!gXsFH5^{M z__D;US#F*$*T2zWH<tXQD}6Pz^u|}y$jVNJgtQ$0du(b-E}SRzgNzruC{3I@wY_cD zx`p#vP4;KMb$b2c`+_rP))>|a8yjy<kv+lSviRb@pJp0Xc5_mv1sv_qOjmRJ{;~2$ z=Y8iB_BV25zCK?3$*M@CwaIs$v4x@9e(U9Fr!MyW`=;?E?@{C1@A+{ZQqQulK3#aD zX^qrQY5sZtzCNFsT&sBcy%cMuYBF;+b8PX)tl1@2%}xsgR+@a0o#VCi;tCV4R;T60 z20V)sL`+3<jWU;Ad|{&1`)9h-!V8%_Vc~JY>hDUdoaeN5ORLH!OQ_w{J02pC{*%FB zxuME?xnl-CMfv(%t&0{d@tgR=rpqzCi#u>qf2K**@y&l4pFe8#R&Mi|Tq?rczV_*Y z1?#V!u;O~D;Qf1Fqtw$y>`G1-{xTk~d$FhTeGlvWzCZW*AE)a|x-AW=v)+2(NYLv$ z6AP4$duyMIGdC=q`|f?Zn49hSUG=7U=V$ikyVY%e{lq=&Th-}(pQ67_mA5?i?QrqU zt#|Cdx1ZcBvG|yE#I2Wp@fKH3_&k2D{Ml~K>x*x67(P6V>Axr}6MSF9a;LQX?tMZG zIyt4&YM*{Td26HnySb7E#S<3KR<zvIHto^$*=l;fKWqruR3oUUA#VGD_sR+VQ!kVw z>)fxHU-?&B+1|B@ZL;F_|5waQq?&6UKm9D-eR`8~{GV$5X$;S=UJXx_XuW+R^TDR* zy{ETt+V$kcPF~SaSEf1jU*E}}e7T-c!BqR%``6VPB3W^XuReaZ=VJM@YSyOW>t&{9 zW_RkoJYSqHt|_7V<>=KgX+{SZ4(ZA{>iX-aPWwMw*QDU4j9#=$#|h4vwtr(^ZL0f| z7_Wc0u;%!;`*rtAdsHP%&eYy{wP0!X_1dfJ?RDSI_VM*ieyrU0r|{A3{JIMQr5m@{ zmrR+uY}=)^-52%b)QrXXZ~u9!8mIj3aej8*+S*?agc&|?7fcCHm>_@p)^4eLyKk9r zySn-&esMYO=<NGFZ)bR1(DL*ZR(2Q8-iY~p>*k3Y;g)U7q_&3gGBpOoH6F};U_4_B zXJg*BbHARdma5nBt8yGV;*|YHWclL#wrK{L#nUU9+veU9_v(A|F4eATk+WOS$*Y?u zzVuXOXh@tfb?>{Yn<vIrH17SsQK!k{^fcYu&wPLSMJ?uJ`LpCpcw}Ygldx<Xx$yYw zIV*0nzdt`eh-cTFb#0Y?etj!fu3VEmk?G~RTmOIG`23Q){Zr+SN1p9pdanFYx14!9 z<Nkgrce}4Ick%Q1ToJFcQqo+vVWRelvpW1cXGeq|zPs_A6+?`z^v|=`mWA@}al3tI zr%dzXMcl{ZC1z$mNezv$|6X-%QewQ`kI8QoD#aK&I!~NDtHa)KX3C`JmeC<so?I5{ zUO%r_#`faJ?Y-Mqoq8Q=I_s5`beaGEyr(<YY}xc~k57>P`4iI@z1gEuEbMOHF32!p zhE!rwiub)+DfzZ7M}to4pAz_Pg0u~E$2K?ax?i9%qbEL9;lCe-XiZh<xXtf>ZuTxW z_tP8<|8{QG|K+=4U*FDc%N{07zo<Dgkk4$M)hxICAZ3OHSKUNadHuI<)RYW-v^l`w zl)?AHr&C$0td_~?{j>eLb|PEI#rFayYv+n&utgnN;(Xg#_e@S;=Kgk__?;G}#@n)& z*53cfXDr5Ny7h{b-LY#&4<E5V;MsU|&c}}zG>h4ytzR)7_~CHf(tB^DR}q85!i2E0 zT_+1!84{8fnm&HKaQpwxumr>Q-c6f|4QCi#fBfX$h2Y;#Z)15&zJ!L=T5nr7ZTFYc z7o~1>`B>h1cbVJio!Yx!53ikZJ?z%IxxC1Hp2gwZ9}(8FwNqJFyWOyO8GZBhBt_l0 zx6$#(_x?#gaw`8=$Kx2WC(|W@3qBs{K37+)!u?a@wEM5=bLPmTP7|BzH1$-*)T^q; z&*iUre#K96cg~{whaxBcGtd6?s%w=}Uh>|MWAF9n<g~HdSLnRfSmN2Ww02^E$Y&#I zhOW=6=dwv_Z<rCEGiSr6*@le9?05IdI4?{n-5OI^d-qC^_MgC4x0!S9EiYkUP+;(M zaSZvdD?Z=$Ps#tEN53cSzrDeF!&TRCmGevtOI=MrhyAGe8+_o-Q#%&N6)Q9+FpE74 zn<{pdi{;R#NmdLOE{31<(DSSfzB5;x<L|Z!`ped4&X_wrBs@MgW?FP`xM$kW+=m}` z@~~~5%lEVO<+Nqzo+PWfhO$;JjVfEp@O*Nl9m9;-786@5Su0f;76fG$`Aqxq>_C|G zZSJ;v*WYh;>ilQDW$XIMTzCD}rJXVOUKm|}tMl;=9%Y#oTefUTdaMlJ=_+e)@FY*k zQGkVUWqy}Yke5-gw|mdl-_NgjFAVtd%9D-Z&R&_*L6el_XGdj;J`0_kE&Il9?}Pcl z`d3UvO}9)v^iI8h{<Bl-o(i!{oE=&Cd;W||i*7Bs(KK6pQQg09RgQjFn?jWz#Xr9q zX3oKKXhw&ObMV)e6??jj%8FthZV0?~yv%;x>W6ABPZ<yF$Xxd-s%vF_*Kzh;6X&Zl z959H_j;)=#HhbN+zgAHf@83Tw$ih(27@+m|1M8mR>t&HMcUM*Wi1^=3GJ5i6txd=j z(<Mb+|C$U1@?WZX|K^|fFI2g_S@%Vludhm$*G);DsN}^7=lje5-H@#L^<eUP@&8lj z$5v*=N2FH%J@5XEEtk*YWA%y6?V7so7C$~W3r>^f|1XsDcER??FYbIh&%{t46Xmu% zxc=|MYYSx$PI^13pK-yK6=q-JlFH+xcsefiZ);mPYt^@<w|~pq?zX6Xq@}ia?@^Qc zmE9_nHP2_Rn4Gil^30mL#Q`^_tm15Ca@)Q9#g4kd{c2ucZYxKgSRN=c%hr3b#)3<A z{;#7l?^kZ{j0<y(ESx)cbK{~-cjlfpOi`|!KDBFB)4E2lvMNc28#^T?yxj3vLD{nM z*ayS1xW#M3S>#r(&8sM|tvk3%kpI#C|3#Ns;ubS7you#Cp5%2RnCJ7>&f2Noc4496 z9{zfa49^c9b4!yl|5wM$(A+l5b^i&r2F+r&$4n2uw9fNyo_t=e&Q0!-{DU8#cfFpw zYjrilp4rMBBC5+=L&By{m@Vf~wC%H6b`BGxy{)z0o2Of^tXZ~o?GL87WB+gNe!pSa zIX#94&-+>&ZU}r6b1}0hP{=Ec*1e{6>(;fbwRg8}i_eaBkAAyh>)LBk(OXONUx$gX zI*JI)+~j_vTA0K0-QN51)0b&3*d%=DclEyK)stpd=lccmv`;QRukCZ{MCbao>v{Tj zUC>yydX;9cCx_s66V;`6y-#+qF-WSOK3Oj!S#4_l{(knmXqB^(hmKeWJ}>?p%+Qc1 z(UzFerl)hVt7G2}1I-Y(lMD@uRvw!4rrmR)Q0D2qH&!1_-TC(Ly0z<jy!pDjxbr4= zE6Bd8%#>FzXv**{O;Xy_W-)tL)%I)eEoGP(Qi4u-EcknLm+}4jI?X3Rn+`S3_;X;p z{oKgVixuxY&WOK0H%W$xL8I&1wWp;&bXXeuzZ9SF&}3xTzw#VQBXdHo--$~PCf?gu z7WIcuPyH>=R?WXxOhZCLr=Q`kC_Q&Y^bOZj{{<%>UpEgi?{+<#6qs7d9^baZx_@Ws z_bo2Bm>5`(M)LM<t?`xB=3YLdMSx*~$5H;thn}eZm%H@j<7sVf$u>=$lT~;0zijGi z+H>ejUj7@)DS9P7_a^2$_^Mmx2G_V&$%sd;)qQpAy>(9J{?D<$b3FeYYjt5L_`1oe z+Q3U|;hHx*hCE)~S&Rv1RF>a3an1hBo%Y)*b|;t_%;jJIPMq0w_==I-)H7f1J$sPz z>FPVxPX15%aXv*~x83^twe(wHxc=!qYq%H=7@RqDY{K064=gWzTdo_PG3(;R$B{QA zHtqe9XBReqZ{ea%f9#8Y@xSl9@L=MkX@0fhEmofdm+Wm?#1os#{L}Q#+qt{;oX&qD zQyY8mruKe2<K(HUFKZ+^zB>Cs_)Wu}Q?HV&v#(!SGvfq%_$h5}t<~N?qIQLe`K7Oa zGtV})b^Z4*i=S_sKJEGM-dVw6kp;G2UQ9~AclEmPpTd&K+osK1dEnR0o7wB{+C9m5 zpQ^QCr)1rtElTy@rig2=>QY*yKWz$kF?W#GYHy1rZLKT!CV5QU7%nZHz5Iu+md3d| z#Xl}@)z7PT`opnWJ@)tc^)l(X=_chLKkS;d>_WDt;`B-UZ+Pz3C!YPfUpQ;^Y!AMF zho4Vh`=+Pn*p2x+{^mKy8Z(4Uxt9O?ex+>ey+5kTtZBRS*Uc^Xwf?u`>f_;|CSlV| zedfH}_4Dp!h7Srx&yBkeTrR)&yY6wSG<)*V^o1H$Pl7&OuWmlHZt0)eFN_Q}-!IKr zo&M;VzNDtX_1d3rJ;nWxY|`F7BU*CL*OzN%biCQJ<k7l)y3E^^_uH10etvLav5{9) zbbMy!vk!09TsP#gE~|5|OigTF@$9;@^fRBx#AHhmhLRt@&h;tR-P_N{F#Fm6JsTHR z&ffg9e_s99YX{~3SNOND=a&$(s9xK*?O&7RYX8_<GpCfT4-9$z*zV%RbIu#T{$FWS zES%>yXU#gz-7=r1_b$D>d2?L)_Uhe!7B$~)AGxyI>K2<mOWl=+_Rl+JcwgO`y1L1% zG(Y+L!X*otZ{D;FR$~nab!MGYIrrx|=eS$<cbC6kd*Okib4bQX{;eCU&T4ZrKlhz) zwOwcO|0j{Z<&<-hlr|kX8^loXanqfjS4|ltj4!@?_&3H~eDj+vM&GtgULBd{_3}g^ zU-<bWmOQ40hL@*K54CZ>rDAs?{@1Ge@%vj+mroTHzp_MKJUcTxB0~DgRg<4R+q%1j zk|fe{Rs~0eSZ7Xq{nGyZ_3LKYuRpDM+k0bu?cUnAljNU8-<A%YYA(T9V)8SF!9XY@ z`_s<WLs<+4W>*cjUfC@_>*p2mb$;`oaa`(7nbNat{ukZ&14ot~V|%vkK}^UjT^*0o zQYq6b2d&lZEw#-H-+ITJo0?{1WN`K9D9Oic+*mTt`0LVJzfOHv@mcNIHML`53<h_S zKlNH4|KoOcr+oF<J6HNnUo<c?D3>#enS6Y{Wu_%VkDT4%8wX?<mKb@y*t?k_L2bjw zvd{jf`{q8|-?Dz`?JIxg+rO7~Ej^g%etrMG*(#Rb%+^W8oZYg9-R_<6?+>;?%6DgP z{r`R9i(vM54=vh+Ef_ACZ2o(>yZ%qX>3g0NriR@LP-kOE7M{DgebM3kC8k%*qi;&- z#XsKvsF(A${oWrBPaPI<E#BeM9btC#EBEolWkQ@=Kdzk|q{+&l%4%BoZT`y_Sz+O3 zc6+8T{-MM0;T?B<<PC|CDc8KCQtmbJH!`**-VmN7<8*JY+L=`n$$J<2+Mf?z8UIpU z<<S+9{jPd_%8U)mUcTMG_oSa*+^;j$vhV)inPWctNUzO0HOG<<pDb0%>kh2mykwG? z=jK0)YM5;gu3B)Gx7XB0Zocf=wA_a~avriXDAbFY9e!7^c=F!qHAj{!Wpf|@y8it% zk0VjDZuM7}o<9@edO5edYVQ3T#jidnU+T7sKatNr_1o_#b?@Kvlyl|ooMmLNW%iA& zJ-g?P7sG~a=5mj6PF=s2AaU&2y%QHAtiMEYF+|*!X4Uy{>u>3Yxeu<~RgeGsr~Sa8 zJ+HWr%V%U}>r`cK*|^fLc=D4E>mRc24DHiPQ)%a@DLiv9{t&~17xy}Pt;ObA3!ODM zVD@Ck&xqw}B3nCB84|2r5;C(hGP7sQ50)&_%>4aNTq$pv>T%IK`!3z;`{{GRLsz#~ zUH#Xq@0ooHdr$ZzOrB8{ekEkR#pjTT5qC<I|FEzHM8=-Ep7nRf0fRfI4sjkYFk?>m zAF^Rv0TV-Q?Bhd|a`fDlRUV17A6}|)>fS9;h6<^uqf6J`XAHYK#ZP8)!``!srcUqY zPW6aBk`%Z(;!0JW%=PP{FJ4M8HN308eoa&B^g%-#qi06#ho4T6G86Orv|_@!7jBvJ z|2izoWD{u%zZTa0Xwko)?^_e&|7@}-_`{!iw3Ok)hq!g?_D$<;-dJ-(wYqKDv1v!x zbC(-<tA>=OCbyqIWZ)ARx3$Ln=;B*76K`MDiP!bE|Fx^>!wPQRUQ>pMJjbrj6CV2S zJ0yD8VBfNHlh2=gSYSEl{}-1;iDj#kZ*V{SC+<1n$>Ys6W$YQ>**%||f0H>S_wVXe zr@HDDTkiAEi@Nnc`S{vrYMcxmQc-IBw-0SQ`}W_jU;VS!Z`gi6V$=M!-<c1nJU{#9 zZOe>3l5z2j4#|6G)Mo5^Uw&+v)tej^h7(@8ve}<CtJ4^MyzE}>{>|;mRg;tUM;^a> zuE&4l<UPBM_MdLNFW2m1Ybc-gKQ(DxbX?H-8wbAMl=hE&?xbsfR&a^9<<085Jr<IJ zwS~u)q`s9ud)D8w{O$JZ@po38eB6HbfAq%b+y7n>`FWhf^(0H0^Rm8rzmFF;DyOrz z%i30d4bR=T@BRtPoJ9XCcRt)+$a|XEev84@^V(kLMbzvb{#mO&-7~XI&N}JZ1IfQP z#jDCCW7`t5R?pVS<-O@L|FG&Yf9Y>;)t^^u-nh5q*wXnMmD8+lRZk0jV$5Tl`Nk<Y zIXl&TN!XQF=}T`{1wrz_t;ycMKgGlp{uSKz=+LC}pSgLbgKNYN8+_8)e|BbM&g7+Y zlIFT?Y&mSe^ILn#*^|~anG3FgOFtI3X_t@b?<;)1W8S)r>(7_`3`*6Vls406R`i5L ztCLrpeC)mC(VjyltzUaG-4;G<-+Ls!ZsGp9TfM8k9bWd#?OS)nOdqdFGEC|&zF*Iu zub;mB<NGCjo4RT?F1dN)Ku_X~Gj~{iJdZbVzT7V@osjyl<*`dr)RP^8n?X&#vW?I0 z)kd>5-<!L2f7!=<q3``A4X^F<RJmyWr2g~A%CeAVufX4z`VU-i`mp76!NhltnJ)Sw zpKd!Z{abh8=eoa)DGTaneg669la}HEi&XYSVO(9t%V(SoDic|iap%NMx3*^o7rM)< z+}mVUe&wRsiu^STGqb);5uf{J@4KUMe?LD7cYb5z+q2fV_%U~v@ljphoj)~&GQCUw z@W#J?x#(G2^~P|<2YF{w<-d1|Ei0RROmEE!tzUm%JU{2`X26r1lJM@e?b>DQ_AIdY z{C)BK&n7<@7974l-?DP&&d#~(wjGo|ZpOdytAXLRtgJi_uifefn|wU>-o6k~Z2oN1 z^6vS4-|CMwzRr@?ne+2j>w{X>qce}OJ@b9k#<_U@#mka0lO3u9^QV6MT&!hZ{aG`9 zqt-;JDRo?3RucBDUs_z0%*>45JvkRKo$b#`$yTR-SH4{~u70lhVwsc@%hYebL$WjH zzkFu2OKZ{B%QXjI)Uto$c_A;Vemt=|y?(*3><%6UcE8+Hr#z)E*ozi9EiAZqW@-1c zJr{Q`&&|qPu|`jk<5Ix=5W62vcP^<+>?kee(e!Fdv^aZ#$N8~DU!sNUNedZ0-^(Jp z${ds4UQy>1x)Im+iz_gA@5%#h&P9w0y1x^*8C<-0ulxAbRV%goySTS)l(EYG#BDTl z%f5|n@#km!H9d8~q%Dz$q3@xHu5v+;-QD<!F1Lch0vD`KzR;~%=NsEPd;PstSJ!{J z#>qbIp4Qvd3fsOEmmZi_7qNcN9<S*IrWb@YtOdRbN>+c|J>RUNsx-@Eg_Vfo?&l|s zKUH(j+IpYAYE#d;u7Kr|Kkxtl5F2&v@bdTVC4O~*#~wWw=l?RlYu~b^E0dEguUtCg zShz>l-?@A5w>||And6>KPbS2CGpn8|*Y{XvQg^b2=Y%Kr*AFC0q%BBKN_}@C?Wc)z z{EmOWEAIb1$7i=K?A*P)e{t&`-#jx<#j@>}n#Hlc0CkT^&H^eY=gogoHsdKX!}P_8 zxeq(Ie(qf%KK){-Y?iUIJj1=(?`yBD`F*O-sn%o3qcwki_@(_cun_)xT(|6Y`30k0 zwQFymexWtjs&>}qwDa>sXUnX4qjAMOsOrWqe(QOL?O&LA419gx-rB|WZJm$WSs}H) zPqS9tSuw$^s!%dEbb;Sed4>;PKAkz$zx>6$NFiy@(^WejAAdXde*Fd2Uw?xkg~h=J z?YFCMF1PGfIoUhg&blBgI4Nt1i&ot)Mh|z5S*P?*-KhSu+4J%r7N###w_i$-5ZjUv z`)9HB!$9#xkD3lI);}|2i%&wz$~QYE@U3vnjQ{Ipzed(R&%U6jxGs>*>wC4+l@R%= z_c2Mw*52H_yWr|Ig;y8fxA*<=Yi->1?f1M_<!@K}y8nB8B4v|y__}@H-?8_Z-MbaF z!h2!%s_fIByeD5@6S?<WuW8M`sI_x$x!e9~zN7H|Vt#%@+1u6b?*ATlxGcK6|IN+K z>FaxE?w<a-BDLN4fQiX9m8I>HvtQNjdFWjKf8E~dX4Q++`>(y6A2)aTs>#cQ+$1v; z{O_+^u_EARqs^<onfKZPG(yTaWUHUgE!T_LF=6)VMUNHUym>Q4)@i;&XI;EQXI-_? z%$%pEv)BETz4|%w_g{y%-u7LG4l7>@GM*yqdOU3Zwxaj>zd=kfojKR{=9gc!zZgCd zT7iYE-D1DO?rdmGK){8K$;Yq!V-C2wqG(ZkVCa<aDR!5NyEZYuG@A0l{#=8`TmDs- z`nwJrn4akhU47~1>nT?!-j`gFy<dJs$n||uWlxklZfR(Wt1WT)a`B|JYpI~&^j|NY zoOryV;`+W_Wlxl~Tyus0{*zyO*)~JLKR&p%(dNZv8OM<M%e(KNQl0<(;z{FHPX5VG zzh68#A-v*^gIvfj$6xJLYQI*+K+-~^koRwpjw%nglSQB8U5~|`J?G8DQ0QHJXR)=W z<i$6Og;rXaX>N(U6A`4><GI80a!J;;X6r!lme$Nq#s)mWLG#2##pg^Aatt(L$jDjc z?YBQZYToqtIf9baQ$bz%95eCd8j*E{Zcbh;D|RZXJ$!a}$ptab%^_Nz9y_H4i&r{^ zXxry*j+in@QuyZsugFwJ29G7WH!DwO-sG2-%6@OZM^04yj*i&IY9Wi0moH56QhhWn zjbVb9>dc*-iQoVGo$pMJX1#Ufvi|$m3X6i4)`C1Zd6()h=A{$v%W1v+zV)B}+r|FH zEH8KdIyUQY`o4?TE`9zwug?70r@J#w%S>{9@MNa;?#(To3<bu2mQ38Ya>Yu;PY16` zm-n^bwGWRDcMRN=Twh=R`duc&f{a&Jp2minE?vB5dFb_N^7}t1A2!gGG!$?8ez&^f z?X|m?`GuUcz}?g~_js0uNuTy?sD7Sz*S7ZeyUeBsM^swo?A-Ia>PBGamYpk1o*(Gc zzbV+blXd0ub$`>+pFT3oxifL|?a$ptpSUhJy_ezMU2gX2V5+a2z2)0~2QS~2XwzJ+ zQ!%4t_pWVk-fXqy)O^TL@amJEUi<R(+7{JMuU}ci&Tv6ZE_L7IEH78D-z&Z}e=*+b z^@Tl5aldWIt@rGI!*02QYJBZOi_guLh@LGGJ(0!oPI6JnAKoSf+t_2EPNd?G{vYlS z&89iOT@%~Gd)B?mcjCz<`|e#n-Z#Uv^3G=N^mRLhOZTnZsi^zfF*S7K?#~%Ahutgv z&z|vJv3C83uk+GY<U0w?nLh9LlcTQxjfHPi?Ebm=d`7C>k=h#(vzDd#M48>GeN=IO zr{vC$b&H?%e41r;x8AcfH_|uOk|Bok=jGd_d!{Yh*0=3n0Q>wKOK$spi|Z?!r*e{a zhQyPnR(1)GE=~Gm6Ii@=<;JbkXYZfb`1AAUdvb4u85kIar{9XQtls&na%Z2o*b*j( z*%ecMw5>K*o%Sv8C3_&3=}CJLx7R-EmdyG`!<QT{oOtzCpRA!U?~|9xIhp%Q75MM| zX0D8Kf6dZ&uUvuq?{nt~a#}hkpB0%nDftyz#B?osvo`kT+kg8$8y7vAeEGe8eVOfU z*5e#}?#=6$p1!wrdm$@Bp?7ei=QbCueUf!ehc7-TGP%>%m$p0AfM+|T8K2B>;6uH3 zyoFoF=dYG3;tV~!It&LK{23V9eyOqeZIHDPy?QkB=El^itSTp;PLN@)Wn_3Dv2MNg z0RtX}Gc4N}E?l~_X6@B)&Tcw+y9Dc)m{+XPd-nfx#_Wm-c88{Y`(3HPZylvB(R<DD z*IcU<#ZQtyna<gK{n6zF?xe53b^g}>kH_WD&$TwM{+6SxtZZ(+ePi<RZ|6U+i~D@) z(1FUmcG>c^vy?sFFVdKKAm_xDkLS1E)XU2>GT!KWvcvCu-3yzPir>t$XGwo4>EZd} zqv7Q?=}zXq^V{z)5B~pQ<F?}r48Ers5>^~8D1Ux&uI&f;oj*07ulxJ$S9i2&<)00| z>%+sQm*~nZG2gKC?^ONuJAaiI%s+R_eW|?5PPT99Uh~VINY8%t<sIklEQ6A_-YSy< z7rV*Y)kJuEpFVLS<ID`hzdzsXy}h-6-!#_=`x4UMPMRrw|H_>c_okj)!k{qKbKN~V zliWX#B!!#*?c29~-NLTgDT`8l&+;-HFz^Yv(|a>GJV7EY-E_^ST|0KHDJ?XSR87|Y z#pA5~?Y-fb{pF(aNf}ZM8Aoj;qb4uUO-h+MMNISlIks!h<}e&!U}msr+rGtQV{{RB zP)R9|X=P1k$ei#QYzMZ~2Q88R;(Xoi)kBvleK)pbPTrLKV%eKFa|G=cFK(9RDcrCA zU)Qd7pZkSXAFq9L^W6Be>$V}!?;o>SlhrIcXD?B0-O8}x<8fDuwm^};-<EH_ciZIo zhj}0N)$;l`C(GDbxVPBe*jfJhPx><{DJc!}dG8i#yn1-JeY$>pS!t<l-Jc&@v#+x- zHE!H!$RNP7aOqM}DXFNas8_FFXXoXelM4zDFaP!BCFqiwurMo2%ZC;6|6Hw-mYmmK zzpvuYq5i3&p*DA>{5`jKwbT+z->Agv`SYu4-@dZz6?>_her}GZpP$?g`3B~Y+}yVt z52wep|0??@;BDM~=g*WA?9;PfYa15}zmi(@rL^~a%+0rt%?{o<a?U4VcK8&z$pT5) zmOYD7Hg;~mRQ#yxbc<!B=Q`(F*<4$O11Ao|DCO=f`(5Ch8(CMF)@N|?-Zfpbk6~VJ zC7UCTT)tprW}?6LM1R-*z#zRRMJ5aiY7f&QQ}<0<woc9e^}oZfRi8S^sQdJ;wN&}; zccrpxlB9H`h4l}Yqp|f<1Y={v=S>nk{PfeR?9)lY`JvaRz0Q!HArX1WL{zSnk>QN* zo03u<<s?13Qypd(#AirEy4vlSGkN+Q6|q9gJ$nwBa0mbHnPYLZV%L{-UD30AbSjnI zew4h_Xh}^=`}VFnUoGv9m&e}4oMsYkUruFax<#FA@u|P2X<~EZ(4j@)=Q_V^Jv-Zc z^?m(T#+_^t=3={Jx2L{4lfHNP?)sHG3co4M&;K9s?WVN)IoZy{?K*XpXV#wX*E%gN zwpPM6Z`0@B`m%4%oD^Rxk(-;pC;9Tzb^9iqlfH2Jg_^p0{=GexDk@K&PLD4uEbQ#* zv8nu&l9sk?=gvwmuT%Z@|8^uD?YeN`f^PISj#j7Q;?G~ceEELA{{MkS<{G>IXU*@6 zaJ3#hcu>Y~{`$mwds9m;CT(XHiINQ0+_l|E@36tvucC{VRRuTl-Zo#~F}IPK;pozx z?dR)$U%X|@yGSZF_pn+0mhM^7t5$ilxJ{d7W5?jJRH#WovTd2<EaxIkuVV}kB>V!6 zcn&ihzH!^a(ZHlvn8o!ZN7E6*7`4fptOYC_FNU~=3idrb<|fv~f6?Tq;!d8!8`2LO z$Q&=6>7zBxWaHmokEW@0x~y59>;W<-vn?$n%5a|EUi*yHJ8>7gV}ECCyv@k9wr91_ zF7v44cf97WUz?bluX6v;RfTlDFQ@#pSL@_Y$hWC{U{`(p=3S+a`=9<-pRx0Twe{L9 zm)9?_X8YnGS6=>os&=@S$|QgLzh9s`!uuXSeE5(dAu9`Xw5GlNeqL!a3v289yUY0* z?o~dYd*FbBu&}V*{Qbqx&;9uEqxSc=ug-JsN}Om06+d+ii8C7Kbxz%x+%9R*DE#LC zjolV~uU|@R{h!sh9@MRva`qEr!{LXIEc^sis{NW2Je!Ub&N=*Wl8SrX>;s&Wo;;8^ zr?}IijhVr-h@&ZGe%}F3<Hp|3jiIyKZxkm<9Lr1G|5Vwt@6W23d2Q3y^(p?|W6?L6 z<))h4lK)>%Imlf(+__>_<CGWWyOrakr(eIL)5~{W%J`z^zQUu@!hG-c9lm~X#oD~L zvt^!T?tFIm<(u5_eC^8l{O!&@b6@X!x%_#J+ik{%om2m5zxTQK<#O@8ePs*|0z2kT zc9;>mFnz(vclL@0o}TqjtNC-5DYn*^VS}tv#Mgf!3=gs<=<l`sxOBVP$z%z`bBTY$ zKa1%}Up*;qRIvM-=cFswubUefFfhpVKY#QnC_bK_fsKuAd;a~n{dIqz&#%9C<w{6w ztncNLii#aem#S7T*tTuk`t|uGB_;ol-2Az&_Dg1;!m74qnzP(&-+6rhx*>bN->fJP zS*NA)E=zf4xa?Oq{&d{0sEhM_*RIK?RZYsfj~<D+e(d0ngLh?Ynb+=;5@hI^_h3iC zO$~K%V}=8TXHFi~F<mIYuw{$swSW2#9`3z!<;bG+c$v44Qh)kfSix-H{%@!8m8-Xd zn%(z(x#kjUd-i5`&7GPxj0u0kKSv$86dS$%wPeQHp9Q;)bIi6p|MLg?ju}xe_U<Ta z+T7kcd9|eUVeR)md290RK8H{Fv%dSB#D%4`mX#ZGPfycj=a>8Q?RNh5oSRAM>BsX@ zB$h3Ca^Fy7*REZE?>zW%1$+Wu$12U$Ivw78$<J?iEJ;djZ{|t3tMT^qi)BeKcdl#{ zGc6Te@uhji6vhcJzSnH&`(HBscjC;z#F>lLtu|^tla@b!<L_BszV-``vaf`6GAO+A z3+s-M5}n7&P}bM9=+7**i7X6uH;l~ftk!#8F-lu>`DSzA=6PT9R%EA1sOj(i^l9Y| zv5jxut?g-<v1k4Na=TAqZPzuT)6KhASVuAl$j(d6O`jq%J3jK>gjoS5WtT44m)%*l zJ~wT@#*Ck9wl8$Bw%wT$w&481yXCunb+N@{&R?X_wMb<9hSu%T+w*qr-kmHlZR*si z^X8p1;OTojS>4~R_Scr0?Ng>qc|QMrf?nMGsu=K5n=Ym^rK0s`?ELljs=cqw=7!S` zHLYb*5?%*of}*}{{vO#%zNvKrqDx+N)~(km%g$RG9~U%#a-iSI40rM1{P^9Q9_^ac zBo$lh+qFpgRaCZpU2yx+mUQNZ?&+$t`&xFaTnt+aP;7Bzje~rx^V;+#x7xq^_dj0L za`3rue2lfCMd9J<*=gH5mNGnel{$0gty>H1^G;o8nPKy7+df5m<E1PNHtx3~ZcE2n z{9|Bf>)%*kp)bxbFVZSVZK>E=3E4X3uP5>a?^Xmduh=qw(xjpX2O7J&y5#GAIBMmt z?VDp+tfr@@XJAlpyic~VvGL-?i`TAQ6W5PBbNck{oyF;Xe&=rI@0XR5+Ew}a+1c6V z)fE*Qs-Mh2#{s$vut?g>i@G)aqOa(Uqmtfhv{#=Bc*!2<yK45DFV~W``>ji}lzjT; z?eD~y$?CkahUXqG4s~a6IPb7}ThtM|l$=G$DU0ULj^tx_cQ{u_{t08l*1dtDu7`gn z^FK*HT@hk*xq5c<=9A&Or>oeV*k5UQ^6YIb)rB3kSFWDc`cb1)UA<zqW%YvR9=GRj zi&>cI=H8#4m^@=<5Elbva?t6c)q{7E0;gYCSz7-6dOhB~PiCTrN={2+Vj_#90ng*d zk2hC*Op@zQPe>4uknj*-VVIyYbHaoPbLQ|c$k+cd>|cK7(VQB|yQQzM*-A@vgxNTP zy}O|&Z?4HygHs&)D%h6(=+Fwj*j2Y)<WuD2v|XF_nlK26PW$=Go$>mAKLK-ZMv!0E zE&J*fbDy)X@O!KC9A8c*dCPN(j{`do2M9OroVP6OH3N%!xUsHX`ODRHJcm<Yvq;Ph zv-?Zq%3AM-q%$zADV?dCEG)~{zN6gQIeL0}ZoWvNF)za&*!<DQt)@LJR<mmK7$i8i ztbM~%{fQ}bKj`El6B84TrVCfDq(m<_F){I&l%k$CYxeBT;x9Kz-!z$Z_~8#Q&@ewe zJ$mo6smGQ@fv(^X4GavOGIREXnX?t*JyzfT)OG3Tf1T8;o<ChB-)y!oUA%}bP`A1{ z_7b<G!>uXbZaV#YE$@HooUe1F-J(Y!dKcf{J({=t?B|M)y`9NwR*|=)m=654j{Ipk zHQetwW5fFY6Q<vvmy)$`|C_BJW%v?v^HUxttVv(t8n|Wa-oOJ)>n}apHRT7>tVQKA zF&}@qU$%@9GRV2;z4&_W%-!GW8Qbf5^-rv2V#uyu+<Lk;_z^ebgDZ`{9akUU|LfkA zo!#yATmQ*0V43mI$jaf|Ib}=jfA0L;880nQZ3~FFdw4o0^M-7BM}Z}`S7o1WY0VVR zd!xNt=f%U7dUtIuC}qC8q<A!S=T25l_j9@RuiU~mN0hwz)7SB$`_0|U)64JoSah<n z@alBM{!aQU{XJ=Y?vFRlA-^0$=4a{hPMAB_I5mhN)O5>pO}p;Zj;EH0I6g2r8z92V zp!RInQ`N5w2ObLXoV{Rj_@R()lH_i6Ut@*?m!E7<tuHf=wLQD4>)Im0w!~x0tVEZ7 z{j~hTl}Bdgo=?h4zf>?Ny#F0;qucI%AtYNuqHW{EFTZ}DubWw+ZBlV!!aTj7h8C)- zsxM!>IN{E4a^+Jisb<M218>b;+Y_!meq+5awd;QIw`;b)YCoQi{~!JDO?#D9?C-Rx zi&pB_)ns1&-EOt{<BOed`L?}#>~<z?|D~LX9p_{I9lda%<k^y^ww*D2x-+iMzwy80 z#bRgOl~47nLRY@{o~Ib^cS&h+rkmE%8(*XtZs^D}ED`cjTbwy7@$}m_^WHdr(wTqP zcivNGhQkJ3k#-CkX+Ie*1gK9-|C#HjJ@t<?+hK#$qouVUKeu@Owte#8K|+51`=?J! zzrTx3J>I0?aXsYvG}oi7>dV}`QrFHuW8%9!^{CsC7%#v6MJulLyL2rR3VP>uBt~m} z()tZmZ`=#p+si$RZq@3wtDpbG=+Jzcd(LOKu)HL{e~a_x2sjEX`5f{nTD?*+{=m%T zM)g%Z37^*e-CO<r9vAPmt5*d(T~6_NEd?DspsITEJsTU_Jj>#=KR-Usn>SCs_RGZ` zg^zEE{}5yeG<|7VsQ6Ibz0&`*zE^)uLFLm)y)t~??;T#v+iRM}blY7raOKR4=g-!1 zGn|XLx%TMgZQBdEdu=XjR9(7MAuD%Jm0!qdnSaEkw54&pdgtrE{Hfj;E}L^_SCtcs z<Aig;b&Kj>TzD9&ef?IJ&g+vIvP*2s6#8d(e}A#juKZm|Wr#f!LuY5_>1n#m4F3N9 zpkO*N*?_0`=d;FC?(4I;)-XP}vUD#0WM}u^EGN8Q&eN;A|0d2kaMP<@pI*(n^n6-< zXX1>#TVHSAzwcj*e)w&9KY`fadm|%*b5h^ksQVqjK0kY5`|fW_f-H`^JbrfmyR_8% zQ|nRt+W+m0rd!*Y%LH7FcCBpV`1xkD|6lb!O&y&#PXf1X+cs_5v|6bduYUi0KEM3U z4Mqm<>3X$~d(HRk-TSkqZg!JQlY-XLbql?;CU1zeW3aeUB{DUI(IL0iH76*eGBvS# zNu<`~4%M@wQ(Kvoy}!k8nYPT#|FP%(@>}xfu3vds6C$F@e4t=Y^ZHe$l{H<9R4$3> zxi98kFYG9=M0?8o7n4<XKHSVdokjQ6-O~ltv9r7Le*gTiE=m97-gdo{Z>=VJY)L-e zx72%j-rZfIrEe5YI2?SK;h~aLd35fgB{A#Ll7sIqG`@ds)}N;PCoE(1-aoH>&EVkd z>}~g8(z2K8J$GJy_@JlAA;g?9vBPvnt~%>>k6D~eE|GRk3bkILR*%|w3QwH#t^WJi zQ}l+b<lU_kkJaYRXg@md^7?t56~Em7Y`T7IyL=a@z4~SD_kB0E{@`S{+BIYC&w^jq zY`vfB$=y4AYU87t_$g1zon2jB^YTCk5C%@`S77Fd4?ceCkfxd<3xi6~$HPku+^x@d ztxB5o#Nt+E)~6q=u9Bs^p$rL$S@AJyYgTA6HGG-V?*HQU%MTycZ89i6Ayj4%V;?;u z<!+!if0KfTeo&ojykDyK?@Z65>fi4F{;>L||2^Kr8(L4-c5`RlI&*Zt@SInsr>>QC zd=&1B-JAF7s_{pb#`=w~D{GzqJ+yszms?cyQ#Iey?;MMM<+;r{bH;bYI?cTTf7qv= zj^6fxIX1VM)i`Yat}VuzZ{rrPxOTjD(c-!6t|v>j@_v{58PmT0{KJflk6RcWCLf<~ zTzYiA`gW-o+-H2>@O<$}nX=_@`o@g~S@jkSGB$sESFGe?sI%ST*uH-MpPOI%Z*wpx z+b(Z$kC%96G3fy3&zY%HbZmY-GWoAA+91H<SmoC$R4W#J>wns9eyyup{e%7IH=i^( zqx4_is>Z`EbhERR&8P43PDa6A`SG<WSqsg}HU*mt)oxS%Kes>r?~BLW8Jzqqj#qAP z`PjX@H-EOO^b5`~*4(^|H4i`j$noZJoN!vK?t;du$3>N0XN}*TOK!95o8lF1Qdv{x z9a9vMl(pp1%{?*4t9Sn_ulUj3ZI>k<)Gp1K@Iqkz5BG=L-_4t6R%iITRoC}&c;4Ss ztqp}63g4gWb{AlIX%c#dqdM-^^#>C#Kd+t@^}@A1UG=CKL&G+`{7XLJjWgF7tX6sx z#pP?v=2jD5fBerKFE2O$IS+$k0*c?}G}$Pdn_Zo0cD`BR!-m(IU7}T!j@)g(4Qd41 z2y!zl6RX<yukYi<Lrr(IoRf3!bN20&OnrG$_073!-`pmr@4On)*~4<{lW~H?GrK#t zuGf3`PJQv{W5miSS%RmHg1v6G&xtvEPPX&qtJkirH7t$-pz*2i`@Q26C6+B-d%w<q zl7eUJPs_tH?zbX$YrQ)Vx8(PZ!`A%AKd>6dTNgi_?rqM0X7)cW1{urkv9s5k=l}95 z>9lWBsPzr4`f~eq+4X(h)1SIW&)3vjp{cjx=d<sr3<=LQe&pT%bRt^v`2UVMR@ZCq zx0<SS`qv*TzU+T~?O%<AXHM%+eLD6v{#<?iX_;?4+|zrbcHA*HUD$D0)&ABmpV^bw z|BXMuz5X{dgX4o@asK<?ZU=csJ2P-ZJlOg4`SUq3XK&ix|54Glet+_nxjxFmb0xX= zK1sjv;jWW&^4l*@COysmWB;RQ-lLP@YiIw`Soh({zv{X58&@dHJ5FFca_ZEog)5zI z29`KXK5l+NSmU36+?)57^V-rbG?gx{WxBE3SdC40&QGbEM-AutPnaldUZRop-CbY_ z^Qwr8(_gz~#&@5;Tl!||&&B&iO}8*KEOBLHkgwnT;MUHTSEt+<ZtVIO<8kWw`F$3@ zp8Tukp5A-PNAu^;)7cCOIg4!bPo8*h7W3uX*61Hi@4Job85>$=>}k5=b@a3PQLz|H zS@A8m_!%_1?tOp!cKZE!N9;=e^q+9mKDJ@IxSn)sZvL0k+g>wFm>08X?c&7e8VT}N zU$QIW%2*jbm{{i5*f`fc+c>#>R^*G?jqh@v-<Jn9{!$VYJ&g<uHmq6XV8>oO;ef%J zBR9JC>h8Z7eW~c(@80|OcRzQTaL`$8^46D?Vx2BEb?g7GTpzP4`r`E0L7DfHm+1N$ z=S<^gP@F!=kVo3^+`>IeO5Yw<o2a5`c0aj=m*GT8NnjoCZd=oh5z+1J4F4{-Ykqsx z662NkS;R<kX~p!QjQh*~zx?xY_A8w;zqV&BwYcJVM<??4{)W=%XTSXAm!*GrFUoQG z*{=G(AAhQ!ssG{6vtmNO!ifW4u34|Y-@O|=16db%Y|(SEh2EP5mfYT!cXwCnX|ahO zEDYuE?|uFBY1N8=qxy2Y(-~BLeeloxANR&|<G)_3%vZwSu3Wn)Fym#BMav^Mp2IB5 zc7592%loKn(zon++tY5`+GSI`dU;8T(3Abo)jb#e<x^=l*!<_a$|t$nTIYW=JH9)w zUt073=hDya@)~kQ75*)3>x1WCDZLc3@n3KC#_MJ^-xPlpxC^8tY}~y0ai*j1++Tm> zLX|p0WPW})bj(+JiY!MHPr~bKYj5u;T)b_Y8AFe}{k^kiedj)V&)efN|LV+3bxtMo zLX@Ka?b=_%ec0gQ!$?MMo142O+IS_?s=nrc?)&r;_#emJ`dEVD4zH)YX&p!Or~ls- znUp)OeP6ZH^U;HxLzka09Oz+<v#PTB=D=`(bIx7eSAN&tIOKCnGcy>NT$6kFyg}H4 z!D9F9?AKYFj@JEW5I@SjvB$UcPR+bev1VFNlsOi${o7Yyw%z8>kE3sYx=M=p+Wuu& zGI!Rlt`j%9)z|0zPx~#Nbvd~~!Rz4j&*u5}boTEqeI2ICcKJ11gzb-&vA?H2<(1!G z_U3f_yzerZ+GljGU%dS1Q}gEdwf4JzKUodR6VHyS#Md8>-xhb?N0YavaLe4q3BPL2 zZ&~u_2>VZlgoHEo4@>_$?{EA6ulB^g&+B8Yeg^1F6MGVN)a}`sc%z_%WxpTY;%xuk za@_4%*tBc^Yx8T<yiVS9zUbSl%iZKA%C-8KU)i>8#<N6U%$*!qmK49_e8%qJ#P`Qt zpFVpY(iY=0>-(RM$i{nu=9f=(zwWzR^ZVV}FK4C%)hhp6<M4iU`Xj~%GZ##Zijw;7 zY%Kr%R-n6GlftWmSFSwy)4Ew{V#as<>ThpuW+i5Q{*pYUk&%r#RHi35V2X9>t0(X4 zZasMUbmf}}0T<Z~uC)viyGmACP5sQs@H!=U$Et}ZQ~YOaU4Qhs)y`SlJC@GWT>9pS z&!i)=v1b_-)c5x6bqa5G_fi#!ZkX<+DRbO_=P;*_)<T8@9t(1xrvwE?&7U9aImx0e z5xQ*d*u1l6y!J2Jvd>lLaRF!9DZ7&gMg2J#s@P`T+BM6y@~TSbWfNzC9U)$YJ6cw@ z#s$Xl{<dxSBYD#@TlU}cjJXr{zq{IRS114Vl?Hbk@0EHTkM^dfraoEgwtusg`aidv zPf0OwwwHL7_3O(^^Za{0K0aSQd<ZDh*_)a0T<_*h%T?QY^42GF|J)v+7=JTh(fYK2 zMg2CCr=CyXTPV*{TKeV1#njW&JeLNUu3o{nMDFjmUAEcv4i2(EIY74{D*R2jv!n3x zGT-3MI`V8W{dLv0@owR!3;RH|5R2o4e~Ibo-_IDIx2fIVn3fR!<>{4`Tl%?Rdfn6} z*M2>^eSXcK$eNm_P024)UtKG+xv=|Np!>d4PPV_Y*uK6{_HT>YI1%KQugd<ir5?w% zo_$-xy7;^7jm2iRHd#Rzr%UfxTFV(5u3_E9^|SWX^ZE7XPM!=b69KzVLq7V1ymgY= z`m$Ye$61eCFxfo#Hd8B`+kLC%+ts-fix{SUlWbczQLUi&bD-jW|BEKJNk=+-XPcF- z=j0Fla<$V#<<hllal1-hUR>-xRhE0vqJW2DF9m)b43PHs5Xp2~Wwx}oboGnVyi+di zYgwngsBizzlRhCQ-e+6%9Y1<><<q5R9^rHC>*W~kRXpZRWe0`Wm+fY)f4*6-2+oZE z+dV}q`c^vkPn*eyZYLhh+Qu_mD?#Gfxw+PchK93d&3b&i|NEy;TKf9?Ykz;+ka&2{ zo;_XN-TC+T*%m!HF=^7I6)RSpoUH!)*Dp0y)!3ayN3UKjeRpSP&RMs>cG22}0W&5| z0v(k1uPV~xy@9#8xuKz_hr|u}`yTU?>{+hluQ0phyke34g;Gu3kmgJKZiRh$8nStd z{=(N@51&*^KTk<pzCdTc{+qkIzdt)W`~BYU_f`ZhE(3KHmiy0-+nN;`6ePqTV_5{6 zLb$gf(K#bS!}s#PfB&S-^ZtB3Z_mraGfg+T?8AeD%jd;wh_JD;-n@PL^~;xEe|9@o z`3D6B1q1|SX1;WnuU+ycLSU-0P-ofOTU$$B2K}7>ONKA~)D+F=Z8?HmtzNvmjuYlp zWhw5rHPv{#y52S3&(-U9j^h0*o+ZjpCOIesB&od8H88kv@L=NWYinir)NO6=-n=Qv zP*YQLZEf`Snx91s8#ZtL{h*ouUd?A;hJxZ^Y16DL^Xva{GH8dbnc%hbZS?k=U3IRm zu0B3z9v*J*m$hbNFf%i|y)F0k^XY9R{-vc~-|zoFZ^jG`hW!11zg=4!{j+A@re>!Q zkD#DSTQV=7I(=Gx`{8qQt*@_%G<H~B<&p0w`j>H4yXS)gx^MZHL{xX^zOCQ<wtfD- z|A!l9c|D5yE8pC*ZuOycb$cIoU(Jqt`9EDgBy3&G&pXBE-`?L}e``yocKEs!;o2sJ zC)N{GH2>?R-q?`XwSDoTMOHTI))N8?z3b}!ZAv};OQB|o|BRV4-`?5z`RVj{H%+@m z9%_@<MsI)je13i1r@Z{VU$5ow|6BI@nr_Hq#|exsYLov?{_U%7dH2lUf*$1qOnLK9 zZrt~-!t}?U?c2lOv)wFb3tYtS73&rrccP!C(|y0nuY+%HZa#hbw6l|w-y93W{Cj&Q zO%if;K79P`ni~`E@3W47_u}GWc78b@UtinucXvRCjwIaJkQlx`?(N+Z6ZbXWdNP6U z?aj^4S4P@tTUu70nxa`)SjfD3NxMSxv^^8_ADnqzxqBDi@kX&|_8<E44om+s3M8$6 z{U0=#{e3@ZTIIC<{yFyb|K?a0H#Ilk>=khh6uJ5^ch<6}$4_nF?mlTrI|v-#Rr-40 z|9`)GrOm}eMSuSM`Ss>&2Z1H|oUMnp->dR2?4CC5TK4+AX^DxAi8H27o!Zyu=jC+@ z6sHp>GBTVzd9wQ3o5bD!1Xuzi_XeHF&p$Br+tvR`clb6g{ad~9`jKDeua>N={qDl! z9Pa(-$2ZTHH$Q5ee(!Idcjw24!~Eyx+y6hvE}wIE*VPLbK3tElKYQ||W#OYEe}8|k z|MT(qq)C&U+xeC*TP9~;XJcme?bg<8^Za`${k`4Y)+H}4Og?}9`Df4t87o6ptzLcm z`+7FV3Hyxl@7WyP9lYFcZ{cG%C#OTdzP`5q@t|4NdzwzvmJ?^r<h;1B@Kf!*s@J+D zxq3}2HobW>NAcU?y1Qap3D3T|+J?73UZ6iu{=xp5qulFHrEH3`uh*Ay5r16f@sNMt zJ^i=a#XjwKZLLwA;GvS4nc3Uho0pgOCSlIAXK8xVy#qxK8<_ZR-fqaVSffkDvutr& zTU&_M(ZU$D$(b1$8uJ8nXS6E3a@P>Kb^G?|_qT4`u&Mb`@bAyhi4!Mw?e?8%v~<A& z1!LpjeW}mS&0Vp=-eO^QVQ9?!XQgjVJ&KpyDqIzF%Y7%egFMd@$Hk>r_`SXey8MmV zS(JKij^(G_yUX9p873WhadGkdst1!)y>G?L>gN&CxEP-5HFN!nN6eLMnXmn%_gZJq zpF44X<?&BHj%ZAIs?5=}VhuaLoW?y_)2xuHs;YE8o4P+0_gz{PJjzRw-RklKKSuu6 zxR`%cJN7rIe;|;;;OXZVwkJC)>(<Yv7*|(Ud63%aUrXKV(pThMxAXe)f3Z4jxIE(4 zlCPSYntFQwSF-xeG<tekfB&B1=jXQHue<#$f|<G5uAkp=f_hMr;(pt!I&T+md)!yL z@+^1h6MnW8?(&XT&R<;YE_!`W^xmqk`TPGqd;WZRg`r+s;@7WVv#+hOEPB#Wvv~FD z*Nffzf0>54m@bg3y}EEp-=A{<E7#SATznt#-1|4Exy)hYP+3u-aqsWre*1N?ySL@v zw^LVF|LJD7G<)-&V_PyW|5A5ial940(y6XmEA*DT>#5}xhwgW;m|(wRL6=?A3i*j1 zOV+MkyQ5X1WBa|T*MGm?-(U4LtEQ&L*|~Z4?Au2=h40sXzx(1v#?QRz`tkE@tIPHu z@79oC^+J2@DX~wtgIh1zor;~e?(obt8E*d)nuTgv0=;*az0KNeq{omTk(QbH^2LjY z;NZzqr>Y8dipZCim-lyf2mdnv)Dg76CBE}lB`6l&t*M=|yJXrQeUI2nlA@p36{oyV z?ueRnGQ~Lk91kbw%Rh=cckV1JE2|X~Ty!a5(R!VaA34vT;g%6-{qt=~#4UH*UvpL8 z-}2A>Az1nZ6zS}fRCaIqa`oI?YtY!sUr)8kYipivZSXw5GR?g%U1MXmyr|~xoa^gi zGoF5S<OuyD=+YY+5~35k>&wZ~+D3;D&*#@Ky7tGBFZ9dr$eNl%OFDzMEM3f=(RJVL z|MYKx?=G1d&Fne+aDjQQfK#Vk(~7-jm(4_VBR4(ixBvIx^UuFBLW{Bj7TwQJF}itb z`t=x#;?pfN3>&OISueKV4c6}I={axSycLecVEsI7Ml;uJ*kE8}H0kV*ei_S04<9~! z@Sq{6rlnQr?>|BL`48Tkd-hA-{_JGem&`r=H=kshm%xsFit$Pl=UNr$e{`%{f8=H^ zXr<Lo@9P^rOZLfF3W<m;c@r_Au2ra(MKUD7uDyigZ^9STZ4>IhzSmIBG3qO<sxY%< zUOU%4-mcu@*PV$HWv4$Fe!I=Tr{JT@n?B#^)iOE$U!61MpX$XbOg_10?OJbdZ(Cbi zVWE)J!sI3O3tZ$K**dku*Rim$6j;bGBuG4acXzjQJD=-iaRD)}FTX=-Y7VVwNVn*< zvyy3#vwV2Hy7^W1?Co_Geua;JWFD@w-u!Cof&0pN%f6o4{KX}H`nQW$=IU8geoD#A z)MQXmQ@gjfI{fBC1&$_#z3aDayLRi=ti5laKHXaOHfqXKWsmsDCsVZJDohX5@7z~W zm!JAm%#7{xJo&=6IW@E23YuU3v`JfxrB}uC&h6`Y_dYA%c)Luj>hnDL#N7NN_nsDX zToj%gw#TsW&69<1#H86DA6?&b_1e?3aZikE_pyIz+b4ITS?I6ck7u*<pKQOrE_U@1 zj|p|klTXgu#p)<fx~bx0(za#Hpi$f1<?qAtY&aHud-Pa%jjl}o{FOov7;W>fPb@Cm z&d_jZ&#G_ysmrHZR!8iph+Ov<+lYq1jF<0hx9{4t=HH8Z9aG=?)ct(xS;ZE0ey>T| z<388-b#~Stj$XX{y!u<%9EJsl3onSD=l>AD?@?=bwfR|x&bsuwd#kUXJ*#VOF3zB& zq;x~~6d%{i;=sT_M@L7eg#rvNN*AZ;MsLfzyXwsX0hX7}DxP`w_RQS-_T|f$&z~>9 zQz78e`_)x3{@j5Meg>;uv);<DTAMe?YsHcqP1?&J-_R9tegFGoS#IfTqZ{jM4Rno{ znpm&((OT;Fx70r4>yKTtmfhcWpQWMwdvW-=`<s(LPrcW>t>5c+2J8ECpT2#wtNNl* zef#`*eMQBEixxTUR8;(X;Qaagx3{)_`}U1t!P>RF486U*r}(%WC+yprcXwB>v^mp( zZMnCn$Z|KW(5-ae*C2dB{P}rLeRhW53)ODEOwE-u+I*o}B%Xu8NOI|pxr?IK@B1K= zdHIe?<?qWglQ#CKd|Y8Ylffa_gyG2D^Q;Y%nr7|mh-`oC(7l%V&-CwM*X>rlC=dI6 zGiyb5@q~askLo@@JDYJzu4#p>-TeI}FM}9nSQIYWl<X*AdS!WQ&CV}R9-aEs_B>AN za@uaO`L7?PRwl)(R8Lpn{OSC}e)~?Tl(4Lq=i}pU@BaJj-TG$x*lMSJ{J!7cF1@ig z`j&gAU6W1g{Q2{jr)O*5+g18{iZoA?!r$a~cXrO3H}3_1HOtG=+A9<9#}!XbdENf} zn7{P4f}QIheY<|m-+qU+&Cf)}-Tlp*IsGRyGZ>3iynOMoK!&;D#fLYXjCxgUYjf>o z^cWc|8c+Y<zy533b-S#)juV#O-j;iNj%D$^y5G59qCr`+@bNKLHa0D5E|x%TF5^$n zAJ4J#`S^6*eD8|2iSL)+W>!C6)VpgkD?^`N8vpyJaW;ad-w8<1jE;=@|9$V*nVPEU z{I2Gv+jKajLN(U>O1=G6@tm4^-v08}UPgV%ht_murwfPeu@q#8tE|3s^YF!$oUXO9 zHhqOG5eMEHTVA^^yW2KfzL)L2k%@n;z^WB13=9o-*8KeR=H}+9vfNEyv=;_cDF2wY zX>mZ`qeV*G-rlM13t61ot$y{&UthkulrJWuuWtL-Up;^HB%fveyu46!=E|kN>v#SA z5V!7;vr6ae$d}<$u5Ir~mC<ty=3xL$#7*1Q)^_aH%acbZiAnY)tF%w>(wKCF(Lrme zRn4M(7bZvk)<}PAH01@q-?L}WIy*aG9O6ltFyUlMxw2CD`nt164%|C@bN=b4n$}87 z{--=SvXp!AHOOl47ujdbtbD$>DqRFEa5||zf5HAft1G*^@0K+$6DxoCDR62kZ`{6Z zlhb!Tw2&({xBeV>^5EU_U-ryB%xSQ-05kGl-!s|;b3pXAoS%O_pPwqr+Vq8erq45@ zGj~rOyMDZuX?k<epMxEXRxX<KCOfgcZ@$fw_x5o&AFh~S)@e8UQU0ABg`c0DeNpbx zJ|+6Z`w6|x6R&IRzL4E7_3Fr}zNOi_0&lrnW=~(}QZLZe??1z$@KgEyocO)ZL_t$Z zwR$>V&Y4I5lX!bso%#I)Mwcrg^XF8*J++nl6rW4$hR(Xm%1R%fGhbg{umATmz3lhD zzrRgQOr}W9I<;}rrd!{CJF1F(x*9s&3l@r6pY&yT6KeMA+y!^Egt8tuUYR}l@rI+D z?H#t(urTP||Mj=%L*|!->c`c7&6_u`v$OM5pX=4LvrM($lr51oobSG1{``AK3`!!s zXY7^M*ZFfSc=qdnbGK48F3Q{7s(+}l@b#(<tK;i`vueFne&wYhvhTy6TbYlWr^s?F z68h9_)Uzh_eqDPQOTKFUUBOP5j~_qoE_-WL_s4=^j#X*alM@sFinUFhdbMGPoP&yx zt#Nr_R?Jd4TfV~=Jif<WxN5`lbWLoV(BFd(IK%l2d194)9hTO*#Qxn^ULWH!bLD}k zn~h&AXD!qORq<NZ0-@h8|0`detu<A)byY^a;kp2gKTjt6%h^^<nQ-Cq*4`^ucWxGs ztN!XMds5}9&fDy)!r8M`PW3%{xodjef;n4H2P|6u&8qmR0LUk=zVH1l?|NPGMd_>U z9-cc53{5xf+$m_lbG&e-kJn|9>8EGg*QUlFzv=uvX}zmU{2Y^aHv{8>r^<G(y8Y!a z_lxcG?mRx0&DHAE=+Mw6V%wKB?OVFem#W8)B?A*@#;>)%{!Fobp_=kB%Q?S3*Zp3+ zL+Z(wpK^=UEv{ZSll`f?Xvv0c@=kBdt}WDhZ`!n?>74$lvq!(4N%(l|J70Bm-?|km zUTo(ObXhuM_Klxa{@wnZ<<hUL>wleMH4ZyJW6PSAI~{Kp+TOh(Xxz(lW{T|5$tO}S zt=RG4*Rff8vZ2A@bx-bm+Z_Jg=2Qn)zmxdIZ}QgG)>EF^GtNK1zw-B|b$_L`P8uh9 zh1O-p*-!tVptSpNd(7Uo&-CB!5YK)UQ_h{;T)j|o-r}78I~CF0_qX5YGUAEV?R<P& zeQEmf^2OUaglbtbuU>WCX~<*#<X1<L?VR?C_jfn%msfHT5Iu7F0W(9NFhj%R9enZi zOP(KCF)?|E*MGJgfva(QYdLmBc&*Q0Q(1S<dY<0ntk+t$u@@tJzN$|?8MZdcH2c~b z(DCE<_UzoaG4Q6K?a4#w&!3Aexz)dF)lnshwy-h_hW|P}SMM#I%pX5v<LblhTt%zv z{y)5S)%fG<c*~ruh3U^zE|ov@e6cIYVkfxUvEp4RH-Ce+rNEN)UsD3}^wy;x)4BKK z-ov}Q>z!kNa|A`rd!F%}k%8y%6VYX&Q=b-itm{1*U@RQ{lkaBbNvm7G`pV)|PM*|1 zwIK7<ksDf?rbRoBtL&SWms^{f_fNTV%h9`)Jn`P<hNhF2X|hRJYm4ujc5ZP`29JSo zvNm^cwWR84eJ}mBC(KQ^NhQ5LXy8+t8|n8?xj!-4xLBBDPJ!&J+jfWkJnGqVs6<%V zd*&Pa*qv9mK0S2k%Cl!~(%$LW-0nxiRrqHpbnH1)(xlLSW0x^ca9rq&+4CR0HlDli z<)Te<X5A`suU<c;M}tZI?i}~W5)&s$URGH3u}F6P;p^$=uc@VVZdtm(B3Ns3#4IbD zQyqs4&Rjm~KlwO2Lz4ny!{Lh=V%;W{H7i4ubbNI6PMaEUl+Aj7)@%ZUgL86j)-~p~ zg>&ER<^AfrMt4q^cd^&$&s$7Ne?;x_uPr^{Fn#vy-Gz^jb#-+~o9CUGYaJdP9eq>K zmNoj;``7DgV{6Ygq}zPu*}_${`cVE7PgSGu56!N9a})PJ!ql*`b>8~@$u(OxC~WV# zd;dU({qvm<E&5_@rQ-vm`~`Nb-oAA5>Yq2AFMhfm?sr_buJTRui8)W&S>FWut$ViA zb*tpbqqQG}p2+^3sQA&=Q#WMSyheq;3s$%O`4*5V@2It^tLt=8@hADa)fK&Wg=SY+ ztN*`v<Kbo<AK4qdCeG~lEyIE)rl&rf5j{cbyM|B11Sy#^6D_?Tk9z;|3+0=3yH4B~ zzW8xo1&?%kQp(onAC{j@nz;7rhSl5oy_V{-RWa$cFJF03U+1Km@y50JYb<M?N$2X? z#=n1Ao~(Djcjq0QydK|OwU$rLPw1G;KiMhRDESu4O(ntj9UJ|1@-}TQ5)@k|I`!EJ z`Kl>`wcih_`itB5Cnn!CE|DnMX7KXWTj$6_E(|NOS9Eo8?-Q$<kvN0!{t?YtOby=* zpNlSIy>BU2_CDuH^XXYObw#)SHZR|9$a7goto5EXH^cMw|Lcq&u`tZpwWs^^!<VnQ z&c*#SHGRz}T^3Umac8mhGqr6-URAblI2dB~mIhq8lc2Ssvx}RL&-zzOcsq}RudlCp z{=Gc~51l+cPx{;c-I9HM-K|^K_7$kBt8a{uk(BflXqh^7>YoX_cI`Uc&R_riZu#@` z^OtLQc{bXI&7bzIa@HLCe|5TFvQBNZS5iM)WW4!G`NvH$zxOwY$9-pKXgcs*Pj27a z?MtU^YkTvL&)N4{jYX{5Vzu*S*5W(QU5KbYVQ@M0y?^Z2e<2JB`TPF`9(Xoi{Cup< zox97w`kD!4?BAYwZWZhPlPP=uUu~JOO2F&e_azhb+l6XVKD?@NuS;LBt~SMB^(swG zt+SdsC-X9L&f0JKJSoLU^YDeRXU>0WpEEn8oJo~YueqakBg)GEbN#(bIVS?x^Vy@f z@A`Er^?cn1tqfzwNe2_%|JFR8q;mY;vC!t#GpBuZ@IQXxcCJ%e-fNr5pH?mMd@S}z zLQbyq-jN%(j@;-{Iq^_#^5Vz&8JVwqB>wU++=#GRU-9lSXv+lWr&DY9-%#JWtzeF! z;fZ5K8oOhaMC12tJfHt0W|Bf_DNnk8t)b1Yq{`61-wm<tzfSdEx^61>*tmIbZYohb zX}0v=JbCZ*#dDKYb}|Y#?}<6i?h_LgG*3Ni-SsCQZ<^~CoV!(dIgYWRq0>8e?VP<a zfA_>3=jIM#RM>B!toQR=%f-)Yb?5wXJNL2dD|^Gm!|4{*KP+xm`^xMNh?w!KCH#82 zJ-5gE-Nnz(vCG$NsQmow?d|Q-Qc`l(WjU{|tbD_Iu>RlA=RZF`x3#rhym;|)|M}<g zeEj|SxwyDEI3jkJy}e)m-!}J_$;yybZ^SQ#-7kF`eOo&6wsdwz(JZOxvYcHpVL{VH zq6?mu$o$rDz4*IsPi(aAr1$z$gKpdX`u#(G;_CT#wWkJrp5Aw+BBbb@NA}W&y}5Zy z{~tc)eR|pZJ+-E-cmMtDbDh7&a@OR)d)*V684h1q`slV5-^)tY$h}5ynYX@EXr5BD zrLW;~_UZb6!MD~I%RTC4`=ro(%Ha4!=bXEY2Y$@gj;Xz)K5y3+<9C5GntNyW|5izM z{@gRCLjF7Fo5eN0viq(YFu*qJ=kANE@{{R%IMHyrrHo$tl?@vU9%a8|JfQJDbHB`w z6}z^@_+RH}xOnXna|8NT{;9Uo3=z>5j1BwNZA@z6Ih?{N+`ij?QvSgOTYoRzvnk-t zr6sF#58T^oRIb9YX@|-3!wolA3r3w^aN%ixa*J8~eCHy@12+yZG2A%m3f@NKv2@b$ zqdmzx_N{BkJ!&X?gUP|$+xWMXXy;L1^F#g#3{$TjeRF%#)Y%ye{^u8O=)Ua1@L+<} z!tdw2mgpvJToI{Lb!fG*;ifld>LXo5&&;tjHZd_#QcC*$?X5(crIl5mwE4P4iw+$* zl5%H9p`V|hMBC1tJ0&G0uU@$#Atkl%^EvBoaeXsGL&k==*5y&r(eH0>&p$iM^i-X! zY{ZW@e;Oo%=g-`2VXC)xJKLuxX;akg&+z-*nIJN|-dyGH`PhXF3X}gn&*ts=_5GE2 zC3Am>lj@NtFJF9OXb8K}xNOFvJ+C%BvSL`Fv6h`7n0xP<E0?}JnKaLRwTDmWlpyi4 zKVO{npYdy4bZ478ujENN+pAmdY{u6Y?pw61N=CiSs$zZp-|2JyOmTntz5nmuzq_uN zZS|P-T58oTd8K^w<tah479Q`LvGnYJ|5@2N33f-$J$6j$*t&D_>fr3#wy^#E>lO=_ z&C$MKvQ(mB#mcyk7uf=JXU}>pvF_l*ml@JFdI__ZJuxi#qnD7&T$Oc3R{lr-oj+5G zuh&)oJ-T+5P2G*Z`?XhlGdSG26cYY_{>N{Np0(ZQ%Z-rxv9NVzZCqg0vJdx{M&I7Q z>-e#T6)KZd-oANrqh9CUy?YD+@$vadNlB@xTZ^BcYieSWm6hc=ylVC8uV23&K79Co z^?TcI4!OCx@$vUxyvVrf^JO9bu5YPERaXz~{pP18oW4u1I@cz=`Om-4-V6>C{{Nfm z_pf;O*)t{kwz)lO{`2kml9&Hu#NxwZ#H-#0@;?qaVo)M0muWX;N4@Rl^2=;jb~W?p z*}gyVp6ANeejd5Elkc{lOkA|=*MyGX7{2@)6CQG>ue<mli|K$sbpMSd0o%^#95*m= z-d?sND$?Si#l#t6KhHb&_*}b{|KPQ)t)AtYMY~SixG?8#5^M{XRdUPS$+_R&Zg?tw z*q}Q5`idP1+jhhS%n7|8arj+kQqIz)D<@BqJo_#(I)3HCg{ip@uOuFb>2vekIe}MS z&ywe#<jQjfTmDqu40q9PIcWD~$Bf%7XFz+l`j|l}pW%tvk{7Qe{>|U}yDxuLmOMk< zyR&(>mR0A!Sk@hMN^3LE#vB$#(ZGPfi{XN<fh_T^A4NZ^uh1|O(P(OT6C1UlIp~F4 zN&7pqyP300c0T@o{Ak4OATQ6^YPI|7KY052y|d+&^`B?+-I8fvz{;RI`n%f&dIh8& zJyO@(9Ud0Bpe||a5|@QjX3xHL!DMdyoMR<#DsO~e|EbEf%jxeu2}P6QXFgNCzV843 zH~;am-XHhn4KJF+M*j5Qbo0iI8|Tig+aLaOhDpTM_u_9%3fue(>(2g@HDs^bbMV;) z0jE!4OJ^?^jX&VX;X7YCLFLh7i#CBrA8)!TF@APYH|JhDX-A<YyJE{`1F_c!U*G&^ z)_gpjy|3hANU|@h=E_w0|4F~4%O^cHohOr$duxm5X7?-Av(59{#C^pDSvDs9)Sh3r z;c(BKgXxhrzc~GST0inmJm2~`oKNm=;lV>YFC<C6XnC?*bJ8cXWgkx~n|i*^SDUwL zg<jr7)2ZR2PoJnSO*@`;r+dCZR-VtH&RuO<Q@tw9m8)hv&q!zYXWzZ>`{|<mJ64)g zO;et#742-g^{eYi&x~KkvSg0G&29UzgUML<wYOorR`!vrlP0bC<6@m1Zg-wRF(oT$ z>KsAg2e#J^y>Z-=l>ay^W|D0E^O)q~+`7W3$y?63q)663ukoyu^PJS?B&_T_nQwLJ zrtdyy_f=~D47&K&$L_wv#cNT~@rh|kxoJtcsSgXjJ`)t{UK^qrWR&kC`+v=e6MH^4 z&E#%+{BF+P@Ph3-RBoTGjPR=y5{|v=xj!s6I!VDm>;rF}YW%7-f{!gu-#Rq$@Uwd! zHm;LeT4%1^o$b(Ws(mY^{POy%=GP=7XGP7t9V~LvWdHW9MTSDNo`|U2J=+ns>Q<Wt zfA{|4bua4DRy!Sg`r-ZbyPG$cm6m={)O_@3>-||vN{=qJ>^&=FzC3Z}ccDw0l3z<_ z>zsMB>9f#TpEYmS#P0s{s_LJv;N%bDf361K-cxDpwBmpK1nuy3CMG62F*^hlT?CGZ z$Jcy(Haow|Wzkga@O81f%T7#CoURvZRq)`zEYoZq9i2yy9~T!DP1B3*5?G}1YV&!! z+gmaxZ{1pIzy4=o;m$kaaWT)HCDwj<V<wh(^jP&z_sfT`f4h6u|8&%?Hr{d`si(j0 zKKsnIbJfByv5!6%9!)>i(kDM_W{g$huI&dJX3vf^G&*CeaHR58PW}D__h|RaYvt!D zah^JS{oBs#hiaH*pBSaicG~*ps=<8)_EhOWwRPE3H3gme^q$>+Q~mGO&NH`Wsoyed zS+-Km=A5m>?$YPKPE1tvFIv&w=o=?5{ibJich#nwx%V4$OB(qq*UT;S>{_BR>1fhr z(43=dutnSEh#Z;YoRe0pT_3PYB<vZV&xSsMB&!6k)ZS;y%-o!WMHe11lsQ~5NyTCg z`%c59tJX#ZW#y#YQk0mgono_&AwOKq|8hz4W|wQXa&liDNi5dvQqpWXniMS3Dv-2! z*9zaI8LO5q6+B#^>@3_A@X(@rk!D)j?4Y>V=qv>TBjL#H=X<urf4Hw5aw2NBtD9KI z$>Yi{mqpqhTC`18Y1|xP;`&fW%u`55O!|01Q$V6bn?X<OW~()ke+678%9u@GmN`kq zfCs!ku4~y6-QHtu%Ou(~Z$(Y@YTY<d(o;yHZS{2B$=>Vl*$CO?310S@tPpZmmsd@x zn|;1<fXM8#pz_6egK=Ip|82?b{;@lYQvd$?%FD|eU;p>(p;m5Du2u(yiqB`w?f?CF ze06pB@uNpwU0ihH_thL~;e35<?e9OI&!0YZN=ZrS(BZ?+&(D{am3{mC`SCr@7exK{ z^{(5wbYb`I(AeIPm=EVu_vM)7Jx)+snUxnTAfwm4^3d~-H@SA6I(Bf$!Z5Y`&{gS4 z5^j@3+D|KScI`a-Yy*er%5@J97Oru&J^wgpf{>>9v*+>U=Vsgg_UyZC+Yu=*&GKv4 z(pcAjOZKh4TB%a%9JAsUJM*1n)?W^<qf&gYKk7F%y>4q>AN#wDkGIKTzwKI<U%9!t z7JbPQZUQXx&o9r6S{d@l;vCPt{q^^+U7L3NvF21Sp2HS0d~JzZQ?-nZg%zK?eS7x# z=ikL!XI;9!_uJNvl_$RQZL%o+mJwfni{JE@!~C!Qu66znSM3-U=!<k*=H+!^v3xK~ zor(9+#|jy~_Oofmiq>t3XE?f#9xA+Z_3G5~&yAa7^rly8A9`5O1O_E0r`(x~q+@#% zv_6%;yIWxTE5`oH7pJ0M8y(%^)p;hk)TK|j#m+2~@}-p9Qz+MKXXAkt@BJ7h|9;yt z>7x9TFKS!w&+n`;%~;R*B_RIGiR)7iUdx`Z(6Qsjk3D;u-2GYK&WN7jJKs)J?*Uu? zk)(~kO-`{py#BT5dform^Sl0>Q?UGdLt(M~1l}7ib?H^}Z%sd$GTXei@Xh(;xV*(S zcbc~Bm626mslC7O_mL}^!FK<iD4UyK|7T;G^2L#T!o_@kqhC==7O$*btMcipLRxK( zzzhC}Te)j5TmQN>;dy<0{_Wqd8x0SqTi>kCsMfVwv(U51{4v+jNym=ff3tlu-!_N; zb(QP3wl3bKKf%o-wfB{nZEVo0TdP!6mnp60i*7Expf#PZCC8TK*IUO0>tp@zO;|oZ zQ+wk2Wz6dZ8TwrWj(mC^?#Eqy&c!ggeNoMkoW<Q@wZG0Cbod|8>GJ7?`U|Eeg}NI* zFK^y_uUX?i=gcmh!^d?^pWIrye5rkv*^8;0!@qCUe0tX>V3o+%-mA7YvtksjYqF}} zyfwai#`9dq&;7RV@9n95wwzgh>GLDy#-DHOlwW^LZmGuKojigK>PK=G?=F7d7WJ)= z)pEiAj7uh0JC5#ZyCORMS%&s0cYznowgv@JufO#DGks!N|Ig{e2FCKzmUo}ztX}PY zUzSlV`fKg(byH4CUQeEU?%NX$6<0ay?Uzs9OFnkwxs}Zlr70iF_3vo=EYn!EC~D8I zR$cGs`*v4cyDgr~cgbY#)bih9pH#n^9mwiV-yf^2xwl67)5d)g3}5aY$UkxU{Myo8 zjE!~|5_io$@!n^C(C_zup4+ZpczEkxuD^*|oA#7^T;-#7`J2<PnA+st9dF{2i*tjb zLV|9Ey3YRd{^P47Q%=9M{HW#BDX=KhN?U(p=)FTWv!Z9{Wap}B8tGd5t;`Cxe_B`h z?y%nxpFUr!=-}`^0jCZ(jzE#p^$+rLF5NtH$7Pa=fRl*t($wQqr##=b&Fk`}$EUQo zXD%<Fck;xZ^6t|Q`#I;`+&ACWb7Hx1Qkm?H3rg7~n~IMY+9>^Tb!HZHI&t8DhhDy- z=B1+tS8v=|cD<2TGt&Il^Y@i8|C*NH*U<3O*E(5sNnD)auTetqZ)TN=>)9IZE`;uy zcjCQ|ebDcujTI|`6{as<J$E+yGD+ci_Ek@2Yzx2m+)MkDzMH&7#h>h^08`WJOH+<1 zv=ns*{j>Ng+qc>4RPlG2duxI;4SBM&)>%t$?O*nC&!Q_ote>+oIg6e1I@zPCcQ%c$ z)cUJe>ee5L>Q;6Cj$i7s37#10^XH>jq_FXf2{n!}(~>h3PMz|$DSW7&wjoq+>dB=d zzFSW%UA6zdYl)?>Vu`wLR>_CpR~qvdtz5I`NIYNelq*x$M|}CX<)im4@jJmLrIu<& z1ve_px^+zq<{1{={FH9DYK_?cqKxFSx=FiO<{W?8-g?e&N3|pKdVPkf^aV@5vHK~- z^WMs4x_f!u)^j;?K1(R>n?C>UoTZ9xN_MW7e0kTZJv;R3(=lQ8{O~CzUyfSw@>HIV zll^}C-0M?jk1lThf9$BM*_TEB_bq=s?zhigs(8Nqe(iVAQkOZFm+#!UbNzbxmlqfN zt67|xKktjUk&u>>;U%zSTlhu!tk>H2D?VxmPZV|PSfnv)+4<PJ+jH(&WqZ4~T$rC; zu9AMNh0Rx5)aLQ`<apI(G5h9LJ>B{9bpek%2kUQtKfnHOCESZLw6+`kT$*lPR>|dA z>ssr4)%bjEU*e3_i_c%TUz@flt5ogY{pvT@<l~h+n~o;+^UYISsl9n?87C)4xctJ? zGdULCYU5(Rz3^4$N6+U%!RyyVeAzg&GxT}togJlJ=gm7f;up#p8kx+r{MovzZB?zi zeSXfQ9!bN=lHUuscS#g~;Ea!8_#!&_*7YjqdF*RTopk)>o|RNkv|~2<<#61_Q|W)4 z+tG)23qMcm-BV(ed;8et=xcvd-{*XL{<Zv!4$tqTm0@PbxaaYkn%2LOuh3ogZK_wQ zhsTM7&Fs89JZH|Hb?=qBIzOHLz|Di*ou34qEc(nnUx&0z0<rVX)m@z=)FROL@N?Rp zs;9>uE=UwU<FjU_``-3GjrDq2)2>aQ_B?u)wauFMy-T*8xpZe<=M`R-wpVr5y=Nz_ z-srCEU-$d=M*Yy1ppV~0cjbCjw)?NxHOF%ji<3m(|Igv3B|pAQWPCVLef!eqM*`;- z^+xX8uGSlQ;!xx(!LDUNoAc!Cw$@(xAgRo}eARK*8b!}ZuU4rrIHce5eanBqWuFww zFNgGuB})4@#<dA3d2%VL<cI$IaWz%gcwzp8W;O9&=7o(ZZV#rt>RNWscJKRD-#jOQ z7S6o8yZdR;&qikUZFzTR&HlY$*38pStE#Gw9Xn=bZoYfhu2tOv9+PZpe|_10zixN^ z|9{V(rSa;qHGH!wnf#=n!fUBhEW7_CExqsqcl7j5ib+PNJXaN}w?CCu%v5tIXj9&j z=SNt1rT=dT{!qcTwn(#h_9BgCPyM{JFE>7px4vC{ZuZAl+}zi<*H6B%u=mm7v`rB? zJPXa1KAL}Y^UlPDo8u!sIMx;Zns<2i`{{pQ&uT1GPB)zTi>EO2+&ky_V$;*~<9|Hd zF@eME_k10<*+J)$Htv*(GhZ*w;GiA)n|ZC$eq)X=jd>SBT<hAO9cOdW^9=fVGn7M7 z=D3>e)7^i1Ig6*aarDal@ijFQ)QOS%^{HOXclKj_g9l}DiJLzjn5ef|jNSP2+P5y7 z#n`QP%~Eceb4N#PugR?oJHB6iRXgR@`I9Ga?kauFE?@KE<8k@zTem)a_Kc04Jv=N- zsb$mV&Gx@uD66Zhw*+KlXc(^u&`?rRdh_<}{kq?8w{0_vkH7!uQIfANTSFcPs~cb0 zJI~BO4#lNj6Xz7xuIRRRTCs8Gx2QYw^>t$Mlb;spzVrY3Ct-i5=FICyQ!VAzHS$|8 zo4YmJb!$XWc%Q&2U9Yq{b&pqCH*(Geh}Sd5M?}rLuCg}xy!eM!)2*o{zSBd+E|}as z>tijwovARY{j#L=Ox+nftA4eliYN0edw#^Q*~IsA1)Iv(2fAKa*Up|c=Q}@VPtCoa z@LnG4I)Olqa|Jo!f-DR#-0GKoV=q#Q=VhujxbQVFTUKs<ZmxP&dhn6y@^jW`<v;m! z!(J{nGWKT4gXPjOa<5As{r+|?t%mXW^~vjx#hkGFll|w&@|xT?zE=Ge>^JuBtGo4i z^<e=g9Wl9$89%1m>u)SK6P_t$^ZC&V|LyuBQg)egeveoFO+4JT_s^%(UQ0hc?zfNI zS@g8u{$I!AA7^Kq3p!o9b}hc{=hGV-lg)E(Jb3wX=7b3i0>9qvey^je+uYn7sdH`h z`hBn7zWw{KUEc1e5yOklotNW1&v)LI-TAWp@9Vv7Z2YAk7iYYBa&*3W&#d&M9K+;C z#XDP1zFKCIrgrVwGBde6N1ux|(^+aBUJjo2-hS89>xXA|y-T0fwT2_;Y0C4woQ!X$ z7xqr9&-M1|HhS<s_?-9)<9~j?w&vGYzW%fIzG&{+yJut`+FSlRS2^j`qbx4<>i$q~ z^W9dzjLM@$b>01Hr^o+!5PMJ{eg9N%bIV($f@g(Q3O|3FdEw!O^<oY4UbSEOcfkM2 z>VrpjBsc`;mt~*4_~HJ}4%dScZQJ(LFIuvKPw~s4*N>%NMQsW`E#Tz-{q8KQ+yCeK zr~mtNHq<?wdtO6uwDR43FXyaTdiLVgJ%>FC>u&!{*7S~->=sb+%sO9wQTyJk4uPz! zjK4o;uh!pd>#4l@ul3gZPb^gelyAS-bTda-SU5O1xJ6+8`S0JprEwMc`1<<Kv6whx zhK2w~RCM&~*RKVguCI^h=lP><Z<Tpz$=%)M_79mDUYt2!y=8v*@$UV;uG3ae%bT{% z<ik&=Wi_nFKZuLxCdfT4{Fxp0$KQ75A`REsHW@cqp5=Kx`^sk>#QLL$`wOr1Gs{!i zFF2;I@;&fhopXE6y=vV}YI@VpKmPYR*us7H!q;K{SA=Nsu(aJh|3yM*%B<4QQFk_e zDD1vfek0|9#kzCXx(_y_!`1?Dv%0<CyDd0&`4!9V_5X^_#s5Bg>(a@ynGw^485sDD z^Z&icyuAEOXT+4rlUCo%E!n#7=G){(2YH@=y?JXdJ0Gw2mzazpXE(W$HD`S*1q zcGQFv#`&fdoqYO*SF+su(W0X7?|WX_Gzq-Az}KoGAHp8Eq|M&s&F(gvR|}qOK5ysk z=Vw>?N~A6E<H!Fl9zMMMhrz=>e!<Jx9C(j^(A&Q5kinT7C)WIa9u^|5o_<8*R#fiV zm^EkK&U9SAP&r1X_LhHeeAVf+jW_?F`;{#5Z9~KCvq_s-+xq8pCjYo2xn9ox|KXdf zf2aA@9@$;Eu(9yFuz*whzhB1!G-jE8eR?imnt`Ez$;UPu=51U3%oQ%MGY8&R{j@tV z^Yi)pcf~TJeM5~M16Du#`{-4kX=2;?P2tB2E8pZwpD&Yh<k)!Q|CVzJ+jp-moaOa) zvWn-V|5f#eaxNFYy|uOQ@v%gSuz-LGvuB^4qVGS?=I876`}1;hO$`hjI8@cu_kTFV z?f+*f!vfDRvA%VF`)u^~*QV${;J*F*&2Pr}>Je7uYnQD1b1}F&;aAJjFtOT8S_};b zor71_-t~I2+OgM8BH~xo=4id?YyWNEdqn!D@UrU9to(LXA2>JI*Z$~>-*EYeq}|b< zroYRN$o%-oHv8}^n<jxt+qLf6tex@P4?a|OD00WIc;0$Z|FEs|=g!@mf8Vat<<r~k z_g95zrG5DE@v)|+CbyW*jeWJhn^?K??(cj1;zh-?Gc$jGf4~3hwdmwyJu_{qzfIK+ zFME6I>6<ruvaV|R*85huUc7dza>5dirCt{+WinW1AN}@K!t%<|`F}sW`tz?bamKPm z#T}m*FLbD{xpjRZsKd6HpKZcEzbE`(w?%F$;&FO$b87M}kyS^eSzopDz1wA3v*k5^ z{hlwc%P;n=dnUS+xBlIJQ@uN{?dP8}5#qFnnU+7{@pSn)GG=!+9_Da*kylfg8~XWV zOX<&>Q`PzI<mG10-fgmE=f+a67JH|RpVE)N*UDdhtu~wgv&zca^78MXD(AvNXRoD` z&Za51tc%}&E@@-NEIux-s4W?S^Us@`n#OKOVC+8X#If<_o5||_Vq#*~u3XWH+~lGn zWc!L|Z+LL@v`M9leKp-p?y9U6|IlhDr(Ao-+3NhBsWm4L>#jJxwxdeJ^!2hO`;xM5 zJW`Ly7tdQBXDAxEb2nQ_O~bOwn;*Ng_*{GQ(&XHoLu<A?>RahyJ^Nfkqua_L9@$4L z--a?QVBG8d_H~9*Jn!oZxdJvqZ3nxTRle2wq;Bi^{mi?KH!a$dTe^}q7q%!)-IQF+ zqi$Yo%)Pj&I#l;8ztQ?<)7tdjg_W8H6*fLeR6a8?SH?#r^lUCy)8W)WmEOk^ZOK}y zCm(L|Xi_qbUBBM#a!9k**;}#8rskGd3wIyQj{kq_e)XBhb`zJql<r*qsVnH&*^0A= z&P<cs89%Su{O_%%nd{4E_*}fA&u%}{qH5pu3lHM-P4`>)9xyN2AbaVxa>=x*(<7qe zEfcTY(Ub4>v=Eds*(-ijh1XZ;{=`M0>up}T-mrBPI1*sKUi5s<tM=l?Mt#GlpV+0t z{bu~QP|L|C{j7?UgSjM%fAu%{kSFYsbF8XE!nHnGH(!!nP&@0@#Qz>Fjw`3A_+Hi$ zy=i&MonxxV)us2uRxhq;37EU&X<kj>?-~0(a}+-@Dy*H|<iN3Vii&5DmgveH<&0Tj z+XQRHpDMr2UF<Eu;wT_xli+o&_lNcKX=f^@gW9taZ96S0EUha_=k+B2$Ua~HQ6<pM z>BL=Ahs}X?-D@=UUf$U;akHG+!E?8CHQ%mcJAXs`M$We;R_;}*OK-(-NC><Wy(?w? zZsYy!uUovQ>-o+y$$WcjYyID^*YEB9yNliO!n%21Ze8z``)SMAXm?@RzI7+$ZGPoR z-_2uTXLomV%Tl?sJmb}|wUZqWt4VNKUt{h4FyALAB{DU!$gL;n>a>FIPOhbe-r2!v z@7AuG_4|y>%$Qk)`VZY6tvt2g{fe-c)~84B<6hLbtz7dl>5OAjfMSc(?Cj*p=jQF( zw0wyYzoN_KlC*bgyA9csh5QU`FP_%o&RcHBaiQCL)8$R_In^!`T>Spcy&V2+%9Q7d zEkcv@*?#*bJ>*|^Oi%OtZn5$=NoO3t&hv6>Q(G$f)Bj)5*R7`c>-{_|ucz8q7_4|A zx>T<wO)>bv^7;y!doM39Z|9efi;dk|v9Znj#{q`xzE}78g+D0=b#Q0Zc|YM7`a9=V z`sSPRH6IRcN<A$jE32%moN9D)vdr40OE+%ZdF|Am*WUc9rB63*KOeKd^wXKCwl6I| ziiRG&S?Rf4|NY8!y3QO|uS|76DkmyAQ@N$C_fN>JOC179YAP!6d&J7$_(g@ZGlyND zc29f9>_Yv<qe<Z*-Iq5dAMcrAsaBDex>Z84<ln9QzB0MX>N?p|w?B}GQ#j{wa!+7f z=m{HhOXIf8(i_XB#QR%3OnIM}{dCTp%DIbHT4x5n%i}kb*)dyCIed$c-0lm9uK3mF z>diizo3W;HlK86n9XodD)Yjcw7#uAWtaq68NV9<FMAfI2`~Pj6n11QY%VoT`;{4uU zG>MIf*irrc-L74`y2bVDJ{}dnc=6&ZcV}nk$B!O$b$83k$jq3Q)Dyiu@9mwPpWEf@ zG_<rX9b4u2KXd-A<r$)v7Q5`5RkzQVojE4{`w96ox4z%<KfU8FfBKqLtD?5$NIIRk zf4}}<6RVw_U4M;NI*aFm{n0gLX~{1|UPza%|BzR4W3v<U<FK7qZd@?2e0)$o$C>%@ zhr(_i7B|0dax-^s_tO4cd&k+0txY}MWpm^l@%cYjY}~o+FymTXnb}Lf>hax^XiI&1 z&&bT^us~W`R<43U$f{ePx-T#5iS9|f(Gpl}$Rqvgk-Fa5v|l?Wi$qq~7oXbU%CS(} z{9i#i_miR@uBtZ|x1Z0LcCFYVCfPaonaD}Wi<_72>k;_$mFMZdy=#NAS5Nu<UUwSX zn$q{{YoFiU{y6FJ_4*HitJj>pvEnt`=U=^UCf8Dv>ubXUV?W)>USG3c-T6B6++)X% z*;aq6`T2DE%9Shg^73@VvR_?U3CenFA~y>-b&KoAZO@zA-F>?FyzTb#_xFB&ey-ed zZEf`PhYvsgdc9s<MWv;+_3xL<{+rWZ*Z7H-EUsN&yF}<`yT!|Z{y*~?9ON??XP=d` zE;}<bSe#?m)b6i|+|v(sx~ZI;#=_F_&40o9ghhWegO|;iHA|`FZQ=YprA-fteq7zE z%0Ii|;f~IYOHZ8OQ9QzO`BfWd%{~M5|9+LJinGrKuAEYIwE4W40Z;jsVt0<26451g z35^zak6x5keDc`v)A`NT!tdffeC3#HP$f70u=J}(|KI9o%jDcW>~^lG^phjU)KF2s zQhrB{yV^SrCv9|fd&c6K^6XyG2H9D&YKxB@dG6wtwp5hWskwgN%;vx9@9lrJt~_CM zBY)Gb%Y94s-MMq+Sz)|PZsO*f!fJi~9z9pTIc;HHxAO|~vSrIaTjV~S)_;C>wz!;J zpFme%-@bx}Ou{efKc6+1laotKOx&J-zpt}%rhWatwb9%A<ZQLXx(#`xt;^m>=kNLW zYW4bavrM_obS_u>ILkRZA6|V?@>X1To8wEq3w_~n)tcK4LSM`ZT<=qPW2u4F!3#UO zS#-Nwxp{W{-7nEHAtdz53H#cg&ko+_`{VU}<JsBf$}Q7$B7<UL=1iNmt?==&jmgKi z{b$+pynyGsl+>JQve#AC*58=Z{&(%(c?Cwg)@84Lq^tMG-cVfjepz+Y!@oXi7q)LI zsCfM}f7-d&=$Kit3V!MwS1$+0)qI~SYxho3Jc&=CMWbug#3@nH7G`GGuU!kbx>=bZ zaqU8cu89HP7hZ188He`#6_A|0dh>n}-=Ed}wePRay{xXYTdI0Vs9tSBP+{Br>2-0} zISw2+5|i-Y(W66mczJko^77L1%+1W!#qa-jnBV@)$&)MBuXpE&-CuY2+&RC$tJ5wm z@eB<OUAnX&@z;U{{*iyaDO_NWO3uujIcwgI%HPGIFIG&tR51G|-!mP_kLQ*xH?6y& zy80MfU&%|GzQl}cj~<@M)$9NJ#n^HF+lVjs>Xmb3e{J~JxF}TU)u$z_&z6d^Ha5<k zwIh3$kJ|3?_i=@Vg()dZe)YeYT#<F@bIrVi7mfdiUk|uiw`bu>Hbs}<kaqJHlfMZ| zc9@(#b%^oshFxu|cC~qZDd!5aU1*%?ot&M$x$(e?ol6xpb-9igXmhg*Cv!`CFMo38 zHOtCJpIOYp&YfXr+R8hXjcIY)vRSu&b%pJ`a<I%J^la_QHGxaBk}vJOI_Z+x(nB5@ zPK()>uUorbNAG0PX3KBeoORB={aK^vv|^#>r8}1{xYpM)IMfHSf4q3{BDc6+%>KH+ z)8p$b6A!U`Z8>$y>uYXua<W*rslY8U<_p;YyO_7UnR-2L*7k&JS2P8${&WiVb6Ed< z*}J&8OO|S^kJ@~Ej-9zfN>)KddCc>6j;2i;%*=#7F7@rw6g>P!##cD$)3h~G*2ND$ zbO^?8JvC)kET@ylDy<;NWik6|R>?cnv;}DN^z>YLz{pzjF#CMHoap!G`t4>`x2vO~ zECgDDuHAa`PU^<8kR?x#ct%S-nsn}Gb-$^RiKo}@TNgqm&#XRu=*+p}wNI|jc7OFs zd+%N6p58OX-9c?TemoUlZf0_I$@3%JKb+1h9=4vddf&=fi&p+w6taHd!ILj9>TYt= zYZtew*)_9sYs|!gCtv<s-r##$_|xCFMov*BcV+&RYtO`&_wv<g89ptFb)Ncs!b7EG zZl1&a^X?|*K78>|?8M_wf=+ht6wh9&N><)17WsJVj^xy-trmUyGk#k2Jv8xEzq5Bk z!n3Ruj0_9xC#tOcH~nA?w}`Cl+XoL4l9H4rpIjHeKQA@4RbZA$=A~a>U%$Vz(>Un} zM@v9a(WgbO-7HLv)2{I~upPMP-_L7y=9TjPH@9~G`|E$^<?<an_(I;!j+XjYQS$WC zhxhW=l<WVP<m=b}j^DS_DrZM>T9KyHiCcapy6KONg}0?IpO#smDzbLf;>Gi4N$*O( zzpn8D>-y``X)7nH1l|w1tdwnJW@2i(@sQyh6;3HdnZur42@i8*j)!Wgb{}1q!KHX4 zZR1ki-W)Uc1L8t0T!#x=1Y9TSh|ON6*|p5#O<!t=i0?#}gAWU4-qziuro6DziY0&Q z_6-p^_wI+E4Ki68qV>auxn)Ao)niXT%qVOM(7Y9O`#bYg?Ue6a@7aF#xpS=KSQ@la zKuW@x|E_QUwk;dVH+_C_H~Z3j=`=>RD=%I*wzajr-}n37=JR&dk9*DU)&H+mS6}}1 z_4WThpU=O&J%9U_Ej;}E@|HzUzP!Agot1TNzWx6E`}-~~cCY_<RJ{88ySuwewP&B* zSN8VSGT+%}&YZa=FTBt2%Zxa-imD%~UrqP^v6E0x5%P>*@=bS5Ph4I4r|t9Sg=%{4 zYcNjF?AX5l@7x`SHoH$2baGs%m%O}!tM|wLw|nA3@4XOz^F;c|hvVx%ax9#f=)5M! z^^6H$yJ_97@*5%VgC}}wc0MXMvyF|4seZHF<(bGfJ~e+`j-sN?7L^*BU$;ppK6#q| z|JrfmxcDvZdwU8W#?9VepSJ72ILpF~*+Mg1{<YTmJh8ttnf;fQZ%}w%X5RhEJ&U4p z(%)Wseb{Ni{r?K{E;Ea`YEJdio4z_|WrU8{?6YB7Q!V-?tDJoNan`I^QBhHE-o6dh z5;Z>Yv`EnD>eZ{2m6gtIJR3J}eqH19<Jg7dD#-_+4zI(nMOpPLwx4~{k!UQ=wsOjn z3mx14t=_p@Y4WzZic@!wiz#k-&>Apt<-v2h)4M*e;_dyJtX6%dzHZ5Xj`U|cx#J{` z-Z3zEvUguyRFPAmU)9e);!cJ<(SI(zcs;#nhWlRTH_vr=Z+@>m^H0{$u93fKkJ-*s z7q7<b<tg?)TyAE&H|yQ`SzVtvS8cV|{^ZDCD*05oWuD3@c7`u}eUEGG<c}B1^&hW! zaPn!<%^b7-<IWtNE=twa)hz<;hZ8qO_)O^+*tBgMA2;`Fqf_h-&m9)<v&ob?%Xvm0 znr!|=^Tf(k8kruuA{zv_xJpfpo~@p;WKZbMdUqbDjEA2BMVIn&EbOjdD*F8Dk@(Zu zSs7<{L^lZ}ZTw(3+4h~9h;qxl-#SWPzx@r1yuE_+oqC=BmW|??PqaL*HeciQKg&PG z>}2Mween_1@6L;)UAW?O<JKpC-G9g4a@$wwZqo2Ko~>%SvPf%%{fui?%nM`K85kHC zm<3pVB`72X{hnXHJ!s9H+ll$F;v~f1Ra$QoP@GZ~os+7*D{#Zh)$!A~dMh{<F8(c4 zXZ`=!{Ok8;8tON!-1c4m;Te`+4>$h_@!GU$OXJ~0+pP*Gj+{w2cWJ`<Yx8|PMWSy> zT=$H+a(sV{*5B6a$K(C(e>k^nW-gbgvBi<gQ86D9o?a_k)HG++oikovj&Q6BZJIlC z(}8shJ()UdK&~rcW~wzP*!$_0_jhmZo;yXWMK1bJx+QOX)A(hYqLar>Hyiuf=XWmN z*SOvBJiPz7!J9V|cR#*sfA`nLmE~rx9X`ATGM_(eJ$ZJ`hEjvVuN%DlG@Ljrcg?!) zxnw!teal_u3wJHzR1Ar{=CS?uVN?CpMQ#tKuNMDnWt8(`M}dA?!5fkDo88|VZC|ZD zD@iZyYt`Q@-&J$6{=9fP!(MSBKLZ0pgL{*MJWqyCR{iaD|L=sqeI1*1|In=yXPj;X zsBhk47`LfN$H^n;s*c`-CHKU3S4On@NvsN*^s?NG>s_d+`Kj2uYo%VL^yxjzn|E#5 zvqN93Rp%Yf(am*zb$9)p+8myi7|&4S%ePuLraX<9wT%0HX!sPfCuv~{EpO)dtbOZZ zzWz?K+J_%+4ouWzJ9IC9;Zc=O%k5uBM2GWs)-e3ya1@w0abo`dzuVTY*EeoTyfI1D zyX@T^&51TI-MbkWF8o)}<S04NtsPfk^=RetW#?DwoDvO8mRqgZKY2B4_faYPv#-C% zm%I1LKYEuP9C#^UPJHphimVqb-?!V<ovLp!cD?w1f6attncCJ9=PthaBlF(x^0@kU zTMeEoPP-_+Nz2PybJDGUzd!9+(*??OdOyPbmPg-|x*lRCE%8ZgpF~z-u1bEW+@F_e znT4`WFOHh4@7w=rLKW{ezGc~Vby}L+KE%1X>hJrb7Rq<pMqlySrwNLAdn>FM7N{Rd z`nV=?vyri}b<h8g$K^p=*=Lz%^T}FmDR~*Rb`38BLzO$fH0M{-y>Ip{(f(&u`0MJ_ zd?`)!Pm#8FR|y<8(CfdtOku`uv1@L<rADQ%rS<xCO`e!uIeBGrtJ|JwX{=5i`VTao z@N>PhjG4C4<HA0@`!`$+DxYnbJkj&aW}P*?SFS(Pi;;_(5Pa6;X2{{fo<(xMZ?`Ro zl8y+>UmyGPVEg-5UTe=O<gdT!zF==!{Oz5^&u5ut%UR~0nxfgxFW<H{h}}42{mSEC zj1GWCHoTvmogW)B>#<bO^^T+8He}6TmRUNbUtrbRY1{G(R^}*Q3A8hw2^yn#r6I4l zBxurG(0E7jVw=C`YQJv25@_e7p}lpD^OSypSFTg;FF6%BBgS(_b>U(4_piOC@Hgmn z_4K^)oYF7Q)zuZXDaA8>Jv#$~3F{*E1<5T=53jx`-s|x;`_AF2)Mrbk+CQ8quky)0 z=I6oo<%&nx7x;UsOiDdHZL7SYfkDOBtKo0oyfNS@E+{ZCGCFnc+`YZk<#BOxP8wQT zT1G}fSrrTtbCv|X?31;=SNlEIZvOhWTfcCmd};K1<(d^A{-R1LUPEMBSk{800vYSK zDBZuscFOgaOFPfsDVo9SVs=iNHVt&V()WAS?{B8hkKIwQu(!9jy}iBa+@{pi4{pUU zur2TE>awl=cIDc&tZGGDR?vjGPgec&d%RoUJodkrU9XT3^?J>}f~3Tcws-fwyLRc) zr9)9F*|~LJLM|ki8|$B+^K;6!@P+M1k_tmYru<qrdGh6n%I??JMwh?6W%_kNjNbk2 z`SE#qdB4@=EQ^->594HzFtD+;<>uy=m66%9cf!0T2l*Ffdp+O2u2R~+m*0HP{3&8z zUsNtg_d4}iOgC=H>-(b2!DVG-zjwdBzFuEPr>DRFy}{dCTeE-u{Q1`X(W6JdY6=+` za)VcfxcAH5-BtQJfB)aGxH!MdC3SWG*2V6gHEUMJtaB$%-rQNd+(*s2=*fw1Z*Lz> zGW5MXT|fTbrd02uqD|Yb|6^eJ<?#GvRaU&c(9gH6t-abSPpN1I-R8b1EV=Xg^}YZ5 zwuLX8|L)Gt%m4B`JUrUZ{5|~V<8k@g%}NXh7(N~1)}JwB#-88rb{oxnb7rRT*RNke z9fZAATSK(gu2}KoVY~dbHIbkH{eJJQGHG}Dd%syGFDLuk?X3M>79D+iMc`tq6!tBy z@T?`DVsvv(hpVOL*8bbs@!d1zeqR5w&b{u+)feG$m1j?;MR*(#S=hL7+w{egr)VAB z+w^4j%<1v9Z>RFxSH<5xebK*LO!wF4^Y&NEy}i7Wl9Q_|7Uuf;@_xA~)3RXiGP&0> z4`$Au{r>Lm@^5c$n)r%~iS63G+uYQ2=8PFrrcJZ5u;@6N6dr!Pr>7_Ja9e12`0X1v z-rU~){-}8TlFVC2kER}O<6Xb!Q`feAVx~WIBwqA4UY@XA{mbsH=cat{Y<1mfo`0<F z@6~Oux~klx<8#-09N)6#n&{M}xxc^FyQkHyufH$H?B0Ie%-Z_)?c2Nmo_KO{vbz5~ zo4P+gqPOSm{r_+Oy}X&TW_>#@#K>@KbK2QiJBy$1+PSl}y?uS`ZZX9pNgJ>98|`<9 ziHQ+#x_0eaT3XtfTprLFIZ@HkTQ@!9d+?t9g8AoX=jWN#o&pD9|K8rb{gNuP@3yt} za&t?oPxMGJy16+0`|j=c>wbTEdHLwkqqpKbuFtTSSm5vK;v!>L6H)v9NT;y<|39B+ z7$#py{dIj^Y<FK@US8fmPz%)l;_>6`_Zk=%d^gLzwWaFotIyBRzrVNl_s-|@cGvzc zGoL)uzuM~lHN79UtY0oT_`Q8yuC(8K+O%oRn-4i^h$wX|XE(RE-~X)~G>`(?>~M2) z`nNYXU;T=Dwzy`}pX;XT4<A1KyUl~4A?$+5-;?U|YySOwt{t|9gNLW)<<jXF?(gTa z`hWV)f)(|%no52wU8vivbdI6<GK0@s{z)!&47(1UeH(AzDdOtt;<6@kvznIHt3$2a zD_5=zT6yLAb#rCq#Vb~<_<QEUg$w^;H5nG{Kl$_%XmNdH<jq^RKu17aUl+S|>(={q zzjd85et&y=dYZ0v$qNCejMvxJf{wvyWM-F=mj3?kZgzI|=@5o_R;5}N78Q?<bl&=_ z^<dYf<80!OU(IQpaI1d8iTK^0n)&a`s&xKo%zt@lDX4swf9{y~{M_8^YinK_bR^E$ zyZ7&fh0fAaQe0eIR#)cnN}K7Zs<PHiU{~KE5#C?Q_hCs;W>}b5|MAaXzdkM6sp7dR zL`!e_>JY7&oM&?R+82jt?TpcL6tL(kwwSYRo0-{c-$^RdPhUMY{S!ZQ382Sr-pVgq zxAv`Tc92(S;b`LE;yQKa%$uLVUESRaA7x)?a)|GLncA@YZxS2Buf}avZ(qmv*D!qH znSIu-_?gf7=kIT9WL{Lm(6Fw-L7qqH@1EXucDZHT4RXbWg_?SLa%MR<l+)#`N?x2b zzyGFPm64&r4b&u^{?GHRvywc+-A9ieO`0@mQ}Xe?cHbFBsb0RmzWm=WF)=hSI`OZb z_-j_&v;tnI+VHLXqCa;rWqol>H=4O-#R?5&<>Z^2QaKi$oo(JPVR-2HarRTC49r<y zzM}MDwwT<Wz#jGbg&4;dM{|XF%&|@RJhscGGs;bQ*Wl>e9Qr$8B7Z|&M|XF2eYlPo z|CzOO85tf-RJg$2e0OsATW420hF>aLT3QMU4LkRiyu5UAvHRx=o40zL3>V7ne!tm# z;)F+&f`C)f#)_AhmL_eCxZQn8!uHREMeAQaRkvpNx-Cmy>r<)tly?n!CsT}^ot?kl zb#CW7Xu89J*Q@+Xe}qn1Y3bID8&|Gc<;0;Ixk<&yC<tW2i5JWt4m@7=O>rWBL!1y- z>umG<w7lClZs<g9@!0*Ek>QJ`xcGEc?`Z~sc1{_mr|I5`?N4)Dz<*%>mkl5b880Mf zUtgD+mveg?Z`}dL3)Qb4*xA^`oR7+JT)^+(es?+8;CsSctq&hQ<XC7~{4Aqdm!ZM# z`J+dN{+!6awZ-#x_C*7ZFN`murmw8^c*1Ppab~9R@%#7VHAJ$i6&V`-ZAd!G)e?}9 zuwa|`qC|lg%pU^Y2LBEU6;%1eC}E?dq$H*jvEXee1H-SAGYpfzeA;WfM1`@UrSfyS z|7^R|tEcn-eDCfSc*MNGk;U=I(PPh_ie^+R#xC~E`L18Rb#Is6hMQ|#yTxC{yD&9~ z?cA~B#nbBQ7a~7zEZF<(0n7jQzu0eOXHE1``~B#%{(p;_E2nd(v`0_aHhppO5?$Vp zCzspqx%2P$ecykK|8B*dd%*P8wAxo~vaD^<o6qOB--xu%tk#WPEZD2)b9?m*r_Ea~ zp1k?+@7L_ZhmP64D^@J4%n|s&>-XXRx_X5R*Qe!guigIp`QPNW^JSa9U-%YP65%{q zW%+|?JCtnA_1$l0OS&jrc+cAD^6B7j`PiK@rgcyLDC*Ve%vt(Y^rc*6c5&3XuT7J# z^xOZ-IO=`6`kzZjteiAUO|$Ty{jcRYzHDt$;OJjycUnB>$~UJkE<T6i=jYZg7q7It zU@h?C`yp@bu#cYR+1~EC`Yz8Wib%@VKWUHO_v)v6Wr3j{14F|<VR7mAPtCk;uf8BP zYuQrWUMZUdj{{TI@4vO|AT!f~NTZo=PCeD=_+;ADy1D7^vbyhg`{voR>K$WcV7O2p zwyq}i;+gNi9-T;?+8SBe310CW{WM7ITv72i?r*bih(CYzCN6Q)4wLAWS;AaBOLTjc zlDj81K6GM!{H^%i^ry#E<`@V@o}0NXDEPUkltg&=6>k+GZ*Om3Sz!j=Umx3JFCUtB z`J2|4_LV0-{g4kdnz^QZ`eSF&{S4n=YXRKk85kVwCwi!~F>&j)ufKVCl1kyDL;jgJ z&DHznndknQbTc@<uIyX=v7QPm)7Ncj{#SU{D<00ArRJG*YKQA(b-mRqb!|&C%iAr_ z@y&B<TlURND(~LY=avtj#HX87`!JZKUSAjgCbvDKTC^(l&xxPz{W7l~rf_^=WMKFr zJk!T*g-5TvnbtS|$n4K&PM)reX{@?%@0jj^-SOJjrDv&>U0cVY$QW;N<fy+^_6wWk z%eGy)=XTh!f8xTGY5W`wY&RpV4_@6qD>XB({@tIQa(-=>WEmJ3tk$?*6RH3HXH(^S z!*I`S=1K`h#mx$xlRn+i^6cE&dRQRce%7+r(yP0@HvQS-_FR1V#)4`6$33QcY3iL` zxk7K-#-eWpyhjXtR%U5yo?onS>C_=bW%arp_mA)`wUE7XWm>PC9W!V;ZJ~woh4MYW z7Jgc_==RF+2#eLAnX5Z-m)A2gFqH5z)q<U}XqSXyN?z9Q4V-6ndDYMTw<!MfX<}or z^8a7URxMM>xbb7R<i(HW=dNFwcI{d?7jI9kjoZJ<yyrIr{bx%=&$IY{dCtq#HFunk zEVT^JmrMNgbn92qd+!wQvi!>Ra!uaca`su;9q$$EbW2M=@p8^MWD^oJPkpNCxmmx8 z{OTqx+1GTmY5yLEhB~ID)(i{`B@y1)!cHBF<f8;jj6Y79+PZjZEA#B5a_`Jvmc0^X zZoK&8f+dHddiD9I=W8V7wn-?O<Q@`AXFty{e<P#a<0DHgITZP~JD8{6U-s-)>gW5> zTT3>dxUpw;s>iESJiIP7^Bz1oI)Cn4TX(iL<M{?#PDL+z-2Zz=`-aGzOz-Anuge%1 z7D!JBXJBAha9HQ;8$qY7rJ`c>>R&^(p1!@JEqe8+?xthQm+y%Pi#+l4!=j}BPYQOZ zc<!?LrO;x)<IZ7uYo~IHPmivE6PN4jsk7Y;TC!eix3DQa3y^5DzOnPMM4pC7>HeNs zw~Vy8-Mx!{e_Z@*-p)<wU%BJCemJ!R_|;9C+RD6H&^_zg*$o$N)_!$jU~o{MaFHG4 znw&Lre0p>zUs|{7yTPM^9m&q~wrww*d`fDqj*Q2o4JPF?jNZ-sxUg8Qccy*$G3{5+ zjUL)Lt=OUR`^C)n$6H-m+I7pyK4jJZIk)tG?5dU8n>Q6WaP;zaKKR@^eVx0}V^z`0 zXUohu7OvUj(iGz8CeLtTzQP5ty%ss|=Db{eWT~Zj{``d*tNuFs^t^lYVs8ALTUz;v zY@AN50*f-e{^~oe*kN+}#tEMT;##3yzf->pRDGD&xJ+}_uj_`lz0Y^9&R&s}7arC< z(_#MEr1LYkY3aUBiwo3p^0;+L!N|z}bf2(PhX|MC^wZgsu4R8=WngG%Z*q`lU}(rI zF8vbs_t5mCs*%<If8>|^>HIS1$L*Ej-0#zQN<X@D_{!LxKXat2{K>Iy!*)Fvd5?2@ z^d@^JPd=yA@@Uez(2#CHr+4cZuTGlu*L}Z-&(5UOhY^9XF;Nre$Il6inN+*q=6l(z zspr&}X8t<WYcDk`D@5z*+9%$rp{=S<D@{wEawt|yZ@+lZ|8HqwcwXYBg#jXy3l0Tn z7#W%^7t|6-mvA=sVQ{EFcx8TRlU$OQ?$*6r7o_jk|F3m%X_+0JU$(mOfBE0dB`+@> zZs$K-pItB1eROl0PUMd-(zPWuQ@u1-t`88*RZ=dVIC1B$S8dB)9!u+7v-Re!OPz<G z1&O!@v2-6@rU4#67If;`7Pd4fF(<`s5=+}d5#Ng@t;rT`4^=!1Ebg3JzF33ncwyHv zkEVo;H&k2`B+kk7F4B;?XySWW<Y>~yLYd{6vlK#N<(_kznt0Z@cZKc!H0fABk5%%% zl@GqVop0@(CuNtmla1eF0*h~8?Z?Gm43>(rsvQ$^Yg7AMcI=(0iRURP;XYaGTa!-~ z80tyrXms7$o<D!{=HmBEwG0Oi9Di8wc1^5Rf3ifH)+Qs-NW=0%nd60eP8{ifKW{Xf zpMK!Eq(aM#Z__Jw`|p`~a_&QmK7m7qGS3UFeUjyzI2P_N=Q?Dt#@<<&;mg&huP3f8 z%51N3tWEB{aA3yqs~^_g=08`VT=Z#1E3^8AdL4lm%?Fu|f1EN!BzHX%k3wW*q?wu7 ztvFDMIc`vQMP|~Q8-CxXJI~*<@6T#Gt}lX4E7HZE@;eB;VE*fJ`Ae^~`J_pcSeOp( zD16Ms#FUklwP^9;y?gdBF)?XrX)Rj3*u6(0FfwxHj2RZ0mzGRac27%5nPXpn@Az?b zC8b5}wPp?Pgu0KueED*=dH%I;PN3pyp=Z?mNtJWYKKoJC@=Q#Pzwo26`PP#sJRLY9 zBX4x~oSBh1)%1II*6CYQJ}vq^Q=;v6MN7dAS$nI~r*^-6^ddH3&bpA3wRhZ&tnWX4 za=)<n+tWf;j)jjV<pc|BFT0$#b;%ZoIp>~!x*N+pL$F0)(aS@>C8wHx-`mC#J;S!7 zdLJW)-Z9o+FQ>=X?X3Fx%KH5tVIiSSwZF?+K-Zdvt&N&Gablx@RmqDBU834%IX47^ zg`ERKA|h@qpI^7D{(oI?@a5Fg)BgVZ{odAI&{3fFt7*f&BQ@b`;`T<}=4NDgVKdX` z+s*X(CsT}a^<C<>Y%!Cy*%z9UbMEn{@^|&~4?i=STH0k6nU?32mba*CSyx7O-pb<! zG3zF5J+*Yj>ecG!;(x!5xl%VN#PgL_-LJok#Uh2BUL>7ye8%Ra@$cQwPpgz#0s=j+ zo%FVko^ku4$=}}_*IyA9nxro_HRbeE-Rk~7;VXl_d<<XjIpHGvua}>mp3ck56LIa8 zu?$iXQf!H<|NHgs?sDV)b<x}3waeGduqb>qJAYrNfK|nZ2Y-Km|Nj1dzd%=a_wJIH zmp(o1-&f?JHaYk9HeSUog^!Qz`|acqFVKDTe*OQylT^KRbal7x6=P`N6Yf5`|Np<= zpzx{uoVGAv#oMPZ`X5coF@K)uxbLx`Q{>LhbA54cPQon#85c}kqgMxAT{iD!%Jame zl)~5Vj$S-yyvs6S!uyKy>kKUcvxDl?|K2)s@$;@ZVR4};IT_Dhy*T^yLwjYL6i3fL zyYAmRCT<pRy7_baYSpD@;;O9}nQ9lzkE{FnG<{xW+WUKZA3l7jzyHss<;&HbI*ul- zRNrtjM_gR|*|zD^!++oI?Cg}~|DK<;vEui)x1de?PAir!UCKX=|Cd)x%pHFFKLtNN zB(_|T&i@knUYwz!PPqH%$B!R>e|x*T>Z_LVqZcnEBqdkg4dwMwxjOs&-nBY1d1~|W z@-ioEH8VH6ZW#FQ@D|OdF?#ENGe^z3ZEQYAb`RH4N&eYlLIQDtv3uS=-(GXa*^S+P zDc_g3IdWS*ZZO!K9s1(Z{aTJMjdimui_?64eM3U7fU?lpS)q}UnQ3X?Hk^E`{b~2g zbN2QB{w(#L-X~`p75X)yTgKjgf9UG4%z~Q>{9WDMjsKU=HqWnn*eZVI{ksOg)ho51 zZ?JsTXT>}%<k|@q?X^WKt*RKTvaYTQeI+pe<0bD4_qJp!Gadi-C^GCB-!iqZ<LBN! zDf+=Zzi#fzCG|7reX&wK$^PD)!%6djv{H*jj^5^4Ij0rAn(28TDw~dOzBg&B+48iz zcVvIQ?Cv(ZaeK$YvfUZ4WnyE^8Sei6@wmU$>EWB3o9qAoEl*BPPMe_O`E}_p*}UMl zX8YgNSlS=Hc=6($J9kcHEjTXxAW_YCR>_MC3#Uz+)+=r9G-bW{q@eZFraaHA7UfV} z5~BG^dbM@`Y0*uGmv1|M&+hOY+p>4ZS8sG**`B|Hn{A(V__`G#tG;~s0_v_QZ``=i z<OSFK`>{R$416!`+V$(y&C6kSwy8T?XU2Y?%vzJUc}v{72`5E2-THM(@A(t)<%%s+ zv|O{Uon5F`$D!z5{CiTDO-n$mbEs>mp|P&v)1uWeS|$c^wvRNky^l}3wrt+|ol!wm z`*pToZ?0uA`sH9ByR*o3Wk{c_wV9e)+UaS!X=!Qpf4>9=240+~>~3Rgn}2s#Xk=vN zg9D8G{QX<DY}sA@e%kcu{qpv9Ha0SfQy>>?J)d8{@37(DKOkV1cjrXN^ZH*emrF`Y za&mG8Oy_La#@k^Qc~bIv_N!BA{<S;*DtJyje(r5av7DJ&g_`lEif^}%pZ{C%)9p!5 z=lRU!nGVJ`a<<K%AD@!)WSVZY-LDsmugBNh>gxL5?!F|?#^lU%T>rR>(2`XfcV4@9 zEcajV>S$5j{qnz8xnA?QT+(P!dv%g;jv2dRii*ic8L2;i?``Ese3;n1`%PD{s^-s+ z+xb&JrN#FLoL4+7=p^iZzTal2?skKjt()KE-qGlC;n-O4?cE9AWlE>hGWTw7p1#}L z;rw-(*(KZdZLGR_$#<{x8|4i*pC>oV29-7it=v=oKF-^_d;NO-V#9SYde1?_E0;`s z14W9Z4;xHUxtU{TeB$xP5G~QZ$1IK?D*kKzc>U);pZH^@4?9eD80Q6ghDD|}Hov_v z=Z`htHfN@qV~Q=Wq*s6LzRXhNoc~?$l~{G}*{!UPN@NbV@A%Q(bLQ5Ru0y{i?cOP# zSuFWoXipp4b@MRcmQ{OJT{wBp*;T_^`&08@bz|F|-QJr{ui`rEyJqhl_XiSwlU%~$ z7G1yapqjNj`l+ttVYLrCYPyyg6$uq_zYh|5`c^I}FY9rFb&F+PRN0-qP1fCMd#~=( z+2FhKMs3F9Gn%LG&Z(LIXKBOS!rzw<mmL%BK00mMv<cr|t|_;E9M@s@;L(e>wk0f1 z9g9}v*VTQt*WUlMNbZ)}{ADl0T)F3KCz$Pd{h)sLy@;JDlN<DxXq<9LSRtqG>9lTw zB$ul!pK5mQvqIMX-G^lzg+yFSB2vz?SM!w}V`V7Z8B<^X|C=&XBg5a{RWZ-Z+7D;i z_wKx1ck3`ms}sjZ#tU7ySB7u?Eac2|xR`q~_mNDWkh#%Qgi1eWcqCMKR_6VgTdZ&Y zTeJP}S<M~7qQ9SW{6Bg2(ytv$iqGptv<s9e{%WwgU|(C=Kl}5BJ&UefIU~KedA?P_ zpVtiY3yms^!{Q!&NEBXoRCe_mL4J9&k8uz09{N3V^Rj&|6OMFp@BXv*_>HKYVpCJP zP8ZFa`&YgtV0DbvWbeut$JH@eIT@?sUd`RIV&&ucZwo&1_n+qHo;$bTdy^Yet$~1p z>4LPG64Cd3Y;<!o9XPc0&VG|I+VgvZ#9@Pni}h*~rAoFPPughh^7G6>EB<dRvyZyX zy_fc-W<$Tj0)7SthvRql)c)G~e7^u!PmQh9`{{R+y&5sMhV^jFDEjtlpSXDL29wRs z9ISlO`bOI_vev!+G$YQrx%sbp?4CLUosu%Yx}aF+Q19&Epr|YLVRfe;bJ?`>{C{`- z{|QkenRLY#H#WcG4YH3cQ-1jGulKlY()Vz2bGpZ?Q#os6otO^YmfyB*;h}?N8P6|Q z?qH4Wv0U+UIvc}Y1FMQ-0pb6%JUM+Y3%j4+yse;S(&Dr8er>vtFd>eSztN6?fg$#i z)^w#=Vd?LET&8g>RLh*(6<`!-=XB!i&GmaWE!elP>+rM4f3>RfuipRrbyrG4LQA3q zcRKeEC!XViPNrK^RXpF=?`oZSVOfZY+4Wg7Ba~a-<irR%EmQLDQsN9cI)!tq=2O{8 zeJY*`Ee|WiYxP+`d$7DhrKf-H*w(<n<2Nm>Y+C;=p6%^37X3NM3GNT?YB~LIyXI3B z*G&atP97JpbqPEwsPJ0aq{6w(X}U^i%({l-q9;UyzWT7WpH<~hEuO8w`Sq=ye@gPp zFPApY-y)wAtYyG+*igps>8-a}MON{9jwWq1Y`HasYuTOu_m5B99Ff!UiIJg}>sB@s z1H%Q?9JAxcPFd={Rs-!Hn)b3=T|~n2#!mI6uHYiQ=-AhVdjH(omR%F`GtZlwl2!dq zRBf_IW<o-Xq7Qf@(Yf8e_Iud3Z*5I3_I9oe6?E!Y_EO8!^E<aNVkglG{cBq`7itTX zU+h^LFz4ZoP)~jah75re&=ALq8Ozo8|2Y2gt!HMS6Z2z5y*ieaP8?_F{yQ~4y*%ZP zcg93hHs09>ww#Ll@a6UK^Z#c|lkI-2<85p$&aQ8FKH=Ds=X~>i%wM{5Z|h9i>4z7~ zZ7OAJKOAdN{PkqFy|m=4lcGWC?C)O+Pb=HJ%3=OTcK@2W^Mun=GJgGO;%BK*bjoP? z|77-d|7u>@i~oXIn^f}d*$K;S^O&s9#lTR)G*?Mpddqd05F;=U(~UavupnbrUw1cX zTid0jcmHl=XRzsEyPX|mq8fg}>dVaqnNhbc9eB=dJ>|%jQ_%%;jz0gpxzK-hkYk{V zaCdqCvdo!#W}Y`quqrF>SKwS4ba7w3ylb$#e|>&lnlxzBes%kz6`KQpYjn*r&P_Fs zF8nUD<@y_c{_ORfa?8r!nmU@xt=_9P<sHKX+5G(XTeGiQSy?HyFflP5>y<W7J0p>+ z&&AMC!1Ml&FaKeKWaZ80THmuV9sU+*=hSih>35Y=>3x|Q3a>!ZoJpH+yj@(AHn%u^ zPgHPp)wfr6X-_W1-=Cl&D7eo_Ina)Qp@iA1oZ$uE?6dc_<=)<udRoBgOy2VgI+6?@ zB7WE$ytFfW=4vJZr_1U(TQ?P4csGfGp_wJ+3u8r#Yq!|V8#fHLZ_l~8=<ZPlh7!TH z#8(gG7S%8~>~D0CZ*Wi8d{f#i$AP1@z1`VLo`HdZVHXoqErXn{k`j~RmZYOxx%w;& zprm>Bl3T8RVn8!UQ?k&{0!cjv28It2JS{d$y%xR=eKB>*n;YBj*R5`!tayQaf%^la z7zQ?lnK9sYh5!1M+UwV@zw)4}%IVrIpCA>d6}~GKI702`%Qn<~yLwIcW4Rt^b9VER z6O&e**|4F|b`F1RIh%N=%crZ;@{5X!w(J$S>pbDe8OhCC_j27$&dl8TZSVHK%zw7- z6<9ETRo1)vJ4%a=KI*Uj{$<IP)oRDY#M1n;%R=v-IJa9?w!Y@$oBt6rZia=3$M5*| zd(ZN?&0CA!ZD(b;a9+(vCO&9u*OIjD_l^0!L{+9f%wE6u(&wK7FZj8@gUsvyKTr-j z`RVf<fmhtO4V&sNT~LYq{!N@!b)|g$pNor*a<?9mE7fCvU}%$Q{;TdyYJAKj*|`Oe zezM9-NY7MkiILsA+&7}=$CGVO&)1~nWnHd+&9I<;@3&jp%lqXyzs=6l+H~bxREdP= z#HUkR)%E@bY+JtM`S~V?`hXk%-u|C!FKKW2#Z|9;{oAb#2akrNSgKWoWn4J3I^C%5 zXJxrl(wc4IEG5yEp@E*2^Cm7_xjUPo|Mvs&SzDGGE`Pw+fBO4px#naGrw*0QIZf8Q zzCz;c`tH`{X;QAitVdsN{VEzJ*5^E@z4XTVRa+J{oK3qOwX>x1-kLow$<CX#JUi!K zfAM9Gg?BM~xO;v}Ky9+`!@oRD0XuiIMa;OV)S|VjJJMqIvXzG>`LNGkc#d!0tIhL! zZ*BkZ(tM`Ie8Ve8>mR-Nxm@pU-OHQ)Ccm8+4GPv&*T4PpGI;;*yyGA37cFbGO;5>K z^;Y!dye)5TOj>p3dR+C=9RHKaOV21=xL(iV_~zEv)0-^i4=zu0h>oy0eOT8ZevXP* z_roCe3)$hx{nNsp@PFpf6<B`XYu|>XkLnx?r%gM?eR03Fb;VKDx!IYyQr3?$yB5{i z@4I^K)X}2{UniYecws^2zkA6XlPoG~R(GB_b?ubpzjHg83V-!<p1$IKZpZWqQ_8;H zy!qbd&6WDtKb9sLRjH+gUeCU6xNvj1{{LUsyzgs-c3lpy`}$eRdD2?;zWi9D=d#k; z&wHvlMMGVeDQR;T?>@YIU+lj#?mnr0g`U$+oY+%5)$hTEj~hMHPp|HJlY8gavs7k> z-+!3@e1CUack;=)dt0sT6yt86zGx`+Obj%N|Ge}k=*)%xkCGnS#yYWAPVv9Ir7Pp| za(<I3tG1afz2lK_>8#AGWzw@%)s9WOA$-j&;{?ZkN$Y>_m*?Kzo>i^rpdNbl&iOs% zug{8a-*j`%1cs2{=wpAPCTmAM^NBzDnCpj4^Ore0HY(3Mr|Wafa8BoA-7|0c=Kel- zzxvGFEgH@XPu_XCTEI!M@!{L`2YtPE&zf9cesfRht9}lv!vbb@C1pWTQ?@KUSpA}d z`+A+ahiJcc#J&&C&z^U?y@-1lE3KX0@(*-;Q{JOfQVezJCa<RH-kwzbes6=X`Ce9z zl>!_qcWdsRt)qE+v*PTO^2r+_gT8y033G6&2q*{$8Qc|l%%u0=UiY2cliO5QPoMeo zpM-$ZwBC)3$rbx2Pd1j@TUqRW?Az7Z=HD4-pWT~(a<fF+$?Ds)qqJr`iMw}O?uoqV zj&zyB%FdH-@0JQ!)PLt=i_^o^`>TJ3R#fg`-r2pt<^Q?w&+Ye`)xQef{%=p$zP?MV z=Cn%o_dL20Tv>g2k~q)&qkS=@wHH_J+52zb!|%FvYz$em^)_+(MFjleeOVI|v*wIl zS=#YGGgn`lEY5RvS^U*vrSx*|>a*|X|3AOBCs*R$r2}iLx8>CQpU=`*_gUfk+O@0g zR1Bsm+&D9R+t*Z8xw;s>`8O{}Z(+EgI{oXn@_+Ad^D;PGzS0oJ$&fp@bmBtIGl~{% z)s?@DZ>x&l{G0WY*}LA<XBs~P%fW|5KXm3iC~ReDNVH%GFbR#U-nVaOiNkIC1uyye z{ZgdZf3z9j+<)b;fBqFC>#uCRrv>(3z7wOG<$GV_zBr5HgoO+3x0l=PeHYfBa=QBV z=JWqkHqMw8wc2gs3+bL+cNY1`q@SHxw*T+HJlE{)dsJ2J9#>iS^!jAKTwyp<|LVuJ z`C1Q)eh6D#^zWTNH@d*!fO*mkGr6SqJ5H2L+Hz0r@Xwwd9g=U~zRmc?XT%l57r#85 z|6c#YzS2dOGI3dl=KM64mn->k;KAYAz0P5Jb!Er@`3Cvh=X*XVZ7osz?|#+c{hgQm zyLRoE9{RlOWVBvuODx~Xcgy{sJX#m@-RiCT;?S;G)$65MERGW<I+T8SU$btJw6UID z5mRHv(?{{=Jmgc4?s~Lovf;zY-CmnLE@kbv-~Xc^`?v;oTKv!5+#8Y}UhYm?FBxmU zowNJsnv0sb%Cnqb25w>f(Q<#*1h<a!#ggv@CUk1)SS(z;dgI2WG7M|Nykmn;2Iwj` z37^jX#Oo%@Fhh4)T&g(35qE#<`j0b$)-p6OuHCeDb7STkU0$v)-4Qm`XV3kWf5kKF zHJ9hLIAPgouN1!>GFY=|UBZuJb@vv2-4rxyne4aACU<WH<y9w1I0`&rb5j0wqW8H{ zf%MmnDw%I5ot~y&@v2!rZdIO!U&p+x>dvD|J7nyP4eS@Z%+6XnXO7AI1VOjS`<Cu) zJN&Gb?I>fz(WGfx!^^*!{H|biZ(U~5lRjH_*|k2aE~UkXg4QhAy26C}c%(%eGn<HO zE9-IZJGJcJ6Rb~p3kAf@HP<X$7x17;HLdH-tBEJ8Zwn<Y6Q4ephp*$~XTGbFCce6& zUR!O9Oj>6yv|bQ;>ei}1dk&jeg}R43dnCj(<X7}BTDxzj%d402qSLatx31m1aPxA` z!y7s#r0{RN{-E6R-t~97yiBw7G%WAkyISymQT!%OKF^8br~FUfT6J{Yq?Q?(`{ESu zc1?RZ`TfhVEn?H>a((Le>X~`(;@vBE!c4VmSs7mN&YHZl`u)uRKVtv=VKWNc!Eq;S zeNE>7iTV~f>n<+w?mOMV<6Cy?(sAvIYg4NC|9HpiUoO9OS^l>xzg6Dtdw7s@^RhKR zKJ7M-ag}3RocHq1@i+XQzB4Yb&A40qVDfSKU&7s{m-hE;z7#HFv2W=bHUH)E8~)FI zFlE2L1$X*Y)7T!q`6>JNFIza{^t0cU?R_7Xa5O0>w+q!i`4$u!FCjcp?LoIt@-p!l zn>6n)+0yzZTSGP#Ov_qeZkOfdU7efwvUAFhn=IWK6Q;_Z|7WLJrZ)M-`;&jppV{&> zDg5O==lS=yKe@T%M9J@eskv9x&%OKfowuLM+fZUl)Z8quS4m>sC#-g_-nrJwFm2am zxfzRRbS3QlJ9p#6m*48Ih}Ozlva;`bvgz5jRrmhsnH^N+IJcAAJ?N3ql&qi6Wb3Pc z&g^&5d-Unmo;7!DFFu^S$A+0hY-8#5`{}+rujiOmRsDEp`{n1RpZ*4$C-u#}`SRtv z$@4aC*t<FL^}7A~@jpt=T+L);_@WV2yX4?=Jvm<9p7Z*4msF>-{&4$Klk<5_CjSw4 z-@oUt+561iBEs-w@7uJ^fvbZ(ZEEzxQg(OQXl0!%EipIhtV{NG-M@-G_2&r|At8a! zm-NjuOSBlzx6WK6FE>X(Zq9){uiguP`;%OszD-^IoUiYUwU>E0TG#z}DqR&EB<AZk zYyH)gu6jvn&p)yH-?EA~N|*JFV%(7bZO`k1d+OnTpZf3rDZ{YLKkn3<%BMH`85E36 zes16YWBa`YTT3|@yr0=*SsNsu+Pf{6=Wv)#P1W~C|Gi5cw{=?Cc5PE$zQ6X%zx#JP zwzE4591-;TGVwNt@8zjmpNFrl5M;O%ELQvRZkt{ux3P?ztli30`!2X@#7+6g!SLgE zi}<v834LB2^TJZgFV}pWvsI}4enQ8)7kN{*hFYuq3QW}WT`PJfm(gtY<Y{{jTs^vX z-O43<p54*EzVG03&bi+X$XvY;^KJI>dzW9E#^~MO=P#cb;8o-1oBZ)mkEv7R>U#?m zBaR%3T+Lb&IH5ko_3h4W>wfJx@nz=A)7)Nt?JP%pd}DbSQm^h@)p(D6njJqw?%c1u zn>J1P(X;Jb+o@fj_3b|^wk10L3w){B%_sL?>sH=|`4`t_gz|sUoBLa$@3B*3N2_qD zud33*8_sX8uAlU|!f9f6ME->ryi#)E0>Xwn9m9?#ZEX6x*pMgq%U0vLS4>2XyZP<g zc;As_r&^Qkvh&j<+IIG>;V|!es3d;8vs-7*)3oqo|5kmo=zA<PYgxEnUD}h68#vDe z$nuFjklt8wFZuqP%I_1W>i_g;o)x9dFZ2J^zoqA^z1P3L$-thrSuo+t_dr3Goy`kf z<ahRNDL2h1IhB0VdZvCW)AgoFkH1^~UfdmT%a?1<dOzcey!~!&<`-|@i&)KeNy$F* zn5!bjaXw#h3O8&mz^3Z=3(tq?{ae~^k}*ThfQSD>_YuQ8t}oX3%ZTsxnz{e`I=y!y zzM<E}OG`|JSZ*g78W*?D+;DXIb=D~rKRRRe^LPK=R&LJZ;9b4-glmrXYiH(U|7Y(4 zvwz9RU3ne0CB-MQ^Rb0%u+&<wS1+drS4@z!)>&&MEhE6paJMT=-!s7@L5Jas=I)uN zYT25n%~ZX=ep0x(h~=3$hY7QFRa8<OmMds}+O~IUOX3aR*geL2Mt84kyBrW_Y*@bg zeevsiX~)EmE!y+#jr{$8Z`@qk6;8}$v+e1=<HqIXw<hxEDcjF->HngQ(qk)2=heM9 z{#c_c#mwW?rR3db*M{!quQAfDJ$k6eeMU`rh1%wazvtWe_|7=%b4zkx`@_@MZ|tv9 ztFO-tJ-6s)_OtUf6(^FUzU{r4o4rNrw%PQ<#|?Z=?9Y0q?|ZrS?_Hm(3%;Fe`!K=9 z?BLX`p}#$ve}~%YzBN7g?;^v6wHdu!yF+|7IEGCVvF2v@;-)(}aZ1?Sub=s3ZSHj{ znBRWAe*ZNMZTa^a$0qNdJw@~BOSMlD)zk8~N$mbTD?nA7#c_^Pr(MzJ01?;AQ`R17 zxtVlE-!5t6jP|VcQZGzre)+aCJtsxVaRaya<{A2hJmxdMoH1)Z%i5r~lZW9~Xi;Re zDX$5G$@b8lT{b^#7T!$C$z0F4qoi!svW%{x8_P7Z?mzs`^<$B%WH!TrBt!A3b7egF zn=gvEUJj4T&0GCt5=(-_wdHT#1(z|t)#+KypZKkv<=9HoTG_k4XU^&E)UnIbntgWX zuil^yH)X`S7i7FjO8wRpx!N>Jwf$^pcGcBcb=_AVsd9#_61D9LGoPr=aN^b~XXeK< z+N*foWIZRE@*WjiZE0qdyW+ItgxTp|mHD5Gy_bKl@lHludy{$ozob2jcYJ<Xvg^*B znA_9CR+k>{leL<gC*$liVPeAGpU-ALmOae!`C4?o?;7*m*VEo6HfnDFu|#!hdiQC+ zZ(6(0q%qGvE4tfD<nLU2xqmixSzVWJiR8}ZovFSp%475D?)LT@zk}38Z?2Wys{8h8 zo|1ol=7gzR=2>pvzjCRKiN-<K7uRmyom2m?pg3F9Gt!_Tud@5d-S9^br-x6uc_nC} z`74W@IPdD-`Q<D2Z2#-@GjnN_UQuB<@0VNKPG^163!Br)H~-4ojLZpBMW@Jcf9d}4 znNN0AdtE4h-{XJHTw!I}QRk=2ynmIc7LikKuCLdgZX~_={NF38(+hVt#id?v*mnQE z`kp19a(t6FPTf-B%`_`Y+k17<ma45cd|xSk%X+(Fb?z>OC*6w<1r^LGH7f5vadfZ$ z&8xQpw`Y8dYIm8xXys?|eyv|tyPxU?2T$LzYlrmNwm*-Y-zB~Ou|iY5_&djsMJq0d zxW>B&W=`|E>@6^7%aWgGc-!Mr!y`k_Ejdz|dUdDq<*=SwlaEzjziiWuv<ud8D;Ihf zC&RaV^JeSUPXz7X2RswDHnLK24ZAXDb&kdF_22IwX4h3~xDz46_xybQzt6Yx_usvI znVBKJ?&s2@Ns+tD-c}rMRk+^3yY6K-5C37c8?&bw)?Pd$=^wZIE^q3#83l7%A6vKv zI$ZXt<>^|~_A5Ij^;+qo%wI*x3>zZOSah>8h`4Uz<YSQNv64AHGt@wHmehqW#g;X8 z{u!!kE!u)jj)vSenccfiiGR|TBniKZBEG>EZOm<k!L@I;8}b}4oU<%*)*_8rNgFxD z&PlCe=Q-?o>D7cXW(LowOa__5o~KS7;(R7$8YSwu;it{Qt62y2<~K>U9cR#(b*OOK z+baFJ9ZEB^ufMuddn&Jd<MjZ3*-1;TCS1BX-EeEf8J~o0ybKp!vhRptObpkauq<=+ z)kRlV^UwX0c9(ho{(JeaZ%hq+p8M-ff5t4vqHj6p_TRgGCE&hI@+Gf}C*;<-=A21O zPR{mp&OZ5i{r+!1gkN6>y1c#3M~$0zZxHL&ojWD}YB}fCzu3-P6num2Rl&8XXX<7c zsvnAcm=%2}t2*y|9gEcQg4<uppB2ay?D*56%dp{1nbnua8+aue?oL1arQva3<i52t z53k;4>9Os+?g6Ige7^IFaaI?fen0N|;@Ovp@xQ<Eb&KA(r~Ui9Vsrky1c_s5#d=fb z&zf4NuW;hW$rCfCPBiphetGZjcgJSU`ty<RxaI1rRn^Zf2>GA<E&tzC(=u}p^UmEZ zEiG$ecb7dsH<w`p<i0H7LvMd*^EghJ{qVT*|LA=WJevdcAM9phcj+&;;9zoE_(A@E zMfIM=1${H$nr(b{U&;Ko_4_@CRertS^Z8uG@g@c3CZSrEozW~mT~pI)g+-?s<zAZf zv5(bJAmtG!C+EkH9}~@vS&Okq3Ql>UeBy3W(WN~nJwG3_=3;T2z?t*))z!zcOieND zQ(h>8uU+jqF-i4BpN7#y&?RC5ERGYbC-|tne(@q>MgE?~TD}Z6h6l6PZ@+uMPFd;j z-@kt^mMA<)bLg}y`n_pV*sMit(>L$Y6Y(`Yb;_Cf@w$-xJI_hXiq<~dESw)V^OasD zcmL_~^3S^(bp=@*-$k80dp5pqW9t2VwVTt<egDYy;oG;VRrfZ;&kizw+54(%;fu-g zb_Ls_@6DTB{pldPe9gC=@wdc3x=b(x752Za%F^2JEvT&c$^FgxcWBYV15+a%>Qpjj z{d;%3{{P#lfqnaCoN2quZuj%`FWtq~a}u{nY_-~&t7yP($;!UyP>|cCef@h>n-osO zp2*r-_v>Z-zWW=W|4fhj`+m7_veDlD{`#aEEe4xy&vq_*_RDm&eDvoRtM32%cJ%h< zE!sv87i|49;r8`6ncsD1z1{Kdf%yGggPFY7Z;J+N=5IMxq{DEa^^>t>D|`M0&0|tL zO$sMuSMJ<tX=u1}{qY?i=g)6%b?Ym)SS%<ewe#cr`QN`v2n$c1J$v?XYndm04R-oU zkJs;Ay>Qvbrscc+8~iIuoj>+$Nww&k9{!xUVfvB#zE2LCyq>iEMD=aoH0NM%*0zU* zfiKS#?c@t#-pjkmNapZi=Sexoqja9lI+nE7Z|W?A_DCLXhFQ_8Z|#=0J$lb@Vx~nK zf3d~k9K)+-aUH!L$!UyRORsG&HLdVwI@Ba&z+*hKw^#RR;l!6dk3Y@&Go$0Aj#yya z-21lzy#qrsL)U>^mA_;2_l9-3doJ9*FDg0fjVfnC+1J%idUc<MtyVQMiG1|XI^^`P zXF;9q`o?GSjijYhQwsxw-9G0!2(ZlDVE6CEW7+#}>%Oo3FWhar?(VN|+Y0_|+TwZn z+M2pI7fV;iSN&Z2k&k`mjSC%iM(04SySaD79thvNd3Q_lfA)Fr?m1j$NHBS+mGxOW z>-_Dgs5Q$NbM4z6vMu(@ztFI`G-s7`*S@>o_g&3;`S$&-ZO>zuMxA?OKVxg?;^33F zR(+TI)pN7h=zIH~N6td!_iruho~gc1?q30efkdfw-5+z$sF^zdQ{M3}|MacU^3R<^ zXPP6U86EO3$k=VYd+p!z<mfYE!kgpMF9et@HP6ryn|#@P;esa>>o=WFGOgeG`hD(P zUWNoC={mc8lE))eGH>oHPu{*Kb;UH<yS=Qc>NCP;M{A$X`n2x7bc4c)t0G*kd3k!9 zYhPSYoatk>?xDi<u&}VQ4+l2({{Qob@5Cp`q>aaq)z{U1IIwZkrcEFFSfN3pm3=<l zCsI<_(9%ff>15sg-Tkvpy_r92*Nu!zv)>v$R@kqx(W7YHj}u=`de1F$4SI4=IC_56 z-|&^~@(fE<&Xg5THQ<h3rmoNNp|_)d)~A!<`<G`%rAuh&oUQsflYfUyUCECn{bu`f z3|?8t+<R~sG&Ye@`f9Fytwr{!t{WXD3@<{<riP@g|9@1iDM9`Cxj#=<-~X<0%i^4z z^Z~<~Ur&~H?JJ9aKjF)hR_DE(3mrciU!KOy(0=%|_Nkhbr`|Dq|4+96FUrjIYnXK` zNq&98a@}CzXLUdCN^_^JQ{pHKtxZfi(-T-LFTm31+|FnF_siv?pHuyRoSv?qZgy>b z{Qk_#Y9_hA%$8h!8MZ#^^TXfqz2yq#_g3rYM(oY<bxoE0)!yDCC3VsL*v$U$0N1yc zlW#`E&3*pzopnv}<eLW`7PMDwjlX$TZHLb+K8Cn?|F&^j*4;~Fc%b&_h~b?a!;{sw zJum(G`mX%n_qT2O<$unmn5|-~YPXuRWX<imihdQ{iHaxBc)y*?`_Jy-nG1G~8=9Gu zs;Z*b3z}8$Sl(`{XCE*9MEvUdSBwl@%e1o2zqS5zfBpA8#Ty^>_^p>*wRHB0!}rbi zEc@7WGb!usie5f%*=H^sO%_Wpzr40Cc6ZIsqTf3A@2StPdG!8$d|X^zH?#A)m!0bK zem!1Y|NJw{W7!kE$Deb~tNPRW_4UO!vMFCKq`RcdQ9XWEOT%(w?fdF^@AmQQ)Yknt zb}sF8%)zH0c-?qCC+f_3`e9ORp$`v(Mb5l_lNaLIW;eD=Uie~dKWCYI+{Z^J@7S{Y z=Rk%!3va|Ud!|><Rne8<o9|n&Cd_#Aaj&S{+t+!d88l|?s#(x_UYO~?%s=v>%zKNM z+rN1AC@yU7?b6Cu=N?RBm@v)6e*Fsp-{6Z6C%c8aia5SY<7!n>R7_kUa^FpFy1J@r z?f1Lo{dT`ztmWj{xvZI;|Iq>I-;1|L^-esUy4kX?-ul?xEt-;%()?4WPE}P^?Jd_i z(bD4fWny7iX!r|d-ntL-?w^_aZ^2u`n+rcw9%A&}e{hAdMCsnYv3%>hV(#o!b-elf z+hr5q%O$>#StlvY{q|UwQ|5w}^{&|r4a;8UxxO}N-yD&n@Bg2Dn%(`2mrLFq5@g`u z?3wy~Tlu#W3=8~k-n|wn|3X?(pu^yRNUbbGKxnwb?WNyq<^|ll?RUAPI-J>f>Ip~h zYF*#UBCev-=W=oTF)&0{`<6tkYQMpKc*Ch(O^H!V4iz4Yg4UkUw3#7gU;V>ez;VLC zYwKdG&+6PyySuBDtM$>cW6eEx-q-&>9&h{kl!W!k)2r@(`StK{wfECl=9}(W$8OAC z6Spxx`eFa=?y^7T@4LVI=l*=)^R9E(#*!beyrsj|#~B}6F=4kDIE`PqY`^@&gN2jt zPgt_m|E8&N?a?b&j#@RR-R6IvS*kT_nRH6(`E|9EC0B@X9=#|y+5YFNa)uj+dfeY+ zU1VTLkob1t)BQKLUm`O@`T905k*iZ=G|bsHd8J*B+4F^|`|s61saF!`Zw?fe5!jt_ zZm}Q#cG*KuKU}}}{nRtrd@tL-%1)Ey;{F|a$2@<>t{tmQYqiDxI%yQJHZ1)t_q*)= z?;!vB&UX3svrA8S%NqwhN~_=fK0fv8P9^d0$K`)b&Q-a0%=yjVr+xb+d!kmh|KH;2 z&5#iGtBd*g_9<7Ny!^uK^W1qW3xmvIb@g*=SLvrb`>4!eRAgQD=ESK}o9-(MaLlX! zS7~o=&vTfGiOEGNFf{b)^!U2S@N&)A=-p*+JB8JcDMvifGMcGlSZCC2y3A+UzD>J# zJAXaq{(W}OwN;b)_5|}vdM|PhpEz?%&~5wEPdRUVUqAcI<M>@WZ(X|a`|!1<ncR!r zWEJPDd-Tj-6QHr=lJuT1@gnmBbNcj^4j<US`E6OMPyCjGW0N1t9-Ux!|KD|W`G4IF z@0l2EySB~mtNnRr*Y@^I|I1tMt$14a<M5xN>(W~+&OIvpd3gS;O0DU~1ucBaC7%^^ zAMM#3apsO(*CMtpf0e|`f3LJt+dOg6iGwTmOx-f;tlKlAxtpSN)ixirTfRNwY*lmE z6QymonFb-=3>H;s?d><RXFRXX7f!ueIos~Ha@0%NoxU$hti-3UuG13NiTLpCc7Fbi z4G*83oP0*kZvOwH;_+{8ZGHXVp!Vv-l(aOx=xuMN9qZ!R^zy!ZQH0!?tl-7lo*p)S zcrmVc`q4hyd9}B@tfHpq@7s6bVez4x$y+767azY=T=~@1-2YFfx}1D;!-=~bzIPpu z&D_2EOTx8l+)tMmbMedBY&5m4Jow?QA&>AU*Teh|IezF}Kl5qkx)_$cX7#Q7#TK*A zZe04+qOUtvl~4HBPMLcTbmSR0#0(+R5M?Ls-efuM`{dz-r`B6cqI;_OYo|@!ynE-? zte``85`Vc1q-<EWOzpRRb5m2<+go4T?f)E{_LRBdV8V@ErP;Z;Yimz0cJIHpNMPc^ zr_Y|bwe)K?vN43t?^~9+^-{vd3BFrD9op>6;1IQPS=7&;#=W-~lfPY@wP#J$;)6+M zk=&c4``@n*(4MPv%VL31itLIx`<2Q*+-)#S`^g~iLjKQXfBXK8!cX3{EPJQ$IOprB zuWw^{y`~-tezQ62X!p8B)=RiPtv#r=W3tfmmtUBTFHP(J_|LTIPOHqS7k_@9ug}ZL zIdi%=rst5|d-*JWBfVo0Im<29N8U3Hn4_MZ{cgUU{i6r#gjUb=InR-u{qFRg*jtxZ z=B=8_?(VUv|JpRMExWv1>Kv0Io0ZI0=N)$czBwYi_s|xzZ;TDw=ii>OE}bK3BfGEf zl9enc-ZJ;TP=3sF{DZ>&6;F1|+&D2)<MjSGiMCd@V`?t`rB%|5juRf<Jb#R_;menj z_KCk2hJ=Jfti3i{Si~sE{@s1+V{&TeIlg`>oolE6s8c-M_1MoPXL(Y;wYzv-PHPQP z`T8L^IPFY-OijJh(bjLS-&N1V34K2BII}CyH^2Yb!qtph85uk#NhNzYpFC+>J-N#5 zT}}pvfTIA*PH#(_f~Rla#>U6nA4;C;rCMcCRCDymk-Ine3jds1BQ3^VTq<tBYCf~D z%3oicVM0ZB1WTTo<+PH|yaLP)<?Xl3R^*#So|jpfnfppQKuWH%Y*qY%-w{dOojV!* z1r^E_O&0Yla5UXnnv}fWYu>6=t7N{NnQ#AJ{{Ij6va)ac|9#bOPY#@B|1K#%^xbQN z*Y`4A=QRlM`|D4Cqr7#Sf4_|0#uxiq9u#y&t&~rm#?K(+e^R2_;hmobs5NmhWrt^I zkH@8``!P}XV{YBMYVqfsq0~>+nD<9lu~k`D&&tp7W^v59bm`KY{dczK$9s95>X9_g zsrH*^vorB<+m$O<E?o-xJuUm%f?dxZ^B*>xx~jfsZh(ky?7V+|fhMl;H<xLi+Lrs< zKKVmWrCIye8~JJ1!b|1<Zk)60S16CX??%7syLV;p-HS_p!?M$Qp^Lm^di>j}-8=qF z`71X`>1nNO^81;KG$N~gJ)houoW5Va?zsf-zLt&KQ?8g#7n|0zBIf&vXeEv$Ve#^- zclyuHHkY?7N;y4EcjCnGu&7kKIg_7+2Aigxn^T#s<kI%>%Vqy-S3>)iw%-vhwVlhX z`aJrT)~;EvMO2?hi^MXg_g_8rO7!T?P50z--*xV~C+GX^VibeLru9DScW-%8`EBE@ zd45}+^8-KH)&Ko|YS*WA{AM!e?!*RFY}5Sh;ai%S9<%9wL=#KHpU*e@*F{?&^P8~y zGK)56y|qK>m;5#N{^?EZww``?^V^qUTi)4yIQc97&+oP`_iqGEto^rqdHDaYv#i~7 zKdAQXRb9NnWcB9dKldFyf9Jro$J|#hy62g9c6N%2if+@7)VY>l|NC}$eC^i{4-c!V zs!H{$+1b^dn`5cJ|4)(Q!KtRJPM<m@BrJSfIqnJ9T)*uJ|0aF^_wVM4YJ=HpSQ;;z z1el!d+4a~WZEMh(l-jh}t`9_9H%C}xE{$O6dpzT)(<2Es2@8>X8{co+?VM{Cc~{km zzq6p^bpFlXpWE)I%(c-HS+t1zM5#0XW2Nm(zL!J4w$8OZo9Ot_qV4<YDmC@9moq|r z*G^>+kP=BhT`QfEx>mMSqHSu}(@#78y!hbB7yDIfHxHZc><1>>Lo2<T4>dhvTo8YC z@zs^he-<-1<X_lQdX3-i!>%u@t6t6a{%JG)#t9R%gNzMzQ)?V<>z7TvVm_VeLZ_i| zWz4?I-V#5LUNfEg<7Z3R*ArD$w;w4jujrV2f9BganR$6@KYirl;@>wVLc;ggthS`J zak3AD<%A@xLr&}MJd?GR?U$>;`mpQbt!zj8Q(75Wc2>(+6eyUOT=}NzIZ3|u%f;jJ z^>5z4mlqUV7@`F_YhwSOr~2R8*TnCaOZ~Z>d11hd=g%+Sz5DR-WBXll7I(ZOC;Y9_ zklFoZ?#;A~3=9S5mWJhg3q8Hu;;os+nc@;f-fLH4<ON=|Z>mWtxo}1HNtngl|H+|u ze_l9n<4y7JVlMuw9lseETqnCt*86?upPcLJwM#FiTzC;8(e|2GYO$yNj@8eut@`V} zUt_(kyTF_?Yu5Wef6v@7t?$;MOWxf#w6AsvTkbwCl$(3`===I#9LFQq%5IG=+n2g= z2IGRYoBy3y`S$+1ztgW~1@eE1U1MQ;MYZQolK<1Ue_y_st}DCMYVNPqvH8a8MHg<x zMTgBjomR{z^IvQK501^o#;>#I)-@a#l{tMcGNLMJ#Wc0a4=<d|pAr6*%{T4Z^&GQw zo%cLVcPgEnob3L732vWj;=6tO_W5?TyS8izS$_HE{wHtW?#;ZsELuXrXwLuIk3YND z+j&kZ&siBfX-nRp2Ve8|-L$&bs30sVb<sVqwQJU&bh+Be=Y@rI$^vhmyl^0bp+LCO z&o?&aazM^~BgHB$*T}PJhrgWkZhzH#TvYE=1q;KWrbqVo|J_>ir8+-hg^6$ayc@gT zHQHBrGczWfKj^O?GH2ebT@nmczjwz~ys|Af*JoIuk+lMpa+n+n9L}uyB5L9rer@jb z?^}QWZm~3Z@Huwcxmq3urW)n#?`!jKEm4(dv#mJ4erEN-dy^KdnG^f+B=_8HJbWF7 z(LJ$6GuMZE_&#pEaiXNXv__DHu_6BNtMHvWciykBfBU>_&z?P}PM_vv`ulQEtjE$z z>-YbAwSTsK&BLGeJ>@#)N9)b&cVu4vonav_X=<{l{|=X3oa53^%e3y5d(`fG3t51B zb&34u-LbC<UmjHRFPCTZUm_E5XM+Rdm05P(SI?yUWDpRWlOf&A&)1Q-sfOXeN5%TG zb+40{YYs6o95z_FeE+=%JD9i`Zan+^qlz_pP1-X(_vrAy2ZiJF@9+NjVP)>F)9$=^ zorw`qmzo}Jy37y|H+T9hgLIYm3{7`(Iht<lEKW~Ld-g%p`1<<z`xh@ZuFATX7q%wC zv2o+d$|c+iJ_^2PzlunNuZb`O#h`@Omx<AdX}`LfCOy9YrZW71_*su=vzo`*cCUPb z!cWCVtWC4?KcQw3_IhchzS`zQorRlj#%#Wsv0Kn*k{I9fOH0Za<4q>Xt$UrcQCnVO zj{REK*p=_yk{Swc+&MO_Yw_~^v!_^q=EZFH{AmSsMvCsNdDV94-aozOz~`?;Z6^H? zeDZEf&dp7yPM!Mt`ntM`%8mEay_RNQU#F|B4cdEfG2-9b%-h@6o7a7)D*w)_alP#K zi+AsC{5bgf_O@DEkPoDP&27EI#j2{lY>7@6-~5)xYqGD&Klt48X&>LLWmB^(rymyQ zijkGtQg%hkw@NNNAh7yg=o7^!yS;4xSnry>CXBn=HRQ@XY3~(I`!o*dZ`xpzeQSwo zTK7k%pEFw}`(wiSua|DTe&y!noNY5Ka^4+1^~Pbphgf&U+ZCU`bAJEK$Jp>`mh#~( zEDVhIRh3j;wx9XG<j8rsY6Fg<^vPaJ<?H_#GDNHmGn>uJ5Vcn9?5rJsIa?3Sne(Py zE^6v5i`u7Mp=a{<cXq3+wU@tBywS#9U0wR`XXj%XN&gKLgj=UCuMdrNtS#<5niQ7( zOD^i)Y=!+Rem%P+Y`OdQRNI-6_gQ|r+kw*gF+oMo<)6OQeK=ahb2#k&?@JF{;@_zK zt@>^)(I(k*%ROvgOX7^}CI(hEU+eGZ3Vd*_ySGrplc^zVLHTok`B`V#*5*C<{I<TA z&wH-@=fvgKvcLA%pDeECtBZ=8y#DISAmL{&Ej*ENhhM73Tt6BYTv2f7o4i@nnzYqd z_dNR-&Y)nL_-%Xj|E;y}_j_DYD*G(8OjTJo^WU|*|9yJqK3r1H;y7nx@14aa*^4H4 zExmbj`S#q~|6YH6eed3fgDYNt=-K`5U7z{Cf3IFk$Nm2C|DNpohzZsQVKwmj>0!(7 zZLGh%xqsi$9*z0?D}2_zjJB!XvDIE<)+K2Zr+u#<IKDV^Y0bBFZNI14tiGt_s`t*K zEcMq+Kl=kuKX5kLew&dw>srQCn|TvvG8}GU`BD)4S#t4?8`+C8yjBNyw<O)(?HD-4 zZMg{7osQM)>)5ulG~8O&of>MnI_yuGj^Q1R6@7L^zpKAobdRri*c!PxjnSdF_;dF9 zz280_mtVZ{r*Ny&!ipCQLjwgljhCI{=Hr^HvG})2=Gs-7`nvjSvRB;LUC#gOd)pli z;m7O@GcRy7<(j<gPp{XX`s2HH^{ZKWb{oF@e8_*$@Q&*Pvl?deiOEwR9ZdeexGizU z>Jx___BfwewEvWb-nUr=JmsZ@`?L7pJ^94G-KHjMclUv}PDf{|%l*47k?b&Gcf0Os z_J#`=E^N)dzGzK0Q)1h<)2C1O%i4bYw>p1E_uack=cR4F`c33=F6;3^zV?7szouwC zHQrzIY-#vBcW)B~^J^^9bN0zD5d0gsA>z!YZ&`Ee95f1eKlMK<a@(I4ynog4ge$yy z&XvD+G>Tihb?xixd$(-DfryQ(Q}!ekG`M}4$f;;)xpU2$o|}1jd2auc)U9UvnB7z4 z;r#pBDNhSrQs$Vc8=3rUD|xE;ZJ*-bJ2vJYl8$@4da3_)&I;jB!4#R=Z#UD=Eckb8 zYj&Vq8N0)MmnZ95Ph~4{G%1`2O*=Q|<>SZ94D~-x$AhL194B0K?zC%C;Apal+FNDH zuz>S2N0U!R#w)(29{#Rn9;>IGeb)0wVDr%wBWV|>j~~vK{9<fM=zqMKk)wz`VpB?| zQ=xMBT{i)ionJw#=3-P_r-eQ((T<8`$vgQ`lJ9EroKtrHgY)av`-G=wxm+@F4Hj`d z>k)nJQk<|TXr<GxF!}Af|2$H*WMzMLuEM~!@*oHQ&WM?{Z_f1nG!Ex2?l_rqM%QLW z?Z4&X^KNN;b?CHf>bW<^vN%NRYK42F0*8^B#zptMb+zqw+oR3~c{*g4=EZ$n7;pda zooVr3#@?cvf0jq+ggKu4xMuV2|DSH_GcMTlZO_3K+AGh9?an>r8w6Vm;PtM-rT*8G zrB}bUUN7~?`t#;aQ#0c}!NXe~7F7fXiHS~;`Cjr}GP;4Is5Zsu=5qP^e~<g^fBk0b zFV`{W;r;S_exB@mjl3SlUN40w`?i0aJ9Bf|jcLrz0#Ewd>uyb)-F^C@?VdlZJcrYk zuK$toS^MhO*5F`q{(29eBPw#!`59vP=AV7Gfs>Dc<%ipbh&A!H|ISAXe$j1=&3>!P zF4i5nIJnA_sV)E7<=fBR3#aYxlW4jVlJ1vo|NYMAxOWRXFG~8`eK}Uq-pq3{$1ty^ zx_IrIoAG~N?F^5r<y`ukqsZLB{`rZsrq#Fpp5c*^3s)$cdP{7UtecC6(B{TOi<r12 zUXLEGzPegF>%8Zk+S)x$TdTINSsV4}UG}zFw{}aV`|N99wDR0LwaDnL4f<YPvt2iE zOj6oimGbG{ww4($kEW_OGbjDo<D8qmFmqS@)yr3+W=a_E-M4c}>*hy`mKmsiu&$m} zyQgWfQ?LP#@l0Obw_A0@9%_ABk-g`I;<vue8EdYtT>XkWLPtqe@9;K({QX{f+3U?D zwmAN~*jVS>w|jfpwXIvOS5^LsUYqv&Z|+>)xwgI%ZLTdU)_YSG-)DcH#>VI?K1C+~ zeb$chi~2WN+LxT*e!4t0_i9qOr_&je`1KR=T)X%C@9?uP`1i<=VTS$Zhm32D_P@BW z=w|lJ)LQ?iZ+rV^Rh{MM;V=?1n)xRD{M!18m+vid?o}LbieYX)JA2kH3*E|tJ1;-K zAF%J|x!wOI-ggMF?0k7)gM3l(&1qSeUb0Wgs{HX(rA}nkE3SIGZA+JLzq@U2{lgO{ z@5py~ZDx4z;bg8=^RZ~Dl7EjjCa0G%G%Q-Ly!^p|nZ>{PW$p)s&Aoo}ZqEJL2UqCo z*-xGMwKVM9JMO2;SHI$BOz?kJZ;><aM(D2h7oK0`b!E7qp>1E2^?T(W`L5G`A1e>d z@6Wd@`gJ?_XSHQc-oc}f+5Ka7t&NWipAcPQpjnodbf#q4`GX&4pE)+aKi^R5t0LpZ zP2Xnqy;HmGef->;Dc`p(U9R(GB3u65uis}K<8J1EAGqb0NAvku8>t7<H?Q5ipgKL! z<m=~+XCEHyJS}chy75s@x5F6|VXheMtn;odDo;gagT9o9T@`&2Z;_;Wmcd{_=reKo z!udan=TEqOWVw93UH&a)jnnfTA}qA+s$PA!E{|S&?PDLS<Am9Ky)TrvpE$Wk{$2E^ zHy(1wWKT_*(kgz+|7O0h&bQ#zalyP_m=0X=^j3Mdk0D{>EKqx&0b}XY#`nGl#Lv#F zijTXvP~rcJr`+?BtRijF*B-fRF0sgZmvn0G)xwD{3j>3*X6wz;UADCNI-|q%n6T?1 zpB@EEN9r&!Y%2QB&~P)!rl96@@#}wn8#uxz9^b_3U-R|vec|Nvs@S~|R~JqOH4fZc zmohjkh<9->SKhpT?dFA>-u*d!zNRBFVnTgL)u~0z$M<*fdGGzA^C|UiSJ+pF_m_6| zKeW&j>4>lhydI(?)Ma}l?yr_*zq-iI4#ox1_g*RU&YQUHOp@ti3%$bcQ+NE9v;S@D zSirDg+efFA3?XA_F2`dhvbMgvyZigg(EPq~g%e*BAFi3PA#<l?W%09fa_=JqSa$Bb z&|z1kEi!$6nQ-MX*Jb@1<<I23vTS?USU0iY=Q76G59Xb_U#?S~?p(a`;ELT>*p44v z7i2z>{h$(C{jr3q&F_zZmq@)nax-@C-?`iT3g)El)>r)ap;)xiAadW4!{?I>nH%<O zzngLC_AmYqy$KsT{B|=|Gc3s5<rsFXMr3Enx6_*^McrEMs+SZUB`+nh`s(Vdv+UY4 zc8ls}p5!i&S)SpwIMmbjuh;6LM~jv*IAmVE`Jh39VMD}OudPWzk75{Jgn#={*`6ek zwoSq^N3ZXpi0e~v`99gt<&2IJ?R>KH<`ne0=jCZ_KDxv_<G5kNZFbkdX{*zj`SeW_ zzs>*u<<{A5cE<^~S-ieXoV{-4)}W<fDL#>vhpV?e{cF|ytp4_YDbZ=WD!$!%@}p<< z?SylDrI$R5v#-8mo`1$Gext!-LACsS&wjq$f8m8*=%d4ib51|&WUF1bK;x2K?e&-J z>tt5%4LaI?`eCw!+LPV4<h?JK#MhTc1lTZaDK~3rSJ}k5Zq3?T?oxNwzsk&9&-tyN zjlnfOy&>PCUz?%f)-vwNLeCi+?ky1g;KFd>O4Q1WTFOq7+zT=}igIo5ay={l<Z;Dx zDrjZozs2#-L}U`|6qy|oUv@Gd-)~iw)_yW)Pa6MLU-8*d+PU%DO0R+XE5GO4n?(EE zd|q!9z3%Q|-$w#B)|PL3aNzg<zrLY&OGQ3C+E7_F_vN$J7KIbJOsc<5oV|K2GCpdm zv1Ml5{#DDDZ(qB3cjvN~cB$Wwo_dol=RHYm(w0jmxwoA!i}(gNZ?6_v>$dse<-6_6 zUjBL(w4;W@H#XB);`5}nj>XYaSD$D;FFZ^4*tBm_4C-?)nB?A9-27IRQ{aPZ=vUS= zepemzr)w8@G#K!3^Y&QRf0UT~XiKRXPsY?U4;32=vwY|0o~oN3BPMTpHBnLbYD3f6 zXB#3|T!Y26H;bQ%T6<B;GG|@X<<-}|M6VIk_goOP_C?^99i29e4y(hpuXY`o@sc6I z;FZR#H!t#nvVS=-CC}_~<0$HOZC$!!r`M`iT+5c}ZT$P$&p%G%eeV2OyJno;`Az5l zuVs_mA}u$sHP7&W{{P2m)BH8n558ON{grf7a;=~3F^<pO{W*8P_RnczKKgX|ZL8Pr zbqi_}oG-q*V%f@mT<pOFqh)ta|9KEE9)8hu+C681CwvXhUMQOf?qBu%cJ2GwXWA~U zlDU1(JnrYRm0OLLKX53zvnFwsL)dlksiDuKJWrpzBd?}@R(Q7;m$$#h)lXfwiiP<1 z>s4+J($!ym?(yfAiw`H)>~)HXy<`5qM%%{XqPNfj^Nds3pO()1xAf{xskKJi4U9F* z)Qns2x}{%uA}-I?aOcpOD=n6F_Y@~CJo)oz`~G`>&wrSpqVJhdTkIK~zSnJe*4s77 z!gG#I<1#zAGE?K#+t+&n3e$oP$uJm1`&hQJU!E*(v*F9n`F(Ys8*T*o|DV<N$USVI z$&P&&Y(LNY@$L9```h2dSGLE8RIJ+XA5mI6vERhvgnib(Gwt;!{+vJ5V`|Y?USh60 z`~Q-|8)f+JCz-yt|Fv}XiR5orez(+2jJlj}@=_{V>(ZoWtJy?&H*Jc1seLC#_3PQ) z{B!R-Q~MNS_MbC)ukzfu%gf(fdKGdeM4m-be6sNKxt81a?^>v#S;n?`dHmJKdfztr z_DbLDYW2UpP5bpZWBa5SzWJvg?*DR{|Cq$=sat;iZaM0@^ty=%cZJ?z{Rl&!1m~60 zr^ad6+iKSyl}M7|YtwqA#PNtH%|529ho#MTgSl?<uSKoKGQ!8Bo0oV@+VaSP`*`7k z#zh`oYByQL4;yqX`jE(dGI~v#%wa<wbxrNQ%@G!-lMIcWZ!tIoi*&nQFmb&o@;PJW z)hx*iT1WGQp6zxH7HLZ~Vd#6PlA8Lk<?u_5E+tLvZr1=2RtA=C28P9+`DW6wu5v1w zM-ApI(ww!dV9wDJ4$!WPw#iGTo_z*d$0*`^*`m8OdB@3|7cX;#Ke)=}-E)qWat)4J z%XPS5V)u=#tq(vq4L`dQHFuZ)&9{2rq+V5~PTC^nV<p~rd+PQRNoj6wxzeDu2n-FU zcV^wVmt!c%QvJEle16p5>k~sP_Ew%+_1UcU+wln#CKUEC?hM@b=h5m@Oj~!)E_u@a z#`4F?a|<f7t}ea#Fw%1O;zMezzg#0cv$NfEw=cRHEhHc}$708?T$hZZY<F4LiDw?a ziL|W#H6`}6n9a$=&sS#cTQ;q0%M(_eXYNy%Nk?m0RnMy3+vLprn4@W}amK7DttnZR zDH&bsuTTBDXV+8RUR_Zo@j@4mO%3lKZIN^hEIq6Gca@x-zl8KeyB}>cZYFJFP1`o( zmep(Bu+96+BU0~H@*JL&l>VvGi9uuaIqUL=CoZp!SJ#|${Hb+}{^hABb2479dH*Jp z?@KQaZ`b0?S&L5SRdze~CM+-f_x?8TWi?&jzS)+a-XHDUlYj1+ynJOfi=˚uP* z7o9mr6N@>;8j~&h9<v;LwxRNj!RHT=b_^Rh`MO;nSe#R{ICDSWY<BZwi-SrWVh3|J zN3^VM;BnkwdnC@HZF7Mbce)_U?4wE@r)_!c?k@d%V=3Rvxi;$#gg#+pIJ1&d?BJZa zFDEG6m~NF)JVP!*r%B<)nOaW0cKIjbs)gTWpIs{8DHp9Y_%6oLbaqZt<w@5UVlo1@ zKA}ot-5bt-nrVI{ky($wz)I$HV)5)Ktt6#O$IMT=PuQ}Ab<?(2cB$qJ6GUz<&fxyQ zD}O<2|J~geT_2dKrUvFErsX9*d+=)erfsj1)5{E8^R26ANvABGYrE<3&HJZst@_-> zCu_HL?jjG+3K)CY+dhFy_WQq>S^T@Y>h_ab*+|RXGiU0~F8|Y8Dc81WW%5ny-6Fb- zb%JMeuZnA*x5!P~IIH~4{U@&;+3A*YW^S$fc6R=hteuBNZ?a#z6j!WM{e0%1+Dg}% zHS;zsdUj`<{Jo`_yOwW%>-2MFUFi9J%KvrOT3P?7VqCC%d+zn~^I3knA9wY=S^D7d z|D3;%`Dgxr`7*bBh2R?#KhW-?1uLyNiqy4rY!wT?bARd2db?t_@!!UeeC#`Kx3V0o z>Z;WXOVgjTbyr}RoUEbb;SHOg*MFMCV${9E*K1C>P4)9LU!L+^%|E(s(z0t@&t}Hj zzrWBiA?2#WduH$X><r}_uOIC)_W57UUu%|o=~Bl87lwq5H<HXX*)|kh%VLZdc_JSg zSiNrTYCAn6+w}&*$0JvM+|20k=;87guL}fs@a2`gI~2$me?(`?^l3KxSMB?7<mTPg zVS6&_T>}#}w;fP&o}BvDbgk^x?&mgLi8I=7RG<Ey|C)#S-lPLhe(-p|Jn8-}mY-o} zWIX@Ad&NiHYxX)@<g7b#*W9W`Xuf)k)ptXNf)#>38#)da-rMzFzDYrt*XxVm6TfH5 zyyrA+ZmfQDX2zyTI}Mu@9&;StaPs8m&s|2(&sMBhwXfjjpW}=R_O70I_*vT1H;J1q zRXp3+jx}z6wcXj*dAsea<c%|CM`=&j-(eDLsG`8epfPLJI{jBKvQ#*>9ZgC*_3WDI z)Fo;$T8jElx?30x{bq07a{Y%#bB;O}Z;!5?{o6N-*0HoD@3;|q>dy8r6WN#>PNo#> z5P$xqsxqc=ty=#4P1WbN{MIk6+v#S&uw&N_>t10;ffNmmi|!MwBNxO!x%E3v^1X(@ zlddT{A|ow#duyHlROyuF89Ql<SM4G3Gf}2HK9<@hXQ}FnxUORVb?5H7HGgZ=>g%V+ zZ2Pt^+<<5E)k}u6zVdm8TI8~or4}<boPKI;bGe?^dCIras=b#lPm{IYoP7V``Pi06 zGc!*sJFlN|aO-+On~*siO$vSsEq{RqI@T&b04)#ZpMNK9^<H5iiRk+=NzuPfWo<pM z;MMjs-<GC7lGT2D>CFG1HVfyMXT*I>?AlcnQXIW>x(dVL4R)#J^EY*`+$$|NCnBcq zR-MJ2%*_`L?D(}zX!Fycy+7B<MHbyzb1>W_Bw_kD23`h>w%I<v64y;{-CXjkG4=EO zD4XisoRnKr53gSbO5@9)y9%%{GF+RTzt8fXp^riS-mlk=R9)VdcT-MmhS9x11r7!W z|NPsNo*Exb3OVrGuVCSiMT-s}37NW6PiM|m)#+#Fe>5--d;4Da+MTGW;Zs&hy;z&C z7n=R+NZzGAi=5ZWma2H};y9`#URYcFvh~wtudOjp9@#B;tFLE$bN!^xJDBABXT;Ym z0qwLh$j?lOC`d{?+4*T!&D5yCph~j?`b-%o?7jz2k2&^~t7>X2^R0gl`%iRCSaPlJ z)|=wrrdFxG&W7!0pMH*EGw0^+%734wvG$bU&JO8lt%5nGwV!PHvOiez`aF5`?&(Ya zz$Z69+cP(;5ARrgLV5WIht$}{-4U}SjPE|I`dfSG$==+X&+AsLv5pU$TfXp5No}xa zLwrltg6}maKdzgX)^xP2{PUxt3boCJ1#_O7R)&_cs%<{#{O0f!VTsOV+b+f1d_MBE z?!5rZ%m}rJr6+DPYOQ~HAj7D@a!<CNgSE|E$IG{`OUek??mBF0HPx$Dw!7q>hVR;` zb@vvY@!E32W5K6c<&y%ZTu+%Gl4<g)rAhm={biH2QUNc%FyFhRV0KV4=I^wX+qos& z0#(=~+7cTQMLZwri1`Lubh}QPzUsxKC7~CuCvKdzSB24sRjW75RUpUCKVxf@febr? z*ttcSyVkDW7Z_%z{Woq|-qnD!zd~)T4mV6sZ@4_a<auMD%IpUhOnfJW@f<ebIbL`t zYpcZBs<eIk4u55G@O|9s78&W1Vbrf2u<Ge^eL3z={ZTg6Zy!h<Y<|4N<5F1Fjj$81 zX9ZOHvh0*zu+sWOMD5nsZy$XM{#NbLHRXG0Ot|{pPtzvvtag)i&UTOe_H({lt%dV) z`5pJ7N~`&6k6l^2f2EtC#N(u+Gn*y}Z__WA|8b<wi@B*sT<qMY^PfOdCFSPp8SZna zy_N+B!RbShIZcN}&Zj=qF`IpO%D$r;wL?oHbq*cZwz!~wDJ(tgiBejgwE)ZPmD9MV ztM4m69bMFI)SmzB<vZag;-*)gS3YkPlzA4B#xE@4xFOg7sa1@=Yp}ii-=b?%rd~{3 zd64m<=10ksg_|>Gl|?C66wLXyv_1cZIj7?UYbLKR6E{ZfO{z^g!}Hs=YhT~{`d=S* zSxeovZQN*G@M!h3ZL40}=PgN$Uh{0vqr;}X;_JS%Eav5TQY(A>+?x%yB{yya6`p;{ z{RY&q-1hR(kzMtz3d$*}Yh`15W%&A4);^ZyPH6b}Q%`Ga)6Yv;TTM=!x-?n5CqIOv z=?>$C<@G5p8MD@{(tq<NlaIUWxZ$4otHzd@^W0WvWvyjtxUj%Nul@LzoC#C6mR(7d z2#cC}`thg5ht)0L2AE#Bt)P9_(8fmP<l9e6f_lS3?*<%s`avi;-9YuT$EB#d0ZT%( zotTo|q(3VuG2dEtr8DM^vh(EJ<!KsMyYBt-Tb9P^8d&NpJ~hiVB4E#U69I-_p|(+T ztxni;F??b3jZUvE`JwX6>DQFIpZ0ybwCc`-hKyx%?t4V&EbA6cKO+|G^u?sz(Mx)g zlDF3RXQHWY?fzb!vs1a(gx^#xn|jR6Cv79g<eN8c1m$UW#>P#S7dE_^amAW9=R+x@ zL#cD%hI$|O^5p(SrWfqBZrDpP*x1(i&$;{e!lwA!O@+VsOtyx7+HvSw->sGxnVY^z zbzhw#G+j{G@Mp-odvltYxzpCBX^ASGkZn#7oGkR**K5x658Np+2@>C4{M~<A)8fLd zz|#*ud|^8~Y3J)Da&?bo#hVm_<)kjUyFDrS*B@H?+?hFf^ZB>uHEmuze8<cn;w$C5 z>rL_RYLT_urnyaaTpXMzvCcfBXZmU%ixqhqzsm0a4qLr+`~K|P^U7x)RofbM^<nVs zj9I62&z#Y><6#hS&Aq*Q<KESQuO5~^`BI*GwerkE^`bKQ)Au|DT$<P9{J!_yqif68 zJBu@Z|9jpa(~`&F5cK5RUTNu+RF;GHYClZAv?_)n<K+rnowG?&kV$36h9zr!wuG&A z&A$+Ho#TGzoY=5Sw-#soeYD%WN9}l~jfijPwYmQv?KT&wmGxg=SNrkJR;GO%44?F6 zrfm)1&2dNT^||-fe=I@!QV%cRcAM|d&l_T!k3KOmSbm+A;rO{XfBr4!Kb`%FrRL(v zJMwFmh%%_DpL_i#GwXfUmalKV$ez$WV>9)8bJXSUPy6=I)IIj+(P6KxhoXgcJli*Y z`q_G=^)D`L|9$WMn@qW%x0@8U+v~NLTc`Zw@h_kMdz#H`!_uc$t{nZGX4A5%hQ%?D z!(>r^kB6)8KjZ#=C!ce2itS$UCM6?5hhayj&GKb>>oPUA<<Atbow{gE+UCSxPnP=a zR?__RpmVMN+JD-gr|YODZkxS&NxZ7L#MbY+mD5f?{Jf)S)2ll(Gf!tr>pzg#SMtt^ zVM4`^zY~7edu}w|^;B2X^m$xOma^l9%aa}N-Oh_<U$u7gzl3YoS5Moo@$my|!=+Q3 zZPq0mJ+z!r!9wBL>)8JuJ#*igsBB!F^6Sac)}`ud>gT3b{j$#8{QW}ux0j!oz2~R1 z9lbnB%;0pvyBq%<Gq2uUxw89h|0(S=Ht|J&US3^a-Ld!0_wzIM^vqP6BVt|rIDNm= ztHrIC56p=ZFJ?aCEp*_Gf9L$%+3WXcB%i%#eE;vGiM)RPiN>m_g7cqWx)Nonnb@~x z?JED9M~}RDE&A!j-}PbUBDwc|Uemw6=iz%{vl@HwPKrBf0gL*3I{L!{GC`Y#c0M)z z88_*`L+ROP*wSQWmj9Z1H>W9Edi|$ebM|}L{F%}ITt%+Vr}d@Y&NbWjf3Clu$G|Xa z8QT^whK$#%_&Ix2Ile7Dtjc(%ZO``F<Ntg=240?_BhL_J{mO|cIX68~Fz4-t{w=e7 z*v?%zTzy*HCbj<cfp2r>>o)U$>VFmf)k4O!^peo5W#w<~n^eC#)iUGdHdUKY=B`Jd zE`PdLHu+}4##z0G?Jm9+m~r`aQr0Wg<EaL}-#&lj-tKQz{?H?|_MpLX1_s9Xmd85J zI-P%qcKM_w=RG|5s%=r|>G&_7`DFJAvp5Q{IOfS~Ty%F!N&D3$Z}flt9yNO%jXJkm zn;uH@|No*k{jj-&sfz0@w?~pU7Cd)>@7gc3h*=)a|8AOZ!MwUBU-Q512@a|>Q?+Zh zyt7S#&-e0@tA`$bxWRHf%hcFfmg||p>svgjD`rVwdFq<AChYWsrbjtVlMPE#i|(v> zoL)Y6e?`v6H}1{Mi?&vM{kHf2uJn74jW16tw%Fsp?N483CifZ8V&-P%;;Ps))0y_2 ze!yYK6K#`zcV6>!uXjA3`7Gk3T&IT2wXOd5e9DiW=hyb0ox<)ofpb;(P1lJ_ax)%O zo&0T8z_YzqnP=H${tp#SV&{xz_WI~9xaiiUz)^H~f#t6g9U@ca%$T(4#lxriOH}oD zq@Ap>^VfL)dPhiol>LJbt4<uf8!a@YHqYMovWf3?lei7?n%l(%=S0L!KCiMht$Sto zO;(1)gPgLlpgkB230tFH&GMRY>|K)n#?>ijPlfl*yLoU8kG%BExTw-;mU|X`o3nhk ze!upFsvqSg=8<c~W-ZgsI&ax__jaD@+Uus0dzY?dW9U(<b@i>w2-tJkY@Jen`?SAR zC+C#9`_)H>&0YQCwF*a>i-*vB^_<r$l2<+AU{T^RaE)hY2)QbHL;X8nqvhUp51YSy z=HvX-zim<)gTyo0f)AfR>iX)6`me3aJ-6j|;Iw|9lBH8Er<Oi<udPTt*?DWBcUtIG z(VD%#=X*_+VX&&6wg1PvUcJiGE6%qna1<?GAXuB?vd8A{>Q`K^W_#<1ZH~J9{lcgF zEI(bZnopm1;^y7;Z%&^1rFO#p)4^)Jsb!rUo>o)0e{a^mmMpRD*S+a%;%DkIe&&CZ z`?Y3^7W?tYApZRewRZieU_C#p=)L&;y$@f$TYT-y*?Cp-kKDcP`e0ktQ}5sXH3t)m zd(~o#V%UNc+8^rj?kT^hUncwG$4&S9e7rrr{*hmPZo3}iDks*Rd3EppR4JGC<^SIA z=4IM<;=J_~rS&z(W=z_Y@x9UiMowPIk0rmw?2RXFchx9(8(fxu@8`52Re$fe10uU5 zy(ZLO+1$Tx>1BS7AA0Nb<l<|-w|Qu!ZQjW=kDCEh^xaFo|E@az)l2=4A0BVmx$TAw zQ*l-7^(_g{R=xVQ=;3`v_Rr~dZ(cpJn{-YvrAZ>1_r79ZUfx=(sr%o5Z2x!U%mQxS zo>-gox99%Oo)`0V*7DuwXPoO$;4m^1&Y5`q_QBX4M(dE~?w`Wv?%x`;gZHbn)Lc(& z`~Q_qw{LSr%)bxm%QL)|OABzt7VhqRY~q_;qQ!Xr=*z!_n~xq@vyhoVY;|P*g&n&p zZn!VH%wJ&n=iu>KXV`cSw^bfEpt;zyKXFFxwSOKLOx9jqY1!OWH{*<3mlC@_qm;~z z2d|Yhg^qs^)C;t^VqLI#;nc$SDvRSJzh5iRI5d0eX7=Neg%e-$>Zb0CQ%s!xe*a6J zS+9OMZ9Xa@Juz*!Sl2SCS*NRhTklnAe0Y#kqAfM8R=I5Q8J}oAhTOTlERH{_S`Bpn zzkh9SyXTK<{Q897o8vX?V}mNciD$3-DDcO^N&B(ViMtHGcOBRDD%^0J{IBBMcX92_ zn~T21XxPs!`N|d9{7~YZQh~JHOOX$;>t;SRj_r&&@-5PiAwlBVt4DSr^G+oe=e`B6 zKz=FE8SvoMmk7P~`n{2M3?Fthy*>qQ2~X^<D9E(eYd5zzT`qOw!Rw@lYXsAN8ho*C zP$*|x?pl$W8(Mj^y`jyP-Tv*1Jf;Rl-~ZQQ{~OHib=voOoBX}E!DY-1Q@7;Z{+t(D ztJv-OL^M^-cJtwV&p*xj^EkbHSErut){A$dUaEa6Iq`{6K{at(*!r|{O$r=FaTl)4 zwT|Du=xmN*pHltShlQ;B>;A|_R&VvQ7kDCXntiJ4_1SE}mcW227p>a*J&PUQ6*!AN zOx?WmyM86#;SKlxom)1ItA755JB!X7neo!6k+J(|NW`qICGU1Ex}+n%@W(&Z^Gps^ zrw-lwrx$&`b*cKQ*WK4`Kd|3kUQ(HF9h`ZcvG3u;g(u&}@~%+Q1&ubS{wm++E5GOe z*?NBUqjAYRbrm^g$Lq9gntGi27v)}j#Okzga<mvn5i@US%k}ftQ+B>q{rKVXtE-^H zX<mL|K9i)Nw)tSR6bsVPG`GDNriY|_U;UI{=kL_NdoA`lK2{R3<~@8i^pH(fKPU_W z7S%tG-u7nR^y~lgdO#EXv6XLczTIsn{a#~&_5A?XiuF1Ig_V8M?Pq82esFNZ>es1- zmVXXDJ;ZR}`tScYcfa4UY~6Oo2haOj1ix`e-)w4nbf9s;j<t{0gdWVwUVSa<`0ZQ& zR;}H3)$exH>lItqu9a=7KCh&~7qH>f6yC)C4$}_UT7dN%6nmcZeecgs?&><jQ?al9 z$4*Pj?|0N4Kc1Xie7<moX{zgsnX=E8T@(ACr@m-?dQ5Qi$14V}q*wLwoU!^T#lWz@ z`hd*ed;KaWf9jv@@8qt&rZtU0!?7;VEi;wxP8;`>2a(+$>`q=S{IK^&L0)&~tX*7r zS8p}`bw7HfHS~Iypi?RDRo0`CG3ngJ)z;b5HIv0<?KTHr3OR2Y6>X9BOwDGe6Z7d! zH!D5MuC25E@QZ<A!QKUn?yJ{)e7bG_Kc1g&HtWZ{*=rl)w(_l(<bv-LPtAHfDSz41 zJ9GbE`tu|H{c0<j3+h|;a;#tUuvxuJySx5R@#KB;JcEn>zFDbVx`p-JUz@*fEdPW) zO>Erf8N4|q>cHu)<vbr{!nMxX*VTQWBz|9=<I=H9GY@q3%-QkpoU`cerKxwXKYDo} z?GgjS)k_<uDqU?nrn`QnhN0re-|xRqnKosmmB87{O1T#wWv{g2I_oTOWcT~Mw#Uv- zS6R5`!tE75Kh4V3KeW1IQOem%$HGoCUgo*0u(G!3q<)LQVFMH2i7NfC<0B@OzWFon zx>)W+|0|lp;w|%T3fiPMx9*JHzHiw(mebix7sL<L@2x$(;9zr|^^fjVi!XRc{bl5D zu<M9!*=}p=Icd4O)V3^@f<poKpRD{_D0BSd@oLxGQ9FI4|9_G{zCXqyd+*YnwSNB& ze-5voZTyzE^c?6^MHZD`3=9ko(|HQMZWOY5@#=+gi%;*`Fui-<uJ9T%FgTo403D~# zu*=J?^=0IJ<`uJd{gMi8XJB|yxZxEa14F~Pg6{?19y`~*(r`!*x!xr^Cm~IcVXr*c zRI9`H@9Xb3k-YZys>{mAa{IqughSmK8D11lc)`rT@M1~m>M*gXDXXoxE*P3Pr$0T; zFJ<F#wUL3LN(Q1m^K10#LwT~N^iKtpDlFKm(p!3caev;uKaH!H85uN~A&NW|1Z+C` z4Yw}-XR%Y)&@@UbJFL{@!OTzHMtyVso0<N9C4Rqd!<(()A+mf74w4C(ANZQTUiq!| zV<+<kwys5bvAg!v$FIM&ta*{<q!+f?mn-=tzdU^A%fz_mH>ZO<(@yVp$3xf6ZC^jv zo9OYt-jAV5KJR+;k6eC+3mFEb><xZhU0t(mDnH%aoE|F60XiD+K(IsMuEPr!-8Vm3 z|4zj9=#e99;`Uk@8eY6~Y14uQ4Jy^=r~hVP;0yV}$gr2;$r@R<&bs?8i8toiR-c<^ zD=jCt?p1_Cdt_A9zMs!#OPl31RE8~>3yOm;OcOSjNvQm)6>dv>`t<4dcXxmPe!st8 z);cUIs!QP2_4V`DuV25)nfd(p4-XF?IpWe15D;)-neXg9d-jCL3I>#e!n}&{M5Hy3 z(BFNYAD{aLUfGy@+$`rtKva~LP^XNHOo)_J#`GmimN2vPy}7qnTJg$-3k*wZFPM2C zJN3(x^K-qwuU@t4+M3A4t5!I;ySlpm{Q0xBrG<r^eYKU?f@`Rb{d1?9S6f?qVZe+D z6BfL3XozZdk!QHTec;n9hK7Bq$NOYEJ39jd16T2}FfcH@h@9|(`GTiVXUh9~d#k^{ z3oTVxkeqgYUa!EZ)2D+=6&!p6MW)W4eOlJt)wT0z($qF)28OxpopubeY7;%S<=$Sl zeEIgWx3^MHPg`jvbHT7cTCZZ-k|iqo`ucMH&tJSavGvE#pPa2uJcqx%yXze|CF?LV zLqlIv=5blJ;;p~ccn%8*3+Lb2v2e$febc8;U%q^K7IUy=aq(wXZm}LoW4Eh~B@Ate z1@?LYE`e9tc%^r^&YXAj^5xHeetzC?N{qpw`9R-1hArWaj*e+*X+=ew_NZ!tfM=`X z%FesH%cG;B-rd-k{O!%n0DX2TccqCImX=eePv3r5*V6Ll#fu-my}do_>qaq#3)2r? zk!84*{p-ui-DPjJG&Kb~T^t=9W0IYnnQw15H8E*vY2j!+bhKOi^~;wBzpyPRoTeZD z?~YD<-n%<Hg*unGKW1cTc*nFkz=~(tyDz@}|LznQ7u)}Mz+7Jbz2EMaM`+;6sTVF> zINB{9zo(+`*O!;8`kq=QyyBYxI`_Rt(pV(Aq_p&Y#be&=>};OHIk~xCzkUr43ab10 zbb3z@&$`2lT)X+??bdW9FfuGiR!Dzq;PK`6vh=@qG`o~MXE3!3IElF4ym>S8h|t#w zFPQmU1Fv1X*7f?8&m4=w+uL%Zx8>|Cdn<K)(c;CQKcBakx2^hesFnLuo<So!!vevC zS9}byOp*I!JSWN5{YXqoQo6I9!NfH&abeQ5{QUg-FE1{BzgO))@2PUjtXZ@8<ZNcl zo42ka$;GAR(;^mzhI37zw3WN#s2jhG#e!E33>nj3yvR7(E^VH7=G?iws~rNn%HBq$ zr7cVHPDx4eKhDO$5DQ8@3vL&9zdOL@>=1n9$Po>@FCRZ<hVHDN_WJtz?>;UJ3>U!p zkKuy*)G1Rm?6z#!knumo=I6Ve3=9jlB~%$QFf`bmI(5qHW1^Q=S9^PV(&-jXVKtu_ z24!z<>@I)*?|uFM;2N&7b4&~?>{q;C{@^3jsbXSM^7q$QW_CUo4$js?4<0<Ya3NsD z6UGbHJu;R-A0Ms^UcP7V-rCyQr@GhI#opeOdU}GQbJSW@)4D$us;wLh46zKNwG8v# zU0UkBe&4TEk4lO+M%4WHkeK)PjcxU}HBno+rrlw5SgiT%3&%occD^%nt-oK7ub*q0 zJ?+oC=)Bn2S<6JL*;rUKwA~mOUf6g9Gi3BGTA}JaO~$flNv~b@^>u$=E}y?Hc6VA{ z-nuOZ7#QxJzIH84L*&%<qp1>V1_lLhZ*3J66r8Rf-`C&2e*JoRi-LrppddfLzDJ$K z&(DRr?qOiKV7TFXaQnfw$i4S|eSKa2{@&erAW&FX7;rtjB{3o(ARr@S#VY1Z?wlE{ zPbN*8#KtRiWtHGz18He#aq;P|UcFkgMyJzd(T_K~N?(_~y|wg+1S7+O$qJ5)59}vR zn)D>{->0XikM~F(Ht;DfHa=`{>(;Hnz`%As*+m*%uP4lzv#0+5Khx}MEA-+R9Hv)P zR<4cSzV2#z^|VxOFqr>FUxcgt&5ea?UNA5$@K(6U{=l$nk(%!;mHLVY2N>(?|Nr~@ zyI<0{Ej2Pe{{Dsy2JGzZ{&qiI?xnxIwY9Oaal=10hFRIi`(*j$?Q+hiZGZOc*~5nq zKd8zvI0PS9WzAqSZPqNU`D;(FT)8q)qHXpXQCV48IXSzkFE7H<ZFlyoF*r0&P?40A zlM@oURJPr<TddPXNnc<8sS7JKP4=s*s&35++#}ztz>%K*TswT-mRH3O54Fnm^DtaE z+|=CcsuUOyaA9)!jedFie~*rKxAV(C`&P%sz~IYx-=68ijm<%2?(Xj9=G!YjKa;hs z`ttkz{`{|R9v*JL`sZFSgG052g+;;tX{th<^XADpd8h~-JYvJp@T{rJj-mhL`%Sr^ zg6-5)?ecebe!kg!KH;n?LzQjiQ@Kqw3=MA0F7ge>*Q{AH?^fNvKR@5z-v0jX?(2sS zKR%h>>XgWToRuM9-h&4ZR;<u?7ojvU=k_+=!pAlY3>Oq8ykP!t<HSVe`CqS0(~TAq z67rj8bFy~f`iw_MI&Edd85}C_RlU}=x3_;6;qR}ntIPZCC^JKbhQ}AiiZj=*Zx8LB z1_EME9%_?yqqdwlbm-CY`E`d3d^Y+gBrN#k#KQ1pgJJS9jl6|lkBY~yFpywic)<nM zeC^t`%a?=y6&&pn4PNF`SYBTLe(!f49v&_(u4#I)QZh0%FD@wN=H^yzKRH=_wNeCw zga6I#`SRrgA|fo8zc4b);tspZ_`q<I%K7>B?_az)VQW+J;=;jZ_Q+{ZKmXL#)#X^& zEv|ox`%ldL2@?c<M9DYArJb2!IBnXrrAwF2Hp>kv)nQ<`P#JKM{eiuVjLf$;HxJ92 zo0<lSxLz&^4i-La5VJT$YpU1MJGZQb)%|$*_`)LBFf_<*PB_Taav}Kres)l#iq<kj zMQ={yb;@{qYin+K^p=c^@%4X~PU&D^IAvD)>dKTUB9mJFt1>c3@o4>GusJ%*G}}dK z;-i{c*Jsb3-7%Xvfra5h^v@qZbfUNUTnz*@`5b039k^_1VR7W>QBg55H+T2rM~=L? zx7S)jL&Lz}!s*kePoDJLH=mDTL9s?x*Dl$=Z_TYUXN8sO_`6@cve3SNg;m#bY5T-G zueOIB)K_9~xDCogGd(7i6o3E+A0Ox*Sx_EVW?EoA!9(SD-HrYA|Ih!Gb>sUu=iu{9 z`~NZv8q!{DVZZq<FK+U3pF4Y=GOMe*hq|*c1O!h2wGabVxpK#uJ+RiF_m{CzcvYXP zvY<s`{^M;m7q`8N`e^aLGgHzt;1)ZBjp!LrBXxm|P^XG^@RMgxcq8ksOG?k`mo<EU z<DxLAZLwe(s9D0Wz-E5^x25kdM6T*v^u3_$!>>2SH+G9Nd?<m~C)Bm5PsT1S|M9X{ z4!gP%B_vhft`kg|60$GY-5q50%gWc+-mYU|W_YnSq0f$ifk9PMM@J-Mw%tv=%r)J; z{OeZ=Crk7tN*umm;`=g#JI$vi^rqsr!@axH-`&}7Q~c>Q^If-+yq4&V&lmsSX`!3Y zIeT*Xk++WvPflDN|MS$98=Hz3^U6J#K5f>+_wTRoyv)e3R|3>dWLPo7;krV?mpgZw zLK@c{Tyt{$`FXpNvJND92Jc<<xN2A7;%6^jN|mLu{1-Il{pu^|WOb`4ld(I~%~xE4 zl_A4w1voHmc@A&cT2jb!+<?b<#=Zj?Gp<*JvVZlFxOde^vhCqrQxOIR8*Xr$`U-Q~ zN&eSTt8~x2-SPO;t4nY8sB}%@{Uoti-N1!Ib?M#Ath@sTGRF(rmiqRto%4oWsU_=` zmdj86rJKag|69zmi!CV9yDpIJ@C7I1+e@yzSQy916x$qjJ*U(w*10s#v1@B<@ZKfM zR;ZjlnAfm&YVph+3c(`zd0CI2nXm+NZ1RbjFi}|jg6W4(AD&M9({}9Eou&}uWNpo> zK@pQ|FI5)>M*5Zd{(Qh#$FcC%uT^)NM69#Jg_XOP@B8Hw=;T?sZtm38i~lmLYfYTN z6Ic`KJF{=wfx}1LqrI2kzL&+|aG#+S)Y5#lXx+k9D@@eaYuK9U`6#V)<~VA*XXd=W z2M(Rtx5DK2`N{Dcb-D#kY5NoxOBo%=W$_aTS90F+!-`|!i{I0eAFr$0`J2l(_q+V9 zJ6Cj0>U!|*7L*beFZ=f@|G!FHcGk2lyY5V0uCml^{?FgjJ61g2$+}YKw4BYamtS8@ z{>Y!7mCfxJ_sdZ6=||i3l9q*@nHN<~?w2fncVT6I#5CWNJIeLmT({<57t?L^(cj6% zv+`cA_44<2Kcp31j7x&DuDsN?553+s|JR}Sb~}{T=^QfnbAEFC(sX+Vj*}XhFJ{WJ zRUKR0=Cf2Y>%RQ^@axmQpV`gF@M0?@{p-Dw&gwet;;MS{(W<0%WqIjut*UNt|IPV* ze#VY9dlpUbzE;cTZ)9XJ`DE0gJehfh4@ITDm$P~1-srtxsLbR!>3N2|L-+d0)4ul4 zp1eJHf8*9t(eCGacPmw_UU;zn9dq3)&E%T27u-EEId_l$KKEJP^7N4ti<YfR$~y4q zVY6Dr4!-lJe5cIM%gZu8S^w}w;^n62dnSj^2#ZmZdT4v{h=+&Jp78iz2`~TjZVNj% z@7>~^=UDuH^v+nhdhPc$;_u!W-6{W3@?X$+?i=>BE+Ijua```NS1-=bec18%$A^Q$ zXMA!F<;%YA{4T?Ap&QhQW?*=A=-8!`=^tELCQSb8(4-*f#8#zdSeRJ)HMC}*nbV4u zI~~K_&mX$ur#4y6_WNH3^Z5(o7&#U$+9V@$c=7w#Cm(;<1f9NjD|A72hrl6&JJ)WB z9xuo{*S{!zZqwtIi3=^SA3t;C)`<uAlap5;x|H+t<*_!WcMch8s~78LOf)N;zIk(* zD~F`y48@j$H}<oewi?RLf88&z$>e?b^?+Vb>e_6weR_Gpmd`upi`;D7F2uk9iKRB3 z*1tQNCtSY&tz60|HAcYc#j(4WW0X&C5?A7TWbx7IfY7?uWhp$Td*r?yn#{TP(V8mP z+&POXK3(pQ468d~z~dVn=G0za{a1Z<dW4&t@#T3}OGVZN>93q9pPl*g#cN61|0N6z z0Sv+A3=9k_SZ7VTX!3QwSlc;mAK_Uy6<anH3E!;0{Mwp-T}qdb*qIprNj5DP?y}e4 zj@tdmV&V+3v!w}<(-x(0C{9bgk^aW@>b&5Hw#1vqm!H0^8FlT_r4zF1%iMnU&RDrv zx1wa7Q@x%4>P4G8w6YyJmZlst+ir3yzG;uTx!URvCmXZNw@6QzDSUozw}6)B>8E+G zSQ#3=HFtqZR?+O7Rr}|QM8>M0JJBgT>t+@Im*=-Q=M<Dnmi_uvXRiMKAoE{Ar|*;3 z-M+n}{Vqposf^734{E-_Unfb~`JZ+;U-52>`MK7=Q2}!@({irfh_Nqw^5#>QQ(#?J z$TcD9`qGx~Pr}4&KZ)4SpP3o?{k5to=gPok$EGcP^yiULV61bfeRTQrx_KN6g$m=G zPQ5+I{AbJ7lJ)NM&j=iS&E1o$Gxv}C87Gdr-W==K>H7QhUb`svrChE{VAJ-u>(vc@ zeLU~$WV~B(-s2xOZ-2C#_wt@C{xo@Y_UXx&-@ke-`CNRda!b;qL&tucd7$<|WNO;- zRC@`_6tB9#Uk{D%|Lo;hvr5z4#31<jS2sq6SDe9Xlp4MrFsQivOX<hX?ZRz|j*gBC z7cN}Iw?tQ>4c70TV5e?wUjA&$f}h6svaX&p;5i$>;<u?IHDlKC$M$tysadbJzOcBd z99*2ql_+7J%cjn8M5%3|<g|l^bF|-jr|PCYVq&gM&a>8%R6S}abGTsEGLhpUODed+ zuc&iON|fYLY)dVe<DheTlaA-7j9G^a<|JlJda~7HcA?Dr{1t{K2C5(2g+HbmX*y2O zIc=bGSXn-{Z`sOQzqD!_1^bUL*N`;#oxd>iomR}pc?uqF%M4}I3z`;b@*Iw6Q}mQO zy(!c*b<#4cg)7%?oAz$=y{oUHJ{}Nk(+=Br?WR08!-DIeMkxb>=;1<{<MOG;KJEE= zF<3%x|J$jjpUEE<_;>$y^iLaI>um9#&XwDA<^OngEl-d*Rx5Wvuunkg-|fk}Eobar zBo;5Nn3ALt^5(<)^v?f#7@8EG-hJ}1c)eiw4BPI>{e7NIQ~DbdXRO?~bmhjUo154f z8nzvj0bTaVz`#(Y2pRzajqSW>1?NxDZI|Mpz9vYlA&x_+mf_Z=J9qxv5d#S@n6h-* zG35UI`~AMGj7;ABeZ2x&`ug(?5)XZOc{x;8gkgcMX{qSZ)J5OEFVFB&n|w;%%p=R# zm2>8zmQ$}TE&sND`V||?eM>g>rDe1PbZ?n?yMmj6A%qWP$)>EUt2S*is;{qanb6vL z^y};E{W6w|UM*l?$UP~ddZ(K|zyALQ>4oWs>n7Ug<g7Zc>$AJ?yH8Tqm*C&e#Z$LP z*{dpl`<^^M{Q4B-mafw-_U$zxLG!M!yurw@z}j&U|AFE+cXkHX+0^~1SQv1_EuEnu z>cEC?-({_{zCGFK_^I8=`1Z+v+_G=kwiMR{)}8uly?ol9ANyu@iaMRRcrN+Wjs=I) z%WPhAGcqs)NP*hjeV|*)va^ei2b^Pf2o{;%x#(T&nRDKc<erJApD=#^>C~b_lX6-F z4jXZ52HxCxve&otylg;BXpQ!_nxrg~!xvuMuiYd$ZKptC!9DJLsTZ?PRPVCj;gYa@ z|K|RFn`9LRh5#XuHT!y{&6Qf%_~m$>)-aej)g@LXWr_43x3B-Y-TM1_g_d{fap!e? z9?v@~a#VfEoo9Wsqg776ET42a`Ig*<9Xj7n%$)m+X>r@JTemkpfBJUOpZ2z2%fb%T zt^HM9-ItrOMpx_X%WczH7#L(hLj~uz7d&)oxo~G^F=)7NL2OCMmu0MbYz|d_YMS{v z|Ja<w|GEdZHzof#p%|RAHfEl6!j-+;laJ|rk$dsp`VFi5Z^lm#Pib?#&Al_vYSZe+ z4-QRQb8bHy1H%g=kVovw%gbes?<|pLSn$uMN3Ql~n(7<%#Y@iW_QuKt#6+r?Y<=3- z%X8-G+g{(VR=2ABZI50!ux8u7P2Ja7L3f0^$TyTpn&-{gy?ghn#S9EvxDOlrm%AWw z=!cE2+{xuD+_N*bZ80e=anRMBdu&<NyB#~12HLsD$DiM^?cK|pHMP!L7w*e!cV=g3 zc*opn$8cU;etyCKx;y88*9Vs>Ff^2D>Ir+M>T)dH(Qf{BO)O`ViTT!(`llQ?PNrP? z@`hbj_QJ)y1AAKvrlqD%F$osY&)>eS;LI7{ilQt5*f@S{wJZa}1=S_1m>C?_28w+B zwJCJ^`6CgFT;=!IX58O5f1O*5fw_78znKgSR}0@g|9QRht&x{k;3e1Mdu|++{4%p= zNPYdi@x0`;jhhNmB%~BoGFScod?cKAlGL=+%|*iDEVWLP_DnfbZT@avX2uFf39r-p z?C*VdEq}gn-{Ix*mf!#K@87?E>C)`{%lr2&oV9yG?^5GNVM)uvzjNEQ*d|OXjqhHb zocnOapX+=K3`L;Ms?W!docca9&t^*`otxbxVDylGVn^0*>+1TiUzcl#?_Kul1p|Zs zbK?pnr;fy#Y@TcP9pE@@&@w?RzPj>)`qxQPwvCE?w!h4x7cBn&Y|{DYxpoJxrZ=qi zU+tEwdpA7(m&2uy^^0{U%<mI8WS~=UX;bp^?-4U@OH0lu>`i^tq&=~{>3PnJh2k6x z3~yP2%NZ)Tx)#MnZmQ|}f7<Qr<}a0gpUUj=GCIX-{(Mt>@2Gq<X(N|13&R%P;|0vN z$v%nc+B}DOzVwJ*{?aG(;)Q+XuC-H7Z~3VIzwpoLph7z*4fX#ICl=p7Kl58#>(1Ea zpc`!NG6~f(M0NN3Z`fS6vu@KRnfXo0d&15qN#q@pR}!rJTK=sq@;3uR%LRt;`Aa{W zOG$GHIxRaErY)XdyybI1X#fKQL#G`B*SydZ^+Hp=F*0=Z@SffJ;}(aabFHv!ZsV%M zj0_Ad3K!WO*1dK5H+jJpeh2rPw{Dqvt<Go*D^=L*m31w)ynlJlEmj5w&^T}-RMGE= zDm$~To?0|1CzSnC^#z`}Q{~^kf4}^d0|Ub=4x!o$*Gsod_^+bzmia>6>ibcme;>?Q zwfKeYrsBzF`Trb1UEM1pD!&%If90k4AJko3V9UbP*u6SADa*v?!OLAng^pML8gq-C z3olh*U@&Fvw0p65R~*C#8U4z~`B=}%OBQ|WK4HCFwYPK?pZn(vJacDA)qeP)ZneyG zqWNJ~rXAlwUC0}grOTVQB}(kcoaMXk=2}g&eY=DHghfnSIZZWUhu5zMX1gTXSXo(H z+uBxHP1u$oAtodwBqOutmBX)H(cAOnfBal<tB%?2qKM~;m)j=k>sAz=ymVA$<+6v2 z3|CnG^fA<WuRfbsePaL8+8b`-4cmVF{=M>T?2<cv(E-;O88S?+s{Arn%CGx<)^FCe z6P&XqtM4_ay`>ZCeo^w-vuCHn^@4Bz538Q#q*yO@?)5~cI_;V}7beAi_;|bh+uPqO z`KNtj1XXHLUcO&cg--61|Mvd=|IK@sE`R?)vS!{kqxF0$y`}Pd_Z#p3@-=jI*t)vx z(D}2jt(*giAW)?j8u;q$j(g4ROKn%g+Wc;AxLB-sI^3>to#TNQJG;~CCwyB__F}@r zRebKAyUH`?o@->S1nF8(bISXRu&~hF9QNC{cL-W6+|u2oE(q%5tC^IYIeRv=RL6Fm z`m}2=Wg;f9gEV+8+vD>8_xtY^J9>g{J$1Of=hyG|H@_}kwfKeOs{lxxf&5|O<puJ` z)eRiU&O0OnV<TqVmbEU6QJT2IYJ%KCyVgJIj+ycx^G+>X;u5bT)-Pe>Yk8gNtx3{{ zE%(Ah!p_4z)-aFF`mtSm&m<$B#ji9RcCRRgBqGq9S^uRyyqk|qb>-CDuKrU$$N%}H zPj{AFvF<&~+mTw>G~r~FfYY`xJ>_<r`rf0<(mYW*`l}0-TLil5E4*VuZFbfkZ2lJf zPwMAg)@!%e9e7XfPd|P3?AEPYTX{1W8Kk@>YyEmE3cC78pzd{s&z-Af^O96cK75=f z@&CiK1OJrMed}t^U77mW?Y!=Kjhyp4p`HI_*5zM?UPx8!_%gLrcdFZFuAlx*m+Tm_ zl+4Y|H8eO58!QYsvDL!L>Qlv@MrQW5wzgGfW(*83SbV*{l$L%?_pQ8pJ>9MS+@)(m z3M~b595@77GShNQ59GR7pFjE`udY5umi=~=W%>IVwKJEUIg!slV=I3HSD?t&^7nD> z?#Gqg`)q#ZczK<AbhKODcNWWkGe(A4u9JmoZDS9w%ikOtHShVI^TLWpHsyF$#`(lV zIGxI!wQNUv<g~M=e0NC}>jh772sHW`Idf6VY{PWdpPHY<X8O$1^x9GQ-KWY==JX~G z#g%JRwaqn^)%Pu1_bBX)rDt;NYVYgbS?gTn9<@z974=TFW&ZA8*-l;}<#(Ta*&VLL z?|RSjXl;8y#3WH^`EzqMPWeCFrP!h|%j@i)=Xb8gf9^Kg^&>39%2)r1J*U@ih7~NX zfzE9_k-N)sZ{Jl?QfhHZ3<;T1w1|nJVcq2=F8j5QOm#h)x@gXy_HwxxM~;g;wSOMn zJM}6^{=H|Y=~MS}wdXhG1aE$lbAz#MVXlsB{vF%ku)qUztG^!<Eld?`dssj3kCyFk z#_JV-9>v-D-#&5R&y}U}!JGd%ay%7V(sq}lx0Bnt{_FO7q4lPw|I?qI+SJvwWzBET z%yN#VoV?6kLX{aG82)E6cAwVf7Id1v?r&oHTeH$TkB%*4lR3P(X!4^;`C?Pkil5tg z^c^v15y+Zoc6Uedse8xHdfj;M_=#6_Z`$3@uVHHe%3m$7=KdMB%}v|P=TFJ|rm64! zj0`TloW`-6$?G?R#?3Zf=}D6(-@aM-?#|A=rHM%l4(~6A=NYV8qo>HRX=P;4{eWfx zuhYMlFWPj&xIo3}#PRA!+kg9CztXAi_Qx>mg^4)3ev5$Phn|12U+>>dwfL^;kmu;N zOk?Bz&jBqLrW87+9Si##@PE;zH+Pz@Fs`%9^SfvH^JL_rBUjhgUA+;pe(BfwQ!XAl zvu@qKQwOgxAKuXPsAt+Vw<ZP7IUi)dHHBQ8r0F%|#dd+i8wwXcOOSZ>=)u(J2}uj` zn*<g~T3PE?F1pXua^dQ1_n5hRe%id9^JmIM=ie`imLgT{)&FF#z6}hD5Uw_U{q^hP z;}&%;m$Nn=y0m}k-&_CA-HWgN`|?!idd<(TL|j3q(zmv@etv#lUq|Q8hQ#K1^X3^b zGdRp#v}jS;`+I9|ELy$#_c7`Gi0J5KiL~tO)$7;KpET*yY5n~vDJcpqN0L5%dU~2) z-fqpJ3Py$n%)h)`@83<`asEMPvimtHy9^tr6&qBdwX*s4mwq{R*VuFAMdrJ1r&2D> z`P07am{?3bdvtkYpIv!QO2RSOh*{sWCz=%=KYO+}JYSY~f9aM*t0Lm|9ET25*fuKm zKiS@;sBM1n;5lZ+l=Qbz*8~2({b#DK|M!Mc?z7KZVr1BAzkj}E@1HaMzD7*MtlZ?6 zJ)n4OSMYGI4enYt>GFFsQ_~~M@5~bWuxW2^^!dH9uU0-!dvg1W@ktNOz{xuCexXZi zCwhGOcwD~z<5BUcQ>QjIHcoij9M`jGMdjybn%jKlSbThSbu}j^=li|i@9loSZ+FJU zML$13kB*AkwbS<B)aoZE1ZNyzX1KsnyL6HM@w=Vgmqk23iC%w^lQqqNCpJ1fGe@K5 z*~vRBQY|h&HJ7jd^X1tk{gN%L=I`dMT%i^CqRIC4n>Tx&JZx51YT;<AslDi4%6s+t zV*h)!1*xZQERYnApZjFLhUMFHPfzR*)BiguaYj*LW9!UV-&j}I(9XSErP~s(nx-<v zGQV&97hA_~60}|XljzPJ(J9NP79J1V=BB^L;>f*|Z+uSd{c$6v<-(TAd(E}Ku3k6$ z`^DG7*EsI*8+N{pwnYk3iYABdM`ol}JiNi&BGB*NGxya)`<st*UhLg5<4zvun&)1> zO?;0Z1%bVPKAl$go1>wpH_tfT@BhEQf==t!t&5C|ym;{<i{p)3w@&%5T)Wn`{$Gu! zXXotM(Fq9(jskZ@c^Fm&MMOlz#p%^&K;}UsH>bI}yPuYx4W0*$2nbjJng=~H!!UV@ zxCR45N!PQ`FOqGEk!`#Giz=#2HNC&H-c@a~-D>;t#cThRMfWwYt#%D9ES%X<?QwC+ zwrT6OwkCi1d%Ej(@<yI!fl2Y)ibpo_IC+GCGSZ^Ox)V;#`pk7%AnED(P3LdKuHLtB z*~X22;qLp_E&LVd#Nu?q;rxv&H!hvK_0{ncZ`ZWU?3WQ-zi&qF2Hk<@T~hjGb@plP zRbA4vU*)cy<9+(`D^*jYNN#bTnL8G^-nw(J+%H%&F;h0Z+*|MBcZnQh>l@D>ygPCK zy9?ikZH^qd|H|U-#9sX7o6g%?nmOy^+y`d)Cp#Pu|1MPDx1&U)e8KAFTdN*VVJ~-C z+3EUuTHl*{AF38@nLlgRuG-(<zTdB}|NQK%uCDIOmoE>u@oH;oI&y%nZ%;ozPu3(O zASdU|larHo?k{@z^5wyU2ZNXSMDDHnI@35EG!r=a<h*i0hAVTEocaZB?I=txD=S;= z)&e>+$H>@NG+Ienx!MX;Wm@rie|ao_uWMI%<D%3=bEnT;mjs<cO`l$0?0@Bot?h5k z)fydpilr1w^c8K?|1aEg_ipNs7m50R3jdrgPGnzq&q}KBwZ>ti;$?dSBSSyEo|r4R zy?_3$J@Me4u#A(2n%<ga>zb@Lt}wCI{oT0w@dKm6fA5dm^>^;pGTE%HCoC$Gp4KJg z@>8?Y_2tHo{*ll2uiDm=IP=V$irU7&yt-2}we8*SS*EVYfA!RE*UFs_U+j#XSnek- zlD<b^1B+tF{eaNm_=%cc1@E4Rh6YcYJN?Y_>}XC|10MUbME@sqFPk`Le%!r_VWL~W zxl2~(-ibwKF6CG#{;cx)b+e5+v!}-veyo_YjW7R=NPpX}w3ZA1)~{D;S+qX&N|?FY z-Sh4of-LW>55D~;E9ms%Zf@hpjg`HVrUgEZ@&7A%`K@5t?<Sjh^X9GJ|8G}_*4;go zpFcf4{r&Cj_QyZgMsF8z+P81t`#qog_V54SZ~t$`lqn&xvAqIO`|JL8>+jPL;bLVv zIM25F(c{PUf4^Q|*Us3Gb@a%e=kcri`~9n`s;d3=)cvhG@4~{saF;V!C;a=IJ9qBz zuHG;A<l*h3g-bSx$*32|q)V`E)bacz;KXzI!TE>}^Ok8&OD${)c%!eLxoZ6yEkpCI z7cYvP_}#7DoiZgPBklC#%!?+j0xHgzCHjOd950HrCF&fWpt64F(m<_TvkT@6Gr0~I zw53K&I|vy>tJrf*_>1JUg)5K0{mN^)%c_dyW5%nH<X~pU37_uFO_W@@B{JH3diBYg zd1BZ70yjOI=4RWND1P6~FDdIwU+w?mf`S**F7BFpC~f=W>XNTMa`Sh@|GIjFaekNg zYn%34Z!LDP9NwV4{PFi%(Q9{9e!ti)&MeO7-EsEs)7>36qHl66ynk;0&%4LPC&`QW z%r*Y;S3lkV!;NE)1<f~atK0gqXByx8V^gPWdUR`E_q5cRS&>bxtCzgK{i3bCegCgl zt6N+9^SC7~i=K3eYERRTzjxzC#e)NlO-)R-wSWEXeyS)dA3k}~Gd}+Rm6gH4%l)2O z`OmewdhFP<?f2(>n#g>3!-540ruSnx4sVz+VZwt438CyvAvp(|SdaJ1Pq#mF{`~&h z-(}YSlR8|Kw*LLg$-p4PyZXiF$|x1bM-qNQOKh_1!>08MC~-_usa*T(G-t_|x4Czo zMA}`SKihus(d!2d=eU0=<WcvOYZT^CoTR`x=fSay*DgH`JF3Vbbi8nqLZ!-l>pG*; z?i>$q)ZhC0wdYBsos&nnyZ=U~{$z{kPmA><@A*yI^X}BAt8<L5pC~UdoPK3{hxcm% zCrN(qWtH_mpEWTn|B3yhw)69kBiqXT`pWNDeT{jv>}|22lSSW7-Yq`<dfPUc7L^Fw z?U>vwu&LN&t;qHHwtvoVy#MY?#<c#bqP4X@->P0-?mzux%Ke(pXWiv%RsJ78x=F`; zV|#K!LPBot-QI9^2h}xe)`-Y2Te760qC#Vv&kTcyo6p<ruKfJ$dVKxeS1~6(F*3aJ zKP*&x;k9P{=IC<$*>if_%OA1n${*g8Qx+9j=vZ1+^s(F9{nJ(t&sy)SB*F6fwToA8 z*cFuYJmJ-q`-g6XO!(nnSMRS~tnDm&*M0t@81{%)T=PD8uCFdVy{2~7vdmdwIf)W& zi&o4w&#$ViRBZY8?|1&JWs%d47S{av@loAx&V+JrPtV951rLMSSREGk$o!mdo#i*z z>gn6JZ(slZar$}o^>w*7H>IAKpvcL|*=2jYUw-`(0Y-)e+zJ=jvs`}8zRM^3R$@<4 z&&HJrukIY&RTcF)UUp|<^n+Ku!F+!!Ry%}brYPNz{q$<~dw)5jOCL{v_g8Ldxz={A zOf7kNg^TNw+txFG`n|ZXF>%=uaRZahpU;QitEo5Y_c!yJSD9U5{wgWcURCw!gM-aU z8-MJ6zi;yWu<B1wPA*xp#IpFAPUNO1U$4hszj)D+<L{@_`avs8&d;;8w6uJEZEbf? z&z)VRudl6*-pS9*kYRFkj+|o2g9DA);p_hVdcA(#x^<u2@|v<&`yXXwWc1<`U|`tg za`@Sc=Da0g#b2hHDeo8ECw9_E=kz9({*1gyi4tjP3(xyLekdXJ`oxkgHs!|+d={*~ z8gRWw;L^2+rslR@6Dw;D9SB$+bZ5bq6Hl$ov*Xn!8}c|$S`wml_1d*#25XisZB^iy zmde?5;`Hgwn>Jm#bZL^;Qi-;Y6*fGFQ;a0HSFdPqZ{POq@_W|l9x7E;Rj;qDy}dO% zeEZ%*aty^^7~2<VWM^j|U4N9LDPnioTkH3Gihq83`s2rsU%!4eGPCzdo4@=2@BROz z<m9J!^X~8CJ)O<Oa3y|zw7dL@g>tdV`*SZ%bAP=q=*r@yA)=dWS^{!QCqHtYmbz0% zUQy-zCqXA8&9#$s<V(xe*2=xVxLk8xPQSpVOI0=I9g7z~p4@9Amw#e{VlIF6w>Ob3 z7n)ePZ^_y*ta6$3<o*8tcFD(hD!F|x->?7wcU|o6oSdAPn3z?oSNqSm+nae=?dWDP z-6)nwI|c{k6|sxr;{s<)lDvKCQcC{q`*$lNq<{MtF4^>KMfLQoS4Sk;va?@$EIq4o zvb<dKS&DstC1dlt0F5W-4^^Jhe)8Q8WlZBW_otFu-`?KV)zwvGXOc?!_2p%^n66dP zla3_i)0<jbTR)ku6qz}Dw!B4wL*zw928Zb@uFL$r^l8uG^m4Q9CZ=ZQGS>U8AAQ^S zeBPnwne09DW=Bt0wLIHE_rcQxC)dxEivCymNIS5uONfarcHtk%pL?Uv>z=sm7Z@1W z+1V*y_haEFeO`xf8H<7gmoIOgJJ)}{ovr}Ky!-qN3|AVeRDY$4vTk0!Zid(f&_orJ z+xgw|OZM7s7f6s;wsvWEqJ<O3@ehLcCU5;=)v6k4E3f}T<*EMK%jI8=nC&_*Dk>@} zBlG6@^LBx#Z8<ZG^tc?#1vyv>3k##S=jHCceWX+P^y$+NxwRP@*aFwDwB{?5W2;iT zv$1uj?fmQS&c=(T{V*}Pc1mMq@P7BFl3mL_bzky6`co`z+qu7cBBrffp>^(Ly~UB@ z95+AEpz!X~1<K5u-|Ttv$Y^5sVTEjN_IECAiAF9TLrqhyZZYwT%jfFO{d8*4qf0WN zk<a6YODp06t4e(>yKfw1{!_rSe&uR`r}k4$McMrB7kVM(k*fRCRg%Y<`)tnSpvCP~ ztQ;l0PaH4t#0E`^jthM7((YH?qpfw@-dz*xo3!lLoIOuo-6{%q&(}`0ZwVl@dcehQ z>&gWdt9R(IA2twgKd9z*Nbiq8)f}$$C*K9vroDB)$MgQ;>Dc{sd$(*6QQVSuch~m& zb<$mP9fT*U{JiKce|D~Q`QKk({ohq-i*S{{yTe(Y&&*)bSEc%^?botTkLT=p!kDK# z&)PjcFtakwwKOy8n!Wznh~(s#Edr~uSJ;(i-v7e6zURX{nW|s6FMX=f|9)}f$A{mA z4r#CII_tBh`*czAqeFY{)Ot=jZt$h?@ccbrPlYc#HqFSZ>dT#VoXO92TUOb7blv%W z{P$_GJTvo+ecoL@Ub{bkI~B{JSe?DSBl`F=pXkoyiZ6dp^YWSsA3LM3aqdoi#^+Z{ z<HbbM+wNPfTA$t{uxf?Yw}P*MK3|Sbb={tPe)^Q>U0gw0tGp_fh<Sc`Z@1%-?ScKf zw*7H<as2=GKh?Fii<ew^(Xrz3-?{BvzPX-FHWgoj_X`>?y_6O#yn6EVx;b`<E5AF` zw*=hiJ-qDLG`o9~xw<#=$^9)kwj}l4Ip^K4+b_L6w65iH&_2e*m9HFjxwucie`Q5a zs)==P`^(o4wk`LY`}6m!pK^OAEM1!F;c?>4&CQBO*=L<QefssSt=Sw4@7#%bH|@)j zBQEOd>OXe#GF%9FWm@XKZqceGi&j+}n(<TCN?XzN)t9I8$9w0!erPo(d#7k|SVo$< z$!1l~q7~PF-1xDY?U&lV!^@Rh+W6;L6rGr|@^Mr4D=nWM-DAD8gbk|Z?K|KRGNDOe z*Y5}Uv9h(<-0m{R+xh1uq$LU0y_RT8+-GMjHCx*2^k)I5pvcY5bK5&7x;8H{d*k+E zhG3)0$>J^Y3yxm*JpJqV*^{?d-al|_SJ%<c_hJS2T)l80#4yCWxcYtLzpY=VPW~gl zSMJNk*`Eb$W1BtexZmX7Io3BPH!CSLU{a@m)MI1k_=G13ukG%Y&-;HOQq4`wv{W>h zS&U!a<ly1bim*H-rxgn<UMISp30Th{bNFrUoti!B@jHIaE(-H~JLiAyor358rlu`k zy>(Ma=<!RE@8Yig_SdnmtacVZE@^u&_i^}U`+s%&zH_v{>v(NHE3=Tbvgm!jd>p6s z@oyU@O`7!JLBfd^hkT{@@*Ag5bN|a@W-ys<rS|Kru5Y*!|JixFCb^g8v|seB<6fgX zw{QM^<*Bw&3>!D7?Dm->U-<jS*%_N3ol<h&&B&oBqb}g&#`cUu(YA46-?j$pV+Lo= z9Pv_{tkm*}>oU)mo~O#zw<<-ZK2vD<!s^C+*X`J`cvlYFGaa&KprMTwI_$?kyr>pe zem|#cSNX+zsOu_h8y`+y&w98}nYq}xR(O&E@0XsfTUi%1UD+VrzTS22gp*5r&kC)R z?h|%v>kkVsG~W2k$(3WKWb{c5y(=NLw#q-l<@?Iyczd^Q{W?{)>h+W}H*ac2Px<z2 z8G~Wjyd<emS-;~;R7K_gzV*8uZ@QCr%Pd)wJ-vKR+RZl|4=3lPecXD&e*GTPf{xts z*5jLec*|~ITpkoM!K(b;ns-uS4f~Sc-`l%$=gvEZu7L{|E)?o?St`iL;Gn+p`W4w0 z0oUMgCH}nzb)5_MdAgrh<tX~sv;EuuuMdxQ*gx}$?M#&L4SqK5obcbctj{)YRv!O4 zN$TguY18`l%@ZuQDLV0_`MBMDBfT9PH}=iWb_q6WOLgO~cJxoUQT4*?v*Xe9{5zJx zLGz?de&_NW=ISz@UwSCG|FyJ;)6>@p5^5I=9bWaSoaEpBCqMARA5O;L7hdMh^V(M_ zzhY>sJ14HTevPF2$rqd3|5t{w%f_xff6w-6!1bEHmkuvnEK_^T!oH{alvADTRiEzH zKPTGD-r&}>W0;$kl%#au>(IG#d4GO<G_aOuSg`QQ>P6=b&a|%HU-?bG_3@4!n^r8b zS-))`m*N)%%}u+u?dcWH^m4l_;&dY5e#yHnp`4oA<yBmjT4dhX7`cAz_3bY+TBITA z)R8LrbN-#iKN0udWtb}%tH)_&Ka}!5Rm9H!;c;K?+8CWPZ_dU1^sL*ze(hH6KH<*H zi~su$oYFsH)bF0xn)<IeHt?YH!kM~liBqpGoqARE#r>V;UCmppTC>YHNC!m6pR9e@ zAfTmrUiO9Aq~ot|OjlfWNqFhsfAhjlUt?v_lgP^WlcBxB@$lQ`@IKBc!(-PTUR>_3 zZl3tzl%dtGKbfEROkXFLotxhy@M-RYZAph+`VX4L$j`1*D~^{-Oj~H5vEy%7xth;h z>lq63{=GkX>RQITr1?kle@M=@`_&b%w)FMuS*5Hsxw3Lj9_Jmb3l3gLea&>tU%un9 zgp-DT^qJf}sTpgsbF?~kO}lqAoVT@xVb|#<R&E_#`MWM5QBl7@YgWzV7#LodJeurp z7kDT&D=X`eo?GOM+gtCx{q%MJJM~z9pWd!c?%mS`>g+#C&0l`?{I$OycFuKUOAGtI zu6^-}jVu4<#Y9AX`+Mw|m0kSppd06}+z8Uj?%Y${rBboD-B<YOa+m+b8<(w93Z4=W z9luiDU{~?~pukMCLk0_1zTJDIqi2pqTjCktHLSbXI#&ihoyzLgc8GDEU8`y&r{?yr zUwbxvo>VwT!uAboCF4Am%A1v*k89(f$Yp&j_36?1*T<u&d0toex&4`*joS)zG|tsb z5Qz*8ZhO3=cWLqJ4c<q88h#A-KINiv(AZ2Q>*LnwC1=gw&(qaBfA!L(wJY>iX0O<^ zv81oQLR<H@o$G0xGdabd<kgnk$;(({YGh(=DD+G`b;)xZffp}!TUI`{DAawmW8b{O z)Kbs7z++D~I==P%a$1XP**S^il$0-b=Gk%`|G4q-u`|_~$JV=VGc(<A%jJ1_)ggnN z!`mF16pSW$tFcu@-jX<e{Mo+WnF@}Nj`Q79_58DZvi7IV+ES{z>(@wrzqV}UuQsc* zzCq^~e#`%t-?ee&fshsFA5V;b!@sLU$xm&m*xq-$Kc2p+(#gG+M_TpL^=tj}O)kGa zbdg=>wAGFozkQ4Nf4($xdNFnTv0ko%zpsx+*XVwlemQ>*U#G0>1F<bhKKALx?*;or zQ%h~+HkN*Gvj29kqyJ=W>e(IB!+*xxd}~OIXc6d3zW@L0DgXOz$M3wkl(pgPmK|;7 zKaa=n|5fzc%r4&8?(xcN*VabI*L-x<*VhkaXSyQT_xReiYs>xSI&ttynXI_FZ3hFx z0!M?Vcec))J$rZJ*XzwTHMifXP4*OQE0}Y@peI$LEzv+mopVy6giL*v;nYNlSqnMl zqzInAU^4xIk<MWwp3|FDP9{fgTjr;exn{G$_U998W-XL#Q{$MlOp{4HbCwdvq{IxK z!yHXZG$i|kc}`DYIk_n()OY5Rm3|pntJf}FT@g5IVd|!7VZA|--ZOU`aJWBX_Ic&S zODx)wCHyX5nVf0v8?57G(N=u0c>TJ43)@sGt!^=OO-i&lw@K%;0gI!NPP5{X4Lp6q z9jQC7yIvM)d&uKFS%qKmio(jZYxGRbgtYEOUD$Ty$_v@w|J3(C_j#((b?e{L^4(=J z2FuhZ?RfXuzv9sA|K@S$9n!CF^X5=g7H-_UyVb|*?T^}*Dd*4c;L|qqiTTqO-*7uD zyZZ5J&)Mnyztpt1UbzzUKJD5y{`)pXYG34>USxfGHh({_{lDL_EdfqXujlLk{e0_a zO3Q?qt#uKP+TZUhdvWXNlfq#3oIhFLxSjWzm|ovK@n`4!%g0Sag<3A`yzyW5PU+v0 z6MN6s$Akoi?f*Qvn`7a8zjZr`tR8+@7|}9eU4#6@PZ!Uv74QFB#;&-f>hY9AcTN?% zzbpUcn;f}JtpA%tQrWjdhC5O>{59a==HzVrDe)juqifUV&Dy%UduxB2>CEA0xDfNo zw6y*B<If&;jlvdf!Yn5rfAnl};jq;{{e0e|i8V6EIp<7xe)-PJ7`C3o85<W~xOS>_ zx9qe7oN_0RZ*))pSWzQ$+;ft<fQnOxN~J|#vG`GgGgoe0x_4`BsMC4gPbtdtm#3z` zRf<=f;{J)V>51OQlp8FLlkRL*iU0TN%h#TgEvzvTEPfMMernh>sc=lHPJgn#TY8SQ z8^=pdp5HgW<=0PJ-?k(2cWmT@^gCM^f8Olh*0E~kq&xlRK7K3~n||%2^^tpLjJ6wW z*krm$lT9&XPJFAtDiQN5A*Nza!wYL&B%j`?k!}%i-hA}`w(u!e)0a<`ocZVZ^LLh4 z<}I6f{Tln4dlsoTcQx$Ty~wMuIf<R;aNAF-snf3%@k^^-TJrm6+~GGn+r!F^#h(21 z)cbWy{C<u|JBGU*DkoXF#S~iH`eatVieO+^@cGKSw3rLW3panW4!?E%^7U<-vi}Ai zzvC2NcPHS!&t;!b*XD_ytGE34_&qAO=6Gtx8tLlS_Qg3rqF6kI>fh|WsI@=5C2_{i zqmQc>OTU_Z^#8NJF|qrF<wQT#o;eri(JCU}FwX#G!M=~DXl-%v=P7G4p2l!*xqNrW z>1WU8&KI~}Y!!Q}f8R8_|5F3m+^jxLyAd6E?VH-CquT5|+x8Y|?OQtY5T}e{%m3<P z-M+_nY&Xdqot<~~-`R`mXFmM-?c<b~C+ftZZm`b3CTE_H8@rx_+WYg5g*g=4(!TI+ z5p>cyeeB+;Sw`ss-*ws&&%G0y?tiqHf9~(-8`gi*n_Is%IN33HJ$U@sxcXZTXxAn~ z?4l)6tquwWg{4zWu4%sG;|^J|E6k?!mP)Cguyx?A``iDn>TZ8}^0xH4IbG%kmv$Ds zIk@-s&E0l;_dI@Z>Al@Phrpia0lUxNw@yvW{c$QfS<q?y|NAY@_V?!O%-GR5@!Xy1 z?j7E*i;PYQItiy$*!Ae|DYuqZ{POZ1>-WXQS*xWdzY~A+;{}t`iQENO*SH=&tIIoW zom_Rs|FypPEqS*$AE;i^tg-maiIDft^ACG>XXUvsssDD^$=&?nv8fB^?=R1~zwznp zZRa`d=bIe5|Fm8I-#H)6r%ZL9|DI(3?(*#UmhZ*}BA*y5Cb=l>tovJ)>U#Ajx46Ww zncQ<roxHt2Z|yjdCv%~G&HT=dC%;JQuSlQB%5dSg#>=#rmJ4g6x7**|biDkA&(j#b zExNz{{md_`waECO5X%0k=H^XH*{JOM_fB59bICy8J0>vh{MH$>UVkk%)E5XX`uvrX zN!=qxZE0mq)1-?wc8ZfPv2<?c@ebta_rD<GEU?4J?fBGu{#jdgd&R`ZDo#9^k!LdL zh#}A7%(mm|QL{8#CT!z7pSvKm(la*m;$vQ3o}LnouFRZ_hkk{U39SOBJoP7U3;1Mb z(N}o-{TB8$6YuvvNV{`S(a`YY+N-aZ=x*A%xmotjTmh$P)67=!y_z{|mUMRZs-sh% zn&-Ex+wS>)Oj`T;x>)AmW(EdZugXq4rxQ0<{tww7K7aQKwHKK`T_q=Obl+UOYggIs zOC`0A^Uif@-<LBf437%hcxl~_kPTb>wl}-PUk()6ns@itnJ;(BujOC77<TV{OP)yG z+e;@m*T?QEaolGq&cIM&y>#6!;lj81vX^HyAGi1P>0KrnHFG)}Xqw;B(Dc`XkN!Pt zqJ$>Pt+1NI_u^NR&0OaR7LKbbQdd<)@|`)s?hu%iwCMQ($8Xn|?P~se^Pc@A=rmc) z=YP>_{%)~7dy1cb7jd=y&%(g)!eVLI7fTV>);2jip{kgZ*Wc>tUJ}#YH*M8o(0=4_ zpZWiqp4CO_=)aY|l>Bo?;`vyQ`vJeFZa;Rmw(`i@)tT(&?$7@2&RT9{xMt0yy>=Np zY(+lpmJRu0dfh$RZlCbq{%2yJ<{z2*ZSo``lkeun3=X*~6)s*cd3}BT{jJ&4S1o>V zc}L{$OI+2-_Y!!5*Y8!><-J#DdE{@qGbi3FPI!^M;>eLBy!rXRKK#`WmGv;+EnTg> z-y-$?KKT$?4u%EWU(WRmIzQ1vWq0}ew)K&r-O&@$&$3_cdZ8S&EbQvT663b1oijH$ zKAyNjL3C3M!xN3Js1KJGm0!ybELFIhe}&`!nJ;&a9B~O{XJUAft8nrCj2}NLS^~0G zsS3y}fUO1iw5+pv`J=SA>Nb0vXWm&e>Db1c@^vehJAK_WN9t|y{<gZxhmSI6tYdCi zRQmeb{#{Sj#u+CspIUw`Kk~yRr4>qy47<cte#r_83N{K@)&APDikXo^@yUY+6K2l+ z^zFE@*F{5L{kO%fe?IEZ5)(;3J4bTGs{)1q{m#zLnJ;%PcKcCYyQ1w^+RTu*Va*pV zUaKuV8U6a&TF}a@hB($|FUlKSlrCPr{J2kAN@~G_Rdz+i#m~<~MNHGYa3S*d*G)1r z<L*4&u=(D-=1^Jh`3%KhO#Al7A7KCgd)4cwe_nK)S^a!cd(SI#tplpM3oG83eD~v- zG%ZA^Tz&c?38v#)wp8{`662P3-tU>Wt132j`NO~b_xFfNvi;x5z_6?P*-{s+Ey>6E zettaI%pNMinQ`>sK}9>mwAbgRo37ikKH@~Xj(o%NNggUjl2^a#*ndvU%nUs1e*gST zqvNX$wrl;W3VZGq`z|hwPcN-}efr)nzfOq9f8~s^cye#;oca59-aGn1z^OQ$-Q6YT z^)Cwsh69Z*`}e8{ojfjIpOcx{DX?kFmOp<!pHDPex+`+$tF2$&R5T_}T6X5v^Ry@J zcdfo0k7rLvwPl$1^w-zd#c6D%wR2`CzEn%Al4#3({h_U|?8XjTfx{cl@h(+<pxja* z<IEvBo71ho{OnnQ?e&Xar%T#o+>o#TbMvSp1A_yf(BE%X6(15jJUkp78J$)vSdehM zPc|_zaTOoe7SN7R!KJktPna*%O%)C0`{oxbzkFHHp-nltrIUT!o-dhxfA`d8fvmhq zs`vGMymj<+SM9Abv$Rv|PrZ5T)v*)aE4QytJCWi)|Lpx&!cLW*bKAG`PXAus+PCf9 z+Gz9L790!=CmaPg?!C4qQrTY3Qz-5Gs?AeZ$Ibrz=*&rB=Bvfm?97$zdD5ORU$85G ze^2(g_2%y8JN;r)r(e0-e@<5*w0GWvqK6qas!MDC%ncImIxn+pefol@Pt>+-GUmD| zKlkT`5VfVUch4y6E$J{iHGR+1?`sUDU(GtY^y^Dc)hRu7sb`IMmv)@r5O~*!kAXp9 z#f#>9Ubf!915U6n5I%M4l&)^>E{hWe@$L(!9(?gp&-?n1oqQW)?2b*$mN!~8fAj7O zCtSWC4X>?H-^C~Wc*dUv84o`NE>_>+$0IXADE`i|8M<e$oR5!RuajR<`Bfs%h@XLB zg{a3D$NXhso4+Nx*)hy*ei)IN8Th?#rNvn`b%WrCi$$;MtmW<XDdiM$=ZL%^;k7jP zZg;BImFQj9^q;wvo#}n^j+dW-VHc~)uLaYC+b`LPd}4gj6=}TNDt|e%$g-Q;pNGYs zU$|{@8o$k-&vPIBd6l>G-%{=8yHaHs7#t?NXtr}|g+!+7F|}hme_F=Mw<kvYJY>Oh z*y#VdwI{W<Z00$wr8DoaU9zIAm)q(8bGBxzSlfJ3-&$$*?3CD^3CmXQERK8gNP&St zfxXl2h4z&ATkTGE40n^hya@c*xiMBoMayRKnjLy}YWm7MU8X4Z^`8`;e&sHgcYpuM z(|+3i{#w4?I_Lbf{X5R;>#pkEH|^xytCxIYZ71K+YWDBc@9H|?!VzmB6dxAiJ>f_8 zfAeh%*Hxb1wqesFy}x;$p59XC>!i#6vobLF$={VM|Nic7V`HPA-`vRcyoZ0in0+m~ z<7kqq&I#t(cUKwTkPLrZQNeTP_uY7wi$C8VS)vO%`?6bN+S9Zr4=mgQdD;>!8Wmf1 zEVBESZyn#AlF|0sUtq_hIdwC8jtLy%oU=?)=I{>Azf*dS74Rs!2+aMz_S0ei`)_Xl zpSyEs<#Klh1_syKji4ctgU#%dCrt{G<p}7Vr}x%bQNAH>d*<b1&h7jqsVw`%I)yD9 zAKAz`e&U$q{($A&b*0LhCWV5g1C=&S%P;f^O!}U`)#2abJd0zG1!F)Hpq2f{UY4{h zUFw?phzT?uc$cH=vMihE-?+u<UcUoQT;~Y5c-@8Z@iBegxW`Xkta{~8#o`;Bzb;xv zv{qQCmchaN)nC!tX{q^lc6@xh{r<lXhxs`<IXM=7`t)hBdw&sVQHr9X;>(vWCr+Gr zdwYI=Z?7wds;X-4{e6G`{QNxO!uPzp(cmbxef4N5_wD_+eJ<y&Enm6wT&%^u%G2x< zo-#A+3V-karT*W~=N~?N*nYq6_VMHC&(F=}SSYOSw<cm^)9hWsLPDEzZf@eY|6^ce zG$~P{z8*B4|Kt1pdUG?gxIGmg=hy#R`RapX|LbY2l?j=$3{|rn6mD#MJo_(u*($3E z@1`rC^6}WWyX2)1q~@xsUnDOkcJ0ocGX`fm1eMKlZ?y<S?XB9nd9(5NH`VX=rsw9$ z3J82SsXjmF)|Qh;kE-hH=O6Er)ec`b$GZI8{rdlFFWqRIRI+pne`^iH6g2~b2}h&+ z=G)$x{py$HqBHCF-!A%ii4|;BYgPTC|G!?Ze}8-X`Ae6I9v*6~tgMVtb`<!;r{Za4 zVNr1W-Me>P$9sEwy?RAggn(m&-QlF)91F9YCk^J;b>Ds4TQs$Q*-H7kU(b?mO#IFN zj+2Ecw4IsZ1;}Xo+FxHjefreQ&Ob@TviRAVRjXE+S!us(zA?{M&{6;LKX7&qn7Y(^ zx{K@mJLL(x-KKvlcA2^QfBr}9(_-^%DrGj+FgWnP{M-5O+1c5wOb6FQZvOY@vp+L4 z^SX)4GG{HDUv<Wy-+Sk$vJ1;?wu8MJa{A7lKhMsdNK|ImiL!dz@BF*iW#+6&AFp2t zX^r2#rSSCs?dA7B22Q>C|G@dVv+h;<d-!`e=_@)YD9AFhIv%|mTM`&nziwAH>%-M6 zcAq|VYr|rN1qw=`D>-c!s;DTkdb~fmMBUgk?b*HGzaMW(o~FR1Qmj7t{O|tSvv+3h zEPi)ngL?Y8;(6-)GXL~!{~lTsx%o&R2g8|}Kc8!~^UGh$+WPV1M@>!5?Ca}Fi;8Y- zNOTSiyjXs}R$NSM+N@bov9WtAKR>&0;li0SXS&7p!@|P)<n8S=H9I?ujEv0k@BR63 zI6}en0mst6{`UVq9o@h8*%{w(k2kH4W!7gun7mwH;_K04OiO++Jc`=&<>69q`E#dE z-THU;`|rAYVfO>(PoHgFbVOp~<6WK0p0zD|wyfg=M|k-4o5gASzTAorILgkTZ18{L zhp4q?_V)Yt?zPp@I(6^fybdcXD-kZ%)0=G07t5&MNt0+xjhyMDCKIAH)oQMv(!>{E ztCj}c{M#~PvHgOQ`CIR=(?8f#^SQzD7XyQVz>Ip&poIZPjvOhmPs+^n{J&c+e24Dz z)4T0`cijG)X}}=q_4~Z-_d9=BxdTqHGcYv#V><fsc3aoK11<A+TROVRGcd3*eU9(p z2CZZ^U{D0@fo5PZaE9(yIwK$i*}!Dn;sRdme1L~SCI7#zxcbU;_4QX@t2Q!&7K}6O z5LNlLJ@Gn!HB+s!UDfLi>%%`R^`4p3&b;i!-tYIcwX}q+xj?R))G6!me?i#l=jWnk zOb>j2NH;-5Xq|CY)*<K1?`6LpJ=ULURMS=<d%RHEJnzf*@BCa`Le^po3=9%40xtf~ zbyD2_W6x%0`@TdK7nQ^(>n5!{X)PUatNopdkf)p5u{%49kAjbnVG#Wr{cFC{zAwk@ zyK<g7#w>q-rKR1ikN;oZZ}V%{t}SBWOnO-P??|Wc^Yin!Z`mSao)?polM@>oTU1n3 zQBjeTlM@;mT2%Du!^6X?SFgT&>5`DJuzR1(%(-)G9~@{rapFYe<}^bd<!_=43=9pH z&aVH%zv?{st}^A@=1H0s23ha#)w=Zw9Qpck`FuIcq9-@g=gS%<9ohYUpSKHW?t4?} z=}ntAcV?WPrVF}8UVHtXNs}fWDvWV*I<zWu^}b)PwB6m0v&+{MTwdmz)XvYqz>vl# z`git@QpNr13%C3~uBy)~`}yU$*xLcO<Q4d2twcmbjuhTGF;V&L+qa!BPO8uU^Jeq; z7VyP${Puqe9v$h_4qKzJD1YD2Wm~p<S-pOr(xS`D{pD>cK1_6%6VxwbU|=w)U-9Dp zi|-<zs)f9M?_9p5ai8Gsx*M053pREBcr5?_$3=Jf%8Ck|s4XkDYzeW@nCivrKjCBw zBO~LXw;w)yc(>hDsy8s1m4Tt5k-hVu{*|oKphss!`}e+F6rZ42y0_W*#;N8xU%%UZ zJfZE`X?!)SbiF%=TI#VL$<oqNY4f}(CsQ`3pU=z5*>iOA?(!##twE`@hoSRdX?fU* z_nsPW#pi8y&Ak6+@2^*@uU)%V{OrulEt!+&&YfE@AvJPZYJS!1#}<dPd5?oq;xCS> zFZsKb|9{^wsWSSN_?n70XZi2{Px-#@?TcIH-qa~u_`7Qb85kH6wn@x;ezecgXLsF= z&qwBm-N;hE7rFji{;QPG+^#A9cK;LZ{jsbqtTT{m+xc<2>*}k|o<HBdeY?A>D`$71 zH4(*y=B2AVB|L|7Zf;6FIY~8%or!_rLOWaDqI``fw~LeCFAINe{?X>TlBKZW5!R)D z>(-_(;{PiS%IgvwY#IG^`K3?(%kd}|J~%EqzufIQXfrK?#MuV#FYoKNoSVCG!meE} zK;h%d^8^%d49XG_o%;;Af7&kG0!niXZpHyZwHvt*d;<lc+CqeUt?!>T+x=(yDehOF z^6fY4RIjDiU+<RJ)YKHz1m)O<+X?47_pKEDRPB^`|I5m&S@H4r*G6v_y7=<)^5o>? z^K&ef%Rn2281|pFac`E+b*sxixTZFETgu5vxwp4*Znw3uId%GUs!@*S-TjGub_@(W zEPoX^_r)%YKk=S(X>IVfvbRx(-<H0<rg$1uB-Smge{yjDWX<v?|K(oXGWTU<Wb78# zS5xBW?{DQ6?~>(XU|=}#KFO}Lu3qQK_m)fhGOJ##T;7rK^V3s}=gbTY4)qt~g&)29 zRSouzuWw9@jG*s4o5(i~pkk|Teck*Q_fr+)l@h1fS^oQP7h|Gk_@%8q=1%VYUnw6y z?f3u4Tk>vcLO!$CZ?&VhZds|Rxp{mC1?#WYI-Anv;_k0&s^839w7OLPe`WOdX6^rb z6E4ah_v@|PylKnFcS?J;nX?r7qt=G43`ue?EZ$xIex7ytx*LIa=4{=%b@l3#wbPeg zf32;hb)@gnGbU!{>+9q5XW0i_{*%eX;81@hUifdU{hP{1{@OWPh2QTBKYl3a-`B?F zF?Vv+-T%#hm=Lhyw*36LCGRH*9=3^l^X9_cr_p!z`h{Ix=JE5%XZ~kr=PQ@#)Gk`G z<jLRvIXCvz9zSs-GwJxH|5L)B@2Ix?`}XK_A)#ZPvfP3by_WuZZh!A@-SO`a9T)5B z<{aT$K7VDl#>z~MUw=OPKR(`jbd~@E!w%`c`WN4SmHf#WeCV#t+yA?&o=sZv-J5&; z^vVA}{%nq~uc-NaUb}7Aehrz4r<Xo{-{~<!Xk+#3pFLY92|i}4{B8Mn&+AK@*PoBs z|I4A>P1@d4CvC_4=E+~%^JPP}mu}Q?clp;Gv;2(Yn+G|2-)*fe{~0(tJ2QT57{9F1 zowJ4o1rbfVSFgYE@Jo1>@9Upu7N?p{FMoSWP*_?yNo8~Txz%g4WMs?^p8tKU%;Lw~ zExXS3oL2wT9dv#F_Pld*ZYH%eGcf!OwSRr_efLEx&S0f;D)GM7fd*Ml8wykkt3s-> z3<XWivs#qH%ucDt&zV)X%|d^5(Z5T9otGDj*_x?Y9QvD|f3CCR<GTwP)BlzRwY%+p zIQOvB*0Sd(_phrdXB1RD*TL2Q@mEsqr#G&LZT7r<Z{%0}_SXG>cfTKAoTk<r-K6tB zFCzM;uZ(g2LEH0tK7G;>JZw?<DWrOG%CjY@CqBJzbILQ!I&r1_+1^iY{#VDn0S#2k zzc%lzyWe~5BX`j{y?ih0K!YkL4nfT+n=1KxZ)`NYdhg<@l@EU%nf?6wnO!C8LKeT1 zvQ>Q2?wfhi{^=HzOdTE3`!zL1FTe1w&6#5SPI^||wizAko`o!3K5b1^Rr~DacORek zwcDXx{N>1m?)0uz+Ow)vqdrTY_<T${o1K+M%$mzMF*h~5U~R;a{|5g)e%mFuafa^| z>m@>&8{%Wa(x%;L1ZA(Q_CkO6&7SyP{E5<<t-iiH&9Z6?4jc5_nEspH@4rbW{dvOG zJ1f+bcE(uM9u#0#U%k`YZO`9F{gRogE+P`I;!3t|dyzG_K*;_1>%AryoonlF&2)4z zelH&tf7`75V}W$^(|GxtSGo;n2WS3&ax(Z}U13mX$Qp(%yZkoZ+tuGAYxVrB`8}bh zYp-UN9^9Igt!*86@2-w3OMl(lt=EtCF)=Xw(hiP)nfl^H`9m>-OZWb7R!Q{wadS$x zOGwm;SFf%d_vhp0DE$5A{_&0z_b#s5>FDdSukjr3s%>{~>q*3^PW3vpXz#q(Ut0^d z8|+`UY*XdcU%&O1PJNOZw(QRwZ<mYCHT-YR{K$O1G_F4~L9sLxUNJ5CU-q{C-^*h+ zIylRV+pc_RzFMj(<fb%PQ=;vm#kKqDHd-Z9Ts}$v-x{O4tK`j>@8|mDzMqeBbXnDQ z>e4Cg!^vuQeGQf!IB)&sb#C^xeP7!?-miK+?fo%6)AL6kB^7Qd_w~~aUw!rO7jYQ| zh9jw$L~E6E%4Qp=KKiqg>0#NckJ<S(J6<f_&d*u?R(5UFEEAU}uQKy9mkRK;xl~0& zYAYq}_2v#ewAf|I<xTuPzxV}XErPe?SMMsgaP_iZ#nc$Z-j1*Dx*wcfuw{MF%6FR> zY^q+^${b%MwK~lw$}0KNr5PuF*tYMpn78Y-dAx*_h`7|3(=mTu?V5DvPH?$!=gSY@ zzKFkGo0}_hv?{weHT`wMCgXHQh66`tX1MNO&;7H>{(tVN8Am4E>~5?7Uz(NPuJ`uG zR=3dE7fu>KZ%n-W?5LND&!sm9Gu77>>U@8<%zfRn5Lx>f%LB9B)mYM(h?d(=b<&(| zXMgV6xkpEjZ-4bwMo{+N+^vtEW;QD3Jw5t$_qI9j7keudYrehDtL=UJ*|n;+#Eui^ zwM~>#Zft#Y=Ez3wy3eh5|5x>NcJz04yg#e~D$aXOiwM^q?x|tVv@opw;U<0G``?#% z_mrZQ+r0f<+`pyD-<+;%Q}W^XnZMRX5^X9$o!h+alW*KE`!<btRoTOfx%20~yO6>A zeCF1IjCQx(8XxWRYd8I9&X<q=cwl;!?e@yUC+C;NWo2G_u_Z@7j#=<;(5-ORUv4u# zuK9c4bM@O#CEN;1^PXpiq^3>{*O?M_F>&$IORxWLH8;B+r|GkO)0WWes8(g2<6+mQ zUAa1)U)JVgfwfi5nWJlx|Jgl^d)IjP{Q06Bw{M01-x>73A9(X;b1AQ==VP%~Uv8b5 z6TEF(U!tRPhsWiM)8c2u#Z{Ub{<E`|KK|&_o@Zg9Aum=atMB*riqM#@$?d&adlk2} z)ot~@nd<{0I97|in!W1ty4VXPTYM$|H!R8DcZdnp6g<3TQs+MDwZ*})bF2Cux9ZIA zxRM+DYMb6+XPwh8zs~uv!tb=yrW&PJ^Pc+85wp~|^Z3QS(@R@d9Z$>u@S#k?^53r+ z=YH)nQ%?EG_RM_3^KCCmqHI_1uTkB)b8FqD9ls;{?r!|w+_r3%V4-L4+0y&(BF}%e zIsf@&dYRbt=d8cnwq-{ZtzX8uKGZa1p4Im6Pj>EYyL~*k{!aCe?lpUiLrwpGzS<jh zeQNdBn5<(5&*}MAm3dWO-MZ^nmsIG@r++p-H{vfZ*&-ZR8~pX?n<)n$CU4nwZqcRF zKU-gl8}+YxrOhvUKWeeo)YDUzpL;v?^c3OaXC|MXDxY7M`hQ}t%ar(njmy^Q)Ezmq zX3yodxk-7)co-NMo*irvs#Pv|@|`umUVY`4U*Gv+=l=ThW|j8M&?MGmw%Fh0YgUGq zzPpsT(`VzGgIBLj+xC-H{FU^oMTgxyB~EtiIC;Ixcy@H?^ddhKv+KOlHWv?{wXgee z=HY)?mX{A-iHlFY@VCr6+BxVDbA8Mnt&$59-o0NmL3{CGx7Q`HZ(mKjaiY*`>C)Cq zL6<L@sZ=?+FSj~i-t_#ZZ1sJ4GmF5>7q6|$<mK(+mN&U_>5$v<_fn=QuadjtF2Azc zynfEt@0`j?<>K-7?=M&e|G#qUTE(Y3_g-uWJeq3x?_MHbnV#FfFANL}2mZ`(dEHlN z_38JCzV$)#YYJa^zrPbbAzXQ?=fBO*9KPS$ufdjfec$ZO+h>2)@1Cc<ihJv>bIR)b zC!e0mwbMweMCANuR@Iw%dUkEkIdcDA&o7^S>9B_iU)j2E+x%Qot|ymfdPh6Y-gWbM z@dO{W^((cvZY|^Z)SZ=^J;gJXuS{>MsjJoAZ&8J6r(em<`rZ_?PGQlnWve<KJY09~ zp39XRF{@u@Jg%IVIAhhUMK3m7beS@@{@Sry|ANkWw#HQcU$g(qNp=<n1_tJyAD#Oy zT7CN6vCVsb-B-qqi+2d_`W6|cKUs5<kXWhxiNYN3=;nv(7P{|W{;r<+&Vog|E?n0> za`R&I^PjJ7P4fIaUwu*2r8f-sJ(O0h(&hTn-P8LgHCF%h#;vP1wf^_LA3Jx?+nhPy zWN*HBE&AxCoPb%ziVv$^Y`EBb`1qZNSD6?X7``Z^{k(HR_9ycNhL^X}BW+K=%D0es zARKo;A~dvm@8P)fuPW#9f9c*cXa21#i<B0X`Fdx%+MO>xBwW$A`{mntTG?FAOv#-q zeD9v|kVt%(Ul`dpzdU2@sy%D>MlOG?q%`mO>D62vE0(Rha`WQhQ<uUjcKWErZ%Z*1 z{Q0{@^4TAWxTV)$ugda%_s<wq;t8x>bpJm0&%doVr+?E=Qx%_<w%T;<^7HTI#f(on zWopXs^UK+#-T1P;e2=K8)ul_9rX_#%d@L^^XS{RGr&r6P<34}oDlIDD=a-u|wcN`3 z|C-gC%hT??G%Njlv)i8ahfB({xp~?7R<(8YJ}!IK_8#Va9}yaCVwtEY7<x_QR|OmQ z*8j_<?K(8+jl%vH6As*1YrpPxdCKDEz1cZOER?kL&VT*N^RkZ3cJ=NW)vcSojq88S zZ;f;iR8*dH{$IfTkhdxC^CEN;{I1NpRy@7WWcw-!H>Ee($2L`YbHAQB`M*M02B>%4 z{jl=hiTunLC$>L7_HD82_P?^{i*+X%3p&U6tjexGw#9PsBC&gCB}=T<x@e_#Bu4HH zQQMuUwRG3wwF@`ix_a~WrAO1fua#^m&ot#LTPJhesHf$zWm|{(Bm<#oSB-g`d6W}X zbe2!|O0g}!arM<Mk)ov^uC<k$$fztjr^hQ8sj>Fo?>~M!eKKFLo;qW@c7k?n?4J5R zKZUuMetop_JlD>;*}HBAW$I2o`Tp5u0U68BUr%msfB(;B`|HjA`_EWjf0R-GIsbXZ zy!ih=H(z|1Jn5M3lg{w$sCut^doH{YQ&|#kH*aRO)&=uRH!nJ`-0)_f=IyzbMbBQJ zy=}+M!SSN^1p`Auf??UbyZ-L4@2Eyscjvm#FDu$8XvkJ9dqR1-_7b6$E=m(mi`u52 zkB+|etFpc9{HM+nr!F14c&|56Vr7WhM30o9nIT$}JyQ>PrWpPFdfUkLyw3a%9?shD zAU`T`FP*A*T3xC2&Y=lU<28N4O~c$;c*+aE#8ln)UYpx{^l9ZG=WW;c_D*^_Tc<5i zXG)lm+aZIVmWel_ta+s8Xp{x)?Rj3QUcLQy`Z|Gc)qH#%g4Rk53=$W5uJ5|M-u?BR zr4I`D)x~EYtD3m{<At~UPXbq8T^9V$oY_}bYu@gAfAuGyyc_%1Cg$%E-jgeK=@#bY z<`<QJRaNSHzACHB>(u8pI=RV8$4@RXQaW|c{`SS2=M026l^<4IyLr+0gnn1YtmxO> zr;E1iTK8hZ#cN?@QL*8XPec2X@5a<@`h1Q@)+X@8hTYlO`RBBE9QYjLkuYa+v$UY8 z+4ZR*PfAO+{H|>OS;Z=Rk@vZzknKY6+kqj|j4f);Y<=Xj(nU(rD(L*H(^~7VtT=Ti zwubE|znI^;%bB0K&TZdj%J##ps+z@+=kdd5^-B$$SHIn|_22wu>!p>RSMJ-Qw13k! z553?Ym914fetv&=oR5KldFn)=JYk(Dw{Jw+e7$75?VH%g$%miWS~PV$DSG)N^5Xjc z&;KbdW@>rP)6ZY^c(LpGHFFeg4ju~n_v5qYySQ(M7VG~{o_FcduXwM2%`yMKyjk-6 z{tVqKdF?%15g$L<*4JmRYv0Z+$jeoJ{_L8P@0+H39EtDyVD0@oYirfnS*E9_=^Cfy zq~%BWC>=JiSIyryq4bT@vyCSozuUfXo4B>c;;h{KHET4r*6u0NdpsfPu9u6w?CmA* zGK$N;dY`r^dGRCcVdhfNp9>wGm7LwZmRy=2yiG%NnoG&ENB+-^`1twcUq5^E`J?&z zvXWKar#|z^-k&wCFysA0ef<>K*Dv-I9<4m~^s%I+y3O4`U)Q{Q@KM)gO7Yh_FS&mw zDLrCu@4s39W%c6a+d#39nH3m&#!pPn_q^Z9y=D8h?tM9X?)w`NH~V{L7ybJ4@AC8S z!hxZ=Cl5Z3ev=#f=50*fk4$F4tL9<vZ9ZIF(C|XAaPntvy}V!lbQ5P*oIe3745vQr zk+iyd+V(}xuk*)#Gcqt7aJcl`a(iaqwU3{Q=UC_#-7KDbc+uWze@i#TXl~vVX!rBc zl`or*Rz^<!JiSk8k^P_4MXgI~-g58OS^MPQ!FA`>nN3b}`=5A}WoC?*OP!<M<4K2h zTYYtzVxg>MbL@5Z*OQyYc|U*H7Qdln%HG9S*|Yh@;@587xLLyH%=dlnZntk}O}8_> z_kvrg?y4@^Cl1Yhy}f5wg|5D~E>=6NCCyVWSVdK5*1R7dKFsh`emsfo!Lf+kw`W7Q z9-Vr%b=5JghwC2&I=|=SmJ$+@uuc>T+;M<`L1Kxgi(|-{J(Id#_xdO&O_q5RQ?hHF z^YQIx=X~kd?jEpv*V79h*M3w^Kbi8$VZX=HLq_`_IAsLHOsEg>&i>o{d4Bx1l&yQ` z7JvV)wR+dA!k<Te1Qyrqb$Zl(zNg#g!Yixqa{rX-e(1~$NlSlilKkn?<mcb6nTFge zkmEPs|8em%p^5X$ZzzA?KV`~>7b&;$%*Er)#pP#)n3WVf+UecCd&}JW@BWns9b*1x zm)LyxxQ}Or!w+FSrIeQ5se7IB3~Mi4k_wId_4KiM@16}N(d(~&w0Zv6QX_H6PTh&@ z3=F~-x39HUvyNK6YR$^v#oF4d__>PzA3oFHk@0lDxD2Q#QQkXGVAIRPkL?)!9;>z2 zey!sYym=!s#v=C0f-HZ#37@}je-<{)OepZsln-C7C@B?v-ctQ%=gDsM{pM<hUmnd| z^s4LGZ#l`muU@`&`SN+4PieIH>7rG)uIb<N-B+^C<%svYmA@V4eYg8Fef|9J7Z<yi zzq>PY>eSQ<zl4N@`Ns_Y&bwJ#RcBy&PtH*}NnJQ_Lj05sT#<Ug%jW!bT>bjhn-FQQ zPw&?4vzq&Dx9w|XXLlZ1n~5D-+1)BVPtN@OTeQ<jFZfqwYee)-VZp;5HG7;?dX_vd zS7tpL*~gdHwp&o~u=Xl$tKBATz87k2nwJJehWbvNz4<%u^M@9F9W{HMI!+usw{+32 z0L5@Q+pW%e;Tv?MUr0wr2A?nxIy_~0$ApJ6=ck6oNgC(ODsWl3;lnqMRckaiZ7zK! z`E$YxPU~-b=T9uQIia8B@x?`4{rtY4dl(rK9E9r+>uh9c+Z7pc;`@6Kbx3c2!kN!Y zi>LQg{5~q5y*g@MW$v$sdvCg=Bx?H4k=y!k?qL@Z$>)=+S2lI12tC{9?v{VAps6G6 zp8b}6+j8GMdMH(TJzoB%i_2~Ed4GQ$2o_c4wccm7yEa)%(Dm3aktf$XDmJQl-%tK$ z%Ol_vzH8Uwx0BDVx7qR_Kki-Q(y8I=rpEkNp8Wi0t-HCG%B7dW@?w1(s$`EBC%5^& zpLyZ`t#@g$xB8}C`!(<Q?JH*wWhihe2cFW+`9J&ncboo&=O?6oT_@M9*1!Ayhk$om zKj*$mvt2DNCK|&(`-fTS=7;No5;L>ke#oA<f5V@{i#FYvqrLKWUCj48!txQ3T{|P> z85qt4-QV`^%xwGRJ8bj|T%3)IUx`@@bS8Z;*uVI<{_5MiI!>5h*y(t6TlMYMxAF7V zuFX<h^g-f%(;g|MSq8d6N)tIk{~SF0XOsRk!N5OH43tiJ=qfIHp}3E|EbYy`vWFk$ z<tQadq}?wUKi<Bk>iN^V=l9v2zIXA|$)jzFGrnE(yQudy{DaN)Gjq6PE(XNR`+ne2 z>&K5DwZqq)Iddi_KR<qN)z%Ml9z9Chr(fzn>CDuR>NjTTgstD5n7uhFG;;Yi=NoB1 zq6*die&1|0``_oSkIuAio-e2-xOAEPmycW%J(fiNOm9*DV6*=E>yD1+mWO{mljiv( z9}_e&J}@@H;?c85$*GyMtKZHk*uHaX+{!INr@oobasToC)Q9z94f#j5KJuQ`_xknA zuT^u`hj)Z1`Fh)DRCKmXWclUxEN*XIQQz|r-l-Q87w1d;ycldPQq=vy(fPUW@68*S z7#SEAT>n}*D>XN_R;6<P!uI1Ox4yXd^8b7Gc=Dm#aQ|v=?bZTol}n2^ZMmp_V&}qj zZ||upN6j(~*9+(5Kg#pjy6nNHFRX<-r)%Ba`)0QE)pv2<*3BzBl>L+|v!JDYTk!jr zuM1wCn7W2LmG!6T+Ox8cCmrfqcjXs<(bLL(YhI{*bqy@pw93r&l<)Qno3?F>+gbFq z_`L1*yt})m$JbT9zP5IeONQJxnO`;*24+SnEjJoFd@f%sGqhg1GPHE7#^JL^k8jYN zu{^qAZtvsgx5M~9$-jB_Xz|O8)93877jCgCsmb<8c(Zhlu+HlIU~}y!Ue?mbD=*Kx zQT(F&)2eK}zIn6GZTq<R*|n?TBGaE{mBv2Tla-S+f7)iw%iHBGVOf3o`}-p<JyTDL z`0?c_KVEib_O~PNn&+QfQWT#4{!deP_cNQt6SUWhrkC0G?^^u!&C&TCFTVWz>%2(4 zVkf(gjIsaKfS)(7O-*cW`)Kq0%?nE-z07-G?BCn{$aM8x*uA*jZ~gA{Lz7;1dT;-? z<K2OczJiL%UZ;xH`(hP*#9m2O2Hs5l)^hK>_Le0|`JZ;Qf(G6l;tlS#MXGJ}pBAEJ z8TjE>&%*reCYc>4uHAdo9(+Fb+=?Buf=mA-#JyYE6`MY9{mPuWuP5`>&-TcPy!-d9 zdw1uH+0NP$ZIv%O*Ou{x#lMUFcRu`E&HvI{&h>KNUtI3|UA|<x`1SX<it1j>SnxdT zyw6X|>5qThjXob9ZlYgl^Y7wv;r|~$<t==ozw7ob%hl_TXW#qV7P+kF@ecF*)o=9s z|DHb4o#$I{Sf}rC3-5`FN0!s3o)&Fu|56p3T|K#ZZ}*3M!SjVYhd<cpPxR_k?@P9v zH`zdF;g<DRORugv^)^TLZSLGokLB0BBsdRyM1<Y{JLm4!)zPnJugYC3J4fbD>$5p} zx$e2OJEtyPJ9+Q!4WWm4pYN1g8=_Y7iu=CxN1OY1Rt058-HrYGWYg>SOD|{g%iT9h zyHS$v&i|0(^sCoWS{)~jo;>|w%e;xNBWr7ur-ogB`RvW*+Uu?JHYAEMFx)Xre&3U= zw6wM@af;Zcb9{3jcEl)d-Ml>~AohROy;D&O1G76{Y%Tq~S#QeQdu5FsId64uMXf7; z5D{^TSHHY)b1rBcYE41-!YPrrHD*h#)7PGIda28j%NvjF*l@q7+i9Oh&-@qVWtr#V z{$zf+kU7<~HTSKr^CI;Zk$<-?^1kk6^jJyw&mQN_6&rV&={^=Xy=j{n-(&Z)Pdm@= zoRpTCsQaeA#P0Ko>D3Fiy9)?rTHX4@efhNZdbMNs)6*YEgjH@`pyIvywTyAjuDxrE zorBLFdz)|b@qx70(pIOu#4Xt-2VL&>ES+<AYW3GUhrj>*+jj8hUe-=Ku(!jn`7X(x z|NQ5>NISuoTh@R&Ad08e7i~Bgcm314^@~kYe!5)w`}AvRZkx{hjxDiO&eQx|tYovf zBI~~Q)d-*b)VqGAYw1>v$4_?d-MVVi<mcaBMb=K=_V~w5`9FJ{ZSVfMtS_&=XwjxQ ze-3>)`S{)U@0`2CYC6^Jtlz(BJ+nCXt*^_G&wo0v$hS^ew{PXIq_R^FJ{U&DrU$-! z+I>?~cJABBkKPv-etGrg(v~fz%jVooUAV=rv@U=5uFxmi?fU{lrYT=}Z0Yysejx)x zgLKCQC*_j2^&g&Uf88{9?wV6S82{Aq9By%|44r1yA$#KPtCY~Mo94>b{5&=B$zSHm z<<aid*A@O}sI!-cCSR3*S6}J!=E-68eP2Iv1)k9DI#tx}=KsLr-Gz_2huQo?PUuF2 zy?-jFlBlwA;zyn3-@i$?xRibs4O)5T+_g@Ou_5pCe%rPeD=u2GAyCgR?%OuMxOa?( zf*&sn%a^?}dm?zob3uMe$&D9Jy{~ieS~4&&sJU*5s}$CJdq3(+!2Hc8!=q<e9pQU& zZsCOb=3mFM_QqLT)aV>Gs0yq9>6PW~{(I@2$(Pmao;;V0ikbKL%?mvr$CEo}J$w1g z-=!+-{*92=kDj=?h;QoSdTSfH^(c6tCoR$QoAc+m4V$*eiW$FL{Wibu)7jOQ;g^;O zX$pp3pSok`kB+LH7q&~ZZQQu+|JI-L7#J8H2^H^Hc#`jl;fZ|_|IRqacgh}}YrM6u zCO9B6SVGRm=f?9DD|cSIb?Te}V_Qeot5Y#^Ydcmf+U0OH;HjXzgUi-cM&{!3oi0Iv zu{SQR{PvwwebK60iyZc!xN)N5VXMsfqb^5|xAd=Fq4%Tg{I3%i1jD9n3*D+J>~`Mx zpDAc)XF`W)ZF61Vt@q^tC;pqNKCL`7D@rLV*!*=#?4hbJQK6O7w{70I^V+#<D;KED ze*W{E-qzKd%|SyUJ1r_jr^QV>EwZZ3%isL}uC`O#zNO7w*WFPuPk+7Eiu^TtdZ#Cz zd~$DIbIjbmx;krG@6OWE%{isDzN=y{Xo5eXbN-9TCrjS$-f`1Q<=F>O8>>(Cyr(yc zUTuwg*LWz_e>+3l#GL!z>rUN_)ma{{rL!dH=FM(<P0?x7rkQ;!(>oM%blbOMt6isC z^p%!>&CLo-eLjEd_EIj+p1omncD_Gx?6UYb>l-__te)LJ_n+O*GyLg#G7$!kJvo&# z^VX(Yn*A;6GMEoKx$nS<9^1Ij*N)8Esz1@7zCQcimY;?7@!M2QpGKWmxA}2o$7A+l zZ7-?%=bXn?+WdB?J7p@~-~08@(qh%UlCO2|UhAm|PI&ThmdyE=U#(hWGA$Nee{Hqf z#O&I)L$P!Hw5Og@5jy!)JCpV3%<q2Hb2_%{TKBH_4zK?EH<tt^CUWfZTYojndhOab zExT>bzy1<?Y|g68hL5wJu{<_qWO&dw)5Z0^!<tL~9-miVx-4e4%tkfktvjAC<~e+( zIwQqn$?^holT*d-9zEP{F?;s%yLXNrzU(KWF=dmly}hXE5s%Y`fhYd^3b|dfJ*}=Z z(<kr5r%n&Oa1LvYtE;?tUuTFGEuHX`dpocHwt%S8`>#Cof+aT9C?!d_P0;}@cW_9E z>fCqWN9^zJ=|{t-n7#NK6TW=k^Tjsj?@#~m{t2_?p}X#3J`z@HAH>o(ZwcD>@elt= z_M*7Rf4Qldk2`)i)(U<3@6yrtCoXKUR<T2>6axdpFJr^y@9s1ivVZbeDkN?m-5T`l zQCf8TbvKuJc6^J~TOw|1@Yl@0cx6FZ(MCy2yB$BW-cCJz6*SfJHg|5=HLkwL*48Cv zWn#k1U3XR8m@2ZO@Bf_Bg*BNEzrI&`BfC~+?plBO-IvM_3cJ1j!nk%__hXB4@p#B` zpdH1_A}*R6_+|d@6ra@b;^Xs4Ez<oqrVkIQAA5UyVx8{xs^=@8zmd^deouPyv%SAt zug&eetaRLm$8(O{&u48%H!A;OZi@Z?^Qd!rU+mv+pN%J{yVh@fe%|Qj*ZvTt#Ctz; zPQFUtzkgcvW%r4*9To3iy&AgKaA$0?XwlQd-2a}vd7)UQP`+Z*u8=j`#lG>k#a+2| z?aiw${pk!05Bz47Eb@1IdF%g^`R*MVcTerj-?!oP&8yE^&C~1u<!$miJ<mGw#=UEn zm1$qL&!4ZUy>Fjo-l_9D#m|Yz-mLz4b7}nYxf&HO=T`H-J(sm6|NVuG>-#on*KGLy zXX)aW^nX9|gZXOaf4qFoyH?P6rnmdQ`EvCp#_xCB2%Ir>)2Y?`I%fBNJ$v_VuDSJZ zuDV%!SFUt@`uzRn`uc;63=T2N=DpzVxwci__DX;1&g1iD{&><IEMHrd<d#*~ylQTT z#W%J5QwC=?Y;-KWs(UE5H)?k6#+(lZ_7B%BU;lVszWz7Y326Z*%so6L!UM`WpGItC zHk41l^nK5#SKf>EY+b#2_3r7DIqO_6*FP0qvTtYE)*GO!Kk8E#+5WPXT%H}jaLTEa zOY7||^qzd*-<c>8{ym;;?UwDOtNzXYp8x+-PP|J-o$Sx``+j|zxcBBl$HFA`B)%)N zu05FGAjo~7zWU?NsrB{ck0jo(-{Fqv)7985A}p<3rog~(A^vNB*FMMiDc@9s+B#Ym zc1=Gw^;OB6HLZtv`cH`lDNXWF4SM<Yd{?q%v^BTVqso7GPByLl9`}ELVp}3x>+b(w z4u6fC>zMei&hgw{p@j$LaQ(ci8&h(>b<SURzuep`!QAyG#tW{NE}L_A>*ojcM|2s~ zReCN5-Tjw5Khgfd?uA!N)1J=#nRb2l`*r`P-`L2&;9#E?C7t%SZg1$V?Zq2vDt`V@ zkDs&a>*e71eba+t@0rv(-kJ4Xe4bU&(jQrCn>U|b{@=<dG3rTt{QQ{{!~Q&sX5Xwo z?Y^=8w_bknSU>&xj~~|-wSHOrw%%%X&DRt6-b~~?c)e&f|J!py=V}Z-Kka?Lyyo}M znfG?Y80$Q_zhKFdl(VnQ`Q@#wjLK%+*!ac%=~c@h*5Cd0d*@Ct@Ou-{(Gj9`)&Bp- zci-M`b7$+{x@Ci)^_;q8>lQ9qwlL%F{{NQA$4X|dxnJ{=i-AFH#eTJ4SG;e(Fyc`T z_b81DQ=49(bAFSIU}VH8=fyU!S4C%Q&F=KbRJ@!Sxp2|?%Nt!%o+qrlUOelYp3<a~ zDhDUda|tO~8g~2ZX^FbdmWMmye&qbVo3_2&d2QJ0kQJ}*n`LKb3(K5Y1YdSCY4T)Y zVd0~FkDmE_Ue3wD@Hf!j?+fd(nOpV6HtRoO?szmaeO~3ao9WC<Oh-VA@D}iY-7NQa zUeEsCb%iss-R&AQZ|tl6J=1va<uG;zhJ;POY8Uyt&D@%w^2|_K{(#BKkX5s0&8q$V zty7kRfx+RvQM*fgg51(tkxz`jZng1BcVyh&mYcOT3bfvV;a9-^_ZQ!<{9pEVv9kPv z^((JtNzZ=W+z_@tZg0_3ufoTS3=A)<(`LK~*5`d<xQx*>irv8_``Vhwtyxna=2cf) z*F9!nI1ux-S>*@cm-XvvOP(-Gw8yQ#zajDPtE;O!Gp?=*H8eDQeQm9<wFU!2!@i_> zqP5Jz`fnFc;7{<;ntJNgsZ+OZ%}Si18@){@a?_J9FE4-m_%Z1?D+9v?bsxR&Z)2Cm z+;UfxKX4)@Ha7o9tn)N}28OgVXM}4TSMokNm>~;VQS>64S?QvBuolQr5Z}!pK&ZBH z2iU`)nY0YHutollrhW?qE%;<$NR}$-+;?CGT>1xF#v=b?aNUa}c69Dr@ZRgU#uH}H zn#2yaszv^_!5~+F3_sH9@_*MoxawsLo&WUT?c37t1YQ$1gG1$)`L4~E?6`h{6ek2t zcya&8+i5VXgPUFchyR@im!37@#r;!jy<t|JbXxTPb`@N;aJ$R@@|SV9@-IGJI03wl zOpUMeU+xU^`g2eJaBmb&o&H&W0YqXMPv^h47c)%Q>u#;Sm;p{S3=9v#z&G$PFw9T{ zUqQpbkjBvoc4mX5(;~2e32me(nR$b8#?G&=ufM;wHTzhP<hgU_0s{k+kM)435f~UG z1OhI;caB<HcBDh_e$D6JsZ*zJ-u(H+#l=Vaz_&QEafN(&FLwU3tE=nrKH1s!_5Xf; zey$(4$D-`bjUz`~l!7!w5)%{K`Q`I+b9s4qQY73eI8Sf-{r$bZhDJeA(JcG=eRJo| zT@elnS%x$Y(Z9Q|-nsMVsCc~1zaNi5LoFvyPV`zDyv*n3?s9#>r_Y}4`}65^U0t1v zN!FDWuU=&-y?XOzj%oI^?c2W_pSQVu^{S|-XlP7~&L>lli48XsE9Qw?xBXkPWQmG_ z!G;|>EEE(D6l~bM`SPVppyjKco}Mlx=WW09NSVA?+;5kak)fcJo}RAM)!AA3_v`iN z=jZ?bc02$1vuAm?ws=;&y|OZR?wmRM{(g%V)MHCnkR*|IdYZ2HG#x=}0S1N!yOwKn z;}j;J>^L#u*YTrAL&L&^CN5t5nBV@-glW^#GBa0R%#f0n?tJm%<Kx1@!nW&bYHD@g zZl)`-@Pgc$#@ku<-uTO-^^u#^Y;9}5zq`wGc#dW9u@5W@+uak=)1N<mn)*fnH05~U z&O-P7;v00bf5bB$FLWt+b7SL+7a47dTwGl1Vs<K(c>2yV$^8HCuT-yFMOszWuS-k4 zk9L5XJPc<fh5qiodgaQNvbRx6Rsa8fKYi*{OLJysCg?n>4G9N9Cyyo^Y$|?!?&q&x z@9ys2zGcf7&?;T)vNv-qi}~d3{(L+x|NHlE{pf8zSF}N{W-x9!x?}tD=SeYrkGDjv zby|4gWl7M=5VgsfTcbK%4sBW!v~tb5b=x*<C@3j;^Xk<kuca<3lTTL6)7Q~ivwC%R zSJ$TP+r>XuF|euV9Ajl@Xk@VcRqm}cF(M*DU}Dfpkv<I(u3zuDV*UO7A1-(psFWn3 zW&r{>Zfpc~7Y;NuUIP~w4957@ZvVBuc<q{683#i_`<JS{Hxxk&rkREQ-hTY*m6yx> z`hPobG%_5JwJLcbAo%n5?`}v5dr0Q*?QM|NmRq-PkB*M+mgQ!+v+c%>8@qPx`t+$N zkxh?*p<$<!>;G-GU#|qaY$<%~wvm~!;dWS1(4?tTx7PeDO8Lpaknk<w;(lQ#*Mgs) zo}QkrFFvc1;lPoVS6|)TUB3VGIqS&C$RBQe3=C{cD!<B=tgU}9Y?nKA>Xg!=B}<mL z%h!gy>0o#ecInckd)4o4l|Fs=5V1Y)?j%)j&~5;R1?Lqn?k`qVRh?~?8?`lSD##c4 q(R(UB2K(EJ%FFA68W;?2pZ+r%NA1gyvHzwHiZD-CKbLh*2~7Z4z>Q@9 literal 0 HcmV?d00001 -- GitLab From 0f5e78f68d9f8e2cb23115878091ad419e65bb17 Mon Sep 17 00:00:00 2001 From: Walmes Zeviani <walmes@ufpr.br> Date: Tue, 30 Aug 2016 15:03:29 -0300 Subject: [PATCH 10/10] Adiciona Rd do Zimmermann. --- man/ZimmermannTb10.15.Rd | 7 +++---- man/ZimmermannTb10.20.Rd | 7 +++---- man/ZimmermannTb10.6.Rd | 4 +--- man/ZimmermannTb10.9.Rd | 7 +++---- man/ZimmermannTb11.1.Rd | 7 +++---- man/ZimmermannTb11.10.Rd | 7 +++---- man/ZimmermannTb11.13.Rd | 7 +++---- man/ZimmermannTb11.19.Rd | 18 ++++++++---------- man/ZimmermannTb11.7.Rd | 7 +++---- man/ZimmermannTb12.1.Rd | 4 +--- man/ZimmermannTb12.13.Rd | 4 +--- man/ZimmermannTb12.14.Rd | 4 +--- man/ZimmermannTb12.19.Rd | 7 +++---- man/ZimmermannTb12.2.Rd | 4 +--- man/ZimmermannTb12.20.Rd | 7 +++---- man/ZimmermannTb12.26.Rd | 4 +--- man/ZimmermannTb12.27.Rd | 4 +--- man/ZimmermannTb12.32.Rd | 18 ++++++++---------- man/ZimmermannTb12.33.Rd | 18 ++++++++---------- man/ZimmermannTb12.7.Rd | 4 +--- man/ZimmermannTb12.8.Rd | 4 +--- man/ZimmermannTb13.1.Rd | 4 +--- man/ZimmermannTb14.3.Rd | 7 +++---- man/ZimmermannTb14.9.Rd | 7 +++---- man/ZimmermannTb15.1.Rd | 7 +++---- man/ZimmermannTb15.10.Rd | 4 +--- man/ZimmermannTb15.4.Rd | 4 +--- man/ZimmermannTb16.1.Rd | 4 +--- man/ZimmermannTb16.10.Rd | 4 +--- man/ZimmermannTb16.3.Rd | 7 +++---- man/ZimmermannTb16.4.Rd | 4 +--- man/ZimmermannTb16.5.Rd | 7 +++---- man/ZimmermannTb16.8.Rd | 8 +++----- man/ZimmermannTb3.12.Rd | 6 ++---- man/ZimmermannTb3.2.1.Rd | 4 +--- man/ZimmermannTb3.5.Rd | 8 +++----- man/ZimmermannTb4.11.Rd | 4 +--- man/ZimmermannTb4.4.Rd | 4 +--- man/ZimmermannTb5.11.Rd | 7 +++---- man/ZimmermannTb5.15.Rd | 7 +++---- man/ZimmermannTb5.2.Rd | 7 +++---- man/ZimmermannTb7.1.Rd | 7 +++---- man/ZimmermannTb7.4.Rd | 7 +++---- man/ZimmermannTb8.5.Rd | 8 +++----- man/ZimmermannTb9.13.Rd | 7 +++---- man/ZimmermannTb9.17.Rd | 7 +++---- man/ZimmermannTb9.22.Rd | 8 +++----- man/ZimmermannTb9.26.Rd | 7 +++---- 48 files changed, 122 insertions(+), 196 deletions(-) diff --git a/man/ZimmermannTb10.15.Rd b/man/ZimmermannTb10.15.Rd index 46c06ab4..dab56a15 100644 --- a/man/ZimmermannTb10.15.Rd +++ b/man/ZimmermannTb10.15.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb10.15} \alias{ZimmermannTb10.15} -\title{Aduba\enc{çã}{ca}o Ap\enc{ó}{o}s Pastagem em Cultivares de Arroz} +\title{Aduba\enc{çã}{ca}o Ap\enc{ó}{o}s Pastagem em Cultivares de + Arroz} \format{Um \code{data.frame} com 24 observações e 4 variáveis \describe{ @@ -21,9 +22,7 @@ }} \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. (Tabela 10.15, pág. 210) +ZIMMERMANN (2004), Tabela 10.15, pág. 210. } \description{ Dados de um experimento conduzido em faixas, no diff --git a/man/ZimmermannTb10.20.Rd b/man/ZimmermannTb10.20.Rd index 123dc217..dd76c608 100644 --- a/man/ZimmermannTb10.20.Rd +++ b/man/ZimmermannTb10.20.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb10.20} \alias{ZimmermannTb10.20} -\title{Nitrog\enc{ê}{e}nio, Irriga\enc{çã}{ca}o e Preparo do Solo para Feijoeiro} +\title{Nitrog\enc{ê}{e}nio, Irriga\enc{çã}{ca}o e Preparo do Solo + para Feijoeiro} \format{Um \code{data.frame} com 72 observações e 5 variáveis \describe{ @@ -24,9 +25,7 @@ }} \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. (Tabela 10.20, pág 213) +ZIMMERMANN (2004), Tabela 10.20, pág 213. } \description{ Dados de um experimento conduzido em faixas, no diff --git a/man/ZimmermannTb10.6.Rd b/man/ZimmermannTb10.6.Rd index cce7370d..ea2fcf60 100644 --- a/man/ZimmermannTb10.6.Rd +++ b/man/ZimmermannTb10.6.Rd @@ -20,9 +20,7 @@ }} \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. (Tabela 10.6, pág. 201) +ZIMMERMANN (2004), Tabela 10.6, pág. 201. } \description{ Dados de um experimento com dois fatores, em diff --git a/man/ZimmermannTb10.9.Rd b/man/ZimmermannTb10.9.Rd index f2a29dc5..a5d19bcf 100644 --- a/man/ZimmermannTb10.9.Rd +++ b/man/ZimmermannTb10.9.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb10.9} \alias{ZimmermannTb10.9} -\title{\enc{É}{E}poca de Plantio e Manejo de Inseticida em Cultivares de Arroz} +\title{\enc{É}{E}poca de Plantio e Manejo de Inseticida em Cultivares + de Arroz} \format{Um \code{data.frame} com 48 observações e 5 variáveis, em que \describe{ @@ -23,9 +24,7 @@ }} \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. (Tabela 10.9, pág. 205) +ZIMMERMANN (2004), Tabela 10.9, pág. 205. } \description{ Dados de um em delineamento de blocos completos ao diff --git a/man/ZimmermannTb11.1.Rd b/man/ZimmermannTb11.1.Rd index 0a390e6a..24e1efe7 100644 --- a/man/ZimmermannTb11.1.Rd +++ b/man/ZimmermannTb11.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb11.1} \alias{ZimmermannTb11.1} -\title{Espa\enc{ç}{c}amento e Densidade de Plantio na Produ\enc{çã}{ca}o de Arroz} +\title{Espa\enc{ç}{c}amento e Densidade de Plantio na + Produ\enc{çã}{ca}o de Arroz} \format{Um \code{data.frame} com 32 observações e 4 variáveis, em que \describe{ @@ -26,9 +27,7 @@ }} \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. (Tabela 11.1, pág. 221) +ZIMMERMANN (2004), Tabela 11.1, pág. 221. } \description{ Dados de um experimento fatorial \eqn{2^3}, com diff --git a/man/ZimmermannTb11.10.Rd b/man/ZimmermannTb11.10.Rd index f6ab049a..d598364e 100644 --- a/man/ZimmermannTb11.10.Rd +++ b/man/ZimmermannTb11.10.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb11.10} \alias{ZimmermannTb11.10} -\title{Espa\enc{ç}{c}amento Entre Linhas e Densidade no Plantio de Feij\enc{ã}{a}o} +\title{Espa\enc{ç}{c}amento Entre Linhas e Densidade no Plantio de + Feij\enc{ã}{a}o} \format{Um \code{data.frame} com 36 observações e 6 variáveis \describe{ @@ -23,9 +24,7 @@ }} \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. (pg 231) +ZIMMERMANN (2004), Tabela 11.10, pág 231. } \description{ Dados de um experimento fatorial \eqn{3^2}, com a diff --git a/man/ZimmermannTb11.13.Rd b/man/ZimmermannTb11.13.Rd index ad967a05..000dd6ca 100644 --- a/man/ZimmermannTb11.13.Rd +++ b/man/ZimmermannTb11.13.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb11.13} \alias{ZimmermannTb11.13} -\title{Absor\enc{çã}{ca}o e Transloca\enc{çã}{ca}o de Zinco em Arroz de Terras Altas} +\title{Absor\enc{çã}{ca}o e Transloca\enc{çã}{ca}o de Zinco em Arroz + de Terras Altas} \format{Um \code{data.frame} com 81 observações e 6 variáveis, em que \describe{ @@ -26,9 +27,7 @@ }} \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. (Tabela 11.13, pág. 234) +ZIMMERMANN (2004), Tabela 11.13, pág. 234. } \description{ Dados de um experimento fatorial \eqn{3^3}, com diff --git a/man/ZimmermannTb11.19.Rd b/man/ZimmermannTb11.19.Rd index 5b20a436..f593016a 100644 --- a/man/ZimmermannTb11.19.Rd +++ b/man/ZimmermannTb11.19.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb11.19} \alias{ZimmermannTb11.19} -\title{Produtividade de arroz irrigado em ensaio fatorial com confundimento} +\title{Produtividade de arroz irrigado em ensaio fatorial com + confundimento} \format{Um \code{data.frame} com 32 observações e 7 variáveis, em que \describe{ @@ -29,18 +30,15 @@ }} \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. (Tabela 11.19, pág. 237) +ZIMMERMANN (2004), Tabela 11.19, pág. 237. } \description{ Dados de um experimento fatorial \eqn{2^5}, com - confundimento da interação de quinta ordem. - Estudou-se o efeito dos cinco principais problemas da cultura: controle de - invasoras, adubação, irrigação, controle de doenças e - cultivar. A interação de quarta ordem (5 fatores) foi - confundida com blocos. Os dados da produtividade do arroz estão - em kg/ha. + confundimento da interação de quinta ordem. Estudou-se o efeito + dos cinco principais problemas da cultura: controle de invasoras, + adubação, irrigação, controle de doenças e cultivar. A interação + de quarta ordem (5 fatores) foi confundida com blocos. Os dados + da produtividade do arroz estão em kg/ha. } \examples{ diff --git a/man/ZimmermannTb11.7.Rd b/man/ZimmermannTb11.7.Rd index 7449d736..3333c8e2 100644 --- a/man/ZimmermannTb11.7.Rd +++ b/man/ZimmermannTb11.7.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb11.7} \alias{ZimmermannTb11.7} -\title{Espa\enc{ç}{c}amento, Densidade e Nitrog\enc{ê}{e}nio na Produ\enc{çã}{ca}o de Arroz} +\title{Espa\enc{ç}{c}amento, Densidade e Nitrog\enc{ê}{e}nio na + Produ\enc{çã}{ca}o de Arroz} \format{Um \code{data.frame} com 32 observações e 7 variáveis \describe{ @@ -26,9 +27,7 @@ }} \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. (Tabela 11.7, pág 226) +ZIMMERMANN (2004), Tabela 11.7, pág 226. } \description{ Dados de um experimento fatorial \eqn{2^3}, com diff --git a/man/ZimmermannTb12.1.Rd b/man/ZimmermannTb12.1.Rd index 23caa24d..06e5f56d 100644 --- a/man/ZimmermannTb12.1.Rd +++ b/man/ZimmermannTb12.1.Rd @@ -18,9 +18,7 @@ }} \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. (pg 249) +ZIMMERMANN (2004), Tabela 12.1, pág. 249. } \description{ Dados do Ensaio 1 de um experimento em DIC, que estudou diff --git a/man/ZimmermannTb12.13.Rd b/man/ZimmermannTb12.13.Rd index d63ef3b0..82bc602a 100644 --- a/man/ZimmermannTb12.13.Rd +++ b/man/ZimmermannTb12.13.Rd @@ -19,9 +19,7 @@ }} \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) +ZIMMERMANN (2004), Tabela 12.13, pág. 255. } \description{ Dados do ensaio 1 de um experimento em DBC que estudou a diff --git a/man/ZimmermannTb12.14.Rd b/man/ZimmermannTb12.14.Rd index 4cbabb0f..a15c2338 100644 --- a/man/ZimmermannTb12.14.Rd +++ b/man/ZimmermannTb12.14.Rd @@ -19,9 +19,7 @@ }} \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. (pg 255) +ZIMMERMANN (2004), Tabela 12.14, pág. 255. } \description{ Dados do ensaio 2 de um experimento em DBC que estudou a diff --git a/man/ZimmermannTb12.19.Rd b/man/ZimmermannTb12.19.Rd index 80f2fd25..cbd71aa8 100644 --- a/man/ZimmermannTb12.19.Rd +++ b/man/ZimmermannTb12.19.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb12.19} \alias{ZimmermannTb12.19} -\title{Produtividade de feij\enc{ã}{a}o em ensaio de competi\enc{çã}{ca}o de cultivares} +\title{Produtividade de feij\enc{ã}{a}o em ensaio de + competi\enc{çã}{ca}o de cultivares} \format{Um \code{data.frame} com 36 observações e 3 variáveis \describe{ @@ -17,9 +18,7 @@ }} \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. (Tabela 12.19, pág 258) +ZIMMERMANN (2004), Tabela 12.19, pág. 258. } \description{ Dados do ensaio 1 de um experimento em DBC de competição diff --git a/man/ZimmermannTb12.2.Rd b/man/ZimmermannTb12.2.Rd index 08a93c02..cb2c95eb 100644 --- a/man/ZimmermannTb12.2.Rd +++ b/man/ZimmermannTb12.2.Rd @@ -18,9 +18,7 @@ }} \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. (Tabela 12.2, pág 249) +ZIMMERMANN (2004), Tabela 12.2, pág. 249. } \description{ Dados do Ensaio 2 de um experimento em DIC, que estudou diff --git a/man/ZimmermannTb12.20.Rd b/man/ZimmermannTb12.20.Rd index f5449355..cd054e14 100644 --- a/man/ZimmermannTb12.20.Rd +++ b/man/ZimmermannTb12.20.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb12.20} \alias{ZimmermannTb12.20} -\title{Produtividade de Gr\enc{ã}{a}os de Cultivares de Feij\enc{ã}{a}o} +\title{Produtividade de Gr\enc{ã}{a}os de Cultivares de + Feij\enc{ã}{a}o} \format{Um \code{data.frame} com 36 observações e 3 variáveis \describe{ @@ -17,9 +18,7 @@ }} \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. (pg 258) +ZIMMERMANN (2004), Tabela 12.20, pág. 258. } \description{ Dados do ensaio 2 de um experimento em DBC de competição diff --git a/man/ZimmermannTb12.26.Rd b/man/ZimmermannTb12.26.Rd index 585828f8..e0cc8783 100644 --- a/man/ZimmermannTb12.26.Rd +++ b/man/ZimmermannTb12.26.Rd @@ -19,9 +19,7 @@ }} \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. (pg 261) +ZIMMERMANN (2004), Tabela 12.16, pág. 261. } \description{ Ensaio 1 de um experimento em DQL, que avaliou a diff --git a/man/ZimmermannTb12.27.Rd b/man/ZimmermannTb12.27.Rd index 706dcaef..b03e5803 100644 --- a/man/ZimmermannTb12.27.Rd +++ b/man/ZimmermannTb12.27.Rd @@ -20,9 +20,7 @@ }} \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. (Tabela 12.27, pág 262) +ZIMMERMANN (2004), Tabela 12.27, pág. 262. } \description{ Ensaio 2 de um experimento em delineamento quadrado diff --git a/man/ZimmermannTb12.32.Rd b/man/ZimmermannTb12.32.Rd index be45095c..f63b305d 100644 --- a/man/ZimmermannTb12.32.Rd +++ b/man/ZimmermannTb12.32.Rd @@ -7,8 +7,8 @@ \describe{ -\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição - da observação.} +\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo + repetição da observação.} \item{\code{irrigados}}{Médias nos ensaios irrigados.} @@ -18,16 +18,14 @@ }} \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. (Tabela 12.32, pág 264) +ZIMMERMANN (2004), Tabela 12.32, pág. 264. } \description{ -Dados de um estudo em delineamento de blocos completos com - quatro repetições. O experimento foi um ensaio de competição de - cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro. - São apresentadas na tabela a média nos ensaios irrigados, nos de sequeiro - e geral. +Dados de um estudo em delineamento de blocos completos + com quatro repetições. O experimento foi um ensaio de competição + de cultivares e linhagens de feijão, em cultivos irrigado e de + sequeiro. São apresentadas na tabela a média nos ensaios + irrigados, nos de sequeiro e geral. } \examples{ diff --git a/man/ZimmermannTb12.33.Rd b/man/ZimmermannTb12.33.Rd index ac48b806..c0cc6f38 100644 --- a/man/ZimmermannTb12.33.Rd +++ b/man/ZimmermannTb12.33.Rd @@ -7,8 +7,8 @@ \describe{ -\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo repetição - da observação.} +\item{\code{geno}}{Fator de níveis nominais. Identifica o genótipo + repetição da observação.} \item{\code{irrigados}}{Totais nos ensaios irrigados.} @@ -18,16 +18,14 @@ }} \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. (Tabela 12.33, pág 265) +ZIMMERMANN (2004), Tabela 12.33, pág. 265. } \description{ -Dados de um estudo em delineamento de blocos completos com - quatro repetições. O experimento foi um ensaio de competição de - cultivares e linhagens de feijão, em cultivos irrigado e de sequeiro. - São apresentadas na tabela o total nos ensaios irrigados, nos de sequeiro - e geral. +Dados de um estudo em delineamento de blocos completos + com quatro repetições. O experimento foi um ensaio de competição + de cultivares e linhagens de feijão, em cultivos irrigado e de + sequeiro. São apresentadas na tabela o total nos ensaios + irrigados, nos de sequeiro e geral. } \examples{ diff --git a/man/ZimmermannTb12.7.Rd b/man/ZimmermannTb12.7.Rd index 07bbb747..efe767b9 100644 --- a/man/ZimmermannTb12.7.Rd +++ b/man/ZimmermannTb12.7.Rd @@ -17,9 +17,7 @@ }} \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. (Tabela 12.7, pág 251) +ZIMMERMANN (2004), Tabela 12.7, pág. 251. } \description{ Dados do ensaio 1 de um experimento que avaliou as diff --git a/man/ZimmermannTb12.8.Rd b/man/ZimmermannTb12.8.Rd index 17821773..8bc528b1 100644 --- a/man/ZimmermannTb12.8.Rd +++ b/man/ZimmermannTb12.8.Rd @@ -17,9 +17,7 @@ }} \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. (pg 252) +ZIMMERMANN (2004), Tabela 12.8, pág. 252. } \description{ Dados do ensaio 1 de um experimento que avaliou as diff --git a/man/ZimmermannTb13.1.Rd b/man/ZimmermannTb13.1.Rd index 0ce7f7ec..31442150 100644 --- a/man/ZimmermannTb13.1.Rd +++ b/man/ZimmermannTb13.1.Rd @@ -19,9 +19,7 @@ }} \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. (Tabela 13.1, pág 272) +ZIMMERMANN (2004), Tabela 13.1, pág. 272. } \description{ Em um plantio de feijão com a cultivar Jalo Precoce diff --git a/man/ZimmermannTb14.3.Rd b/man/ZimmermannTb14.3.Rd index 45db1956..af9253f9 100644 --- a/man/ZimmermannTb14.3.Rd +++ b/man/ZimmermannTb14.3.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb14.3} \alias{ZimmermannTb14.3} -\title{Estande de Plantas e Produtividade de Cultivares de Feij\enc{ã}{a}o} +\title{Estande de Plantas e Produtividade de Cultivares de + Feij\enc{ã}{a}o} \format{Um \code{data.frame} com 28 observações e 4 variáveis \describe{ @@ -18,9 +19,7 @@ }} \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. (Tabela 14.3, pág 293) +ZIMMERMANN (2004), Tabela 14.3, pág. 293. } \description{ Dados de um ensaio de competição de cultivares de feijão diff --git a/man/ZimmermannTb14.9.Rd b/man/ZimmermannTb14.9.Rd index 6e19d1d2..b43119d4 100644 --- a/man/ZimmermannTb14.9.Rd +++ b/man/ZimmermannTb14.9.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb14.9} \alias{ZimmermannTb14.9} -\title{Controle de Insetos na Produtividade de Gr\enc{ã}{a}os de Arroz} +\title{Controle de Insetos na Produtividade de Gr\enc{ã}{a}os de + Arroz} \format{Um \code{data.frame} com 36 observações e 4 variáveis \describe{ @@ -18,9 +19,7 @@ }} \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. (Tabela 14.9, pág. 297) +ZIMMERMANN (2004), Tabela 14.9, pág. 297. } \description{ Dados de um ensaio de controle de insetos/pragas na diff --git a/man/ZimmermannTb15.1.Rd b/man/ZimmermannTb15.1.Rd index 1e097ba2..bac157e3 100644 --- a/man/ZimmermannTb15.1.Rd +++ b/man/ZimmermannTb15.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb15.1} \alias{ZimmermannTb15.1} -\title{Produ\enc{çã}{ca}o de Perfilhos por Planta em Fun\enc{çã}{ca}o de 4 Fatores} +\title{Produ\enc{çã}{ca}o de Perfilhos por Planta em Fun\enc{çã}{ca}o + de 4 Fatores} \format{Um \code{data.frame} com 24 observações e 3 variáveis \describe{ @@ -25,9 +26,7 @@ }} \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. (pg 306) +ZIMMERMANN (2004), Tabela 15.1, pág. 306. } \description{ Dados de um ensaio fatorial fracionado \eqn{2^{4-1}}, em diff --git a/man/ZimmermannTb15.10.Rd b/man/ZimmermannTb15.10.Rd index 0549b3fc..5d9c35b8 100644 --- a/man/ZimmermannTb15.10.Rd +++ b/man/ZimmermannTb15.10.Rd @@ -17,9 +17,7 @@ }} \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. (Tabela 15.10, pág. 314) +ZIMMERMANN (2004), Tabela 15.10, pág. 314. } \description{ Dados de produção de grãos em terras altas, em kg diff --git a/man/ZimmermannTb15.4.Rd b/man/ZimmermannTb15.4.Rd index 67a681ca..61694a04 100644 --- a/man/ZimmermannTb15.4.Rd +++ b/man/ZimmermannTb15.4.Rd @@ -23,9 +23,7 @@ }} \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. (Tabela 15.4, pág. 309) +ZIMMERMANN (2004), Tabela 15.4, pág. 309. } \description{ Dados de um ensaio com fração 1/3 de um fatorial diff --git a/man/ZimmermannTb16.1.Rd b/man/ZimmermannTb16.1.Rd index 291138f2..4f4ce1c7 100644 --- a/man/ZimmermannTb16.1.Rd +++ b/man/ZimmermannTb16.1.Rd @@ -26,9 +26,7 @@ }} \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. (Tabela 16.1, pág. 327) +ZIMMERMANN (2004), Tabela 16.1, pág. 327. } \description{ Dados de análise de solos aluviais, que apresentaram pH diff --git a/man/ZimmermannTb16.10.Rd b/man/ZimmermannTb16.10.Rd index caa3c8ae..fb6caabf 100644 --- a/man/ZimmermannTb16.10.Rd +++ b/man/ZimmermannTb16.10.Rd @@ -22,9 +22,7 @@ }} \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. (Tabela 16.10, pág. 357) +ZIMMERMANN (2004), Tabela 16.10, pág. 357. } \description{ Experimento realizado em delineamento quadrado latino 6 diff --git a/man/ZimmermannTb16.3.Rd b/man/ZimmermannTb16.3.Rd index 125b4b43..1aae31d9 100644 --- a/man/ZimmermannTb16.3.Rd +++ b/man/ZimmermannTb16.3.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb16.3} \alias{ZimmermannTb16.3} -\title{Teores de Mat\enc{é}{e}ria Org\enc{â}{a}nica de Solos de V\enc{á}{a}rzea} +\title{Teores de Mat\enc{é}{e}ria Org\enc{â}{a}nica de Solos de + V\enc{á}{a}rzea} \format{Um \code{data.frame} com 14 observações e 2 variáveis, em que \describe{ @@ -14,9 +15,7 @@ }} \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. (Tabela 16.3, pág. 337) +ZIMMERMANN (2004), Tabela 16.3, pág. 337. } \description{ Teores de matéria orgânica de solos aluviais e gely diff --git a/man/ZimmermannTb16.4.Rd b/man/ZimmermannTb16.4.Rd index 9e87305a..4c3dbd5e 100644 --- a/man/ZimmermannTb16.4.Rd +++ b/man/ZimmermannTb16.4.Rd @@ -17,9 +17,7 @@ }} \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. (Tabela 16.4, pág. 341) +ZIMMERMANN (2004), Tabela 16.4, pág. 341. } \description{ Dados de um experimento em delineamento inteiramente diff --git a/man/ZimmermannTb16.5.Rd b/man/ZimmermannTb16.5.Rd index bbedbe17..26b3ed55 100644 --- a/man/ZimmermannTb16.5.Rd +++ b/man/ZimmermannTb16.5.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb16.5} \alias{ZimmermannTb16.5} -\title{N\enc{ú}{u}mero de Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz} +\title{N\enc{ú}{u}mero de Dias para Flora\enc{çã}{ca}o de Cultivares + de Arroz} \format{Um \code{data.frame} com 24 observações e 4 variáveis, em que \describe{ @@ -19,9 +20,7 @@ }} \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. (Tabela 16.5, pág 347) +ZIMMERMANN (2004), Tabela 16.5, pág. 347. } \description{ Experimento realizado em delineamento em blocos diff --git a/man/ZimmermannTb16.8.Rd b/man/ZimmermannTb16.8.Rd index 7b594575..908f93d2 100644 --- a/man/ZimmermannTb16.8.Rd +++ b/man/ZimmermannTb16.8.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb16.8} \alias{ZimmermannTb16.8} -\title{Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz em um Reticulado - Quadrado} +\title{Dias para Flora\enc{çã}{ca}o de Cultivares de Arroz em um + Reticulado Quadrado} \format{Um \code{data.frame} com 75 observações e 5 variáveis, em que \describe{ @@ -24,9 +24,7 @@ }} \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. (Tabela 16.8, pág. 353) +ZIMMERMANN (2004), Tabela 16.8, pág. 353. } \description{ Experimento realizado em delineamento reticulado diff --git a/man/ZimmermannTb3.12.Rd b/man/ZimmermannTb3.12.Rd index 9b975e6e..a7e8cdf0 100644 --- a/man/ZimmermannTb3.12.Rd +++ b/man/ZimmermannTb3.12.Rd @@ -2,7 +2,7 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb3.12} \alias{ZimmermannTb3.12} -\title{Dados de mat\enc{é}{e}ria seca em plantas} +\title{Dados de Mat\enc{é}{e}ria Seca em Plantas} \format{Um \code{data.frame} com 75 observações e 4 variáveis \describe{ @@ -20,9 +20,7 @@ }} \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. (Table 3.12, pág 62) +ZIMMERMANN (2004), Tabela 3.12, pág. 62. } \description{ Experimento em DIC que estudou a produção de matéria diff --git a/man/ZimmermannTb3.2.1.Rd b/man/ZimmermannTb3.2.1.Rd index 5a23c11a..9f08cff3 100644 --- a/man/ZimmermannTb3.2.1.Rd +++ b/man/ZimmermannTb3.2.1.Rd @@ -18,9 +18,7 @@ }} \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. (pg 54) +ZIMMERMANN (2004), Tabela 3.2.1, pág. 54. } \description{ Dados de um experimento em DIC que visa estudar a diff --git a/man/ZimmermannTb3.5.Rd b/man/ZimmermannTb3.5.Rd index 22a045eb..7e682955 100644 --- a/man/ZimmermannTb3.5.Rd +++ b/man/ZimmermannTb3.5.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb3.5} \alias{ZimmermannTb3.5} -\title{Fracionamento da Aduba\enc{çã}{ca}o na Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz - Irrigado} +\title{Fracionamento da Aduba\enc{çã}{ca}o na Produ\enc{çã}{ca}o de + Gr\enc{ã}{a}os de Arroz Irrigado} \format{Um \code{data.frame} com 32 observações e 3 variáveis \describe{ @@ -22,9 +22,7 @@ }} \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. (Tabela 3.5, pág. 54) +ZIMMERMANN (2004), Tabela 3.5, pág. 54. } \description{ Dados de um estudo sobre adubação nitrogenada na cultura diff --git a/man/ZimmermannTb4.11.Rd b/man/ZimmermannTb4.11.Rd index 7a02a53d..2fb9cd93 100644 --- a/man/ZimmermannTb4.11.Rd +++ b/man/ZimmermannTb4.11.Rd @@ -20,9 +20,7 @@ }} \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. (Tabela 4.11, pág 79) +ZIMMERMANN (2004), Tabela 4.11, pág. 79. } \description{ Dados de um ensaio com dez genótipos, quatro blocos e diff --git a/man/ZimmermannTb4.4.Rd b/man/ZimmermannTb4.4.Rd index 84f080b1..fc91785d 100644 --- a/man/ZimmermannTb4.4.Rd +++ b/man/ZimmermannTb4.4.Rd @@ -16,9 +16,7 @@ }} \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. (Tabela 4.4, pág 72) +ZIMMERMANN (2004), Tabela 4.4, pág. 72. } \description{ Dados de um ensaio de competição de cultivares, em diff --git a/man/ZimmermannTb5.11.Rd b/man/ZimmermannTb5.11.Rd index 1c95f8eb..eb6e5d55 100644 --- a/man/ZimmermannTb5.11.Rd +++ b/man/ZimmermannTb5.11.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb5.11} \alias{ZimmermannTb5.11} -\title{Propor\enc{çã}{ca}o de hastes sobreviventes ao ataque de insetos} +\title{Propor\enc{çã}{ca}o de Hastes Sobreviventes ao Ataque de + Insetos} \format{Um \code{data.frame} com 484 observações e 5 variáveis \describe{ @@ -26,9 +27,7 @@ }} \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. (Tabela 5.1, pág 101) +ZIMMERMANN (2004), Tabela 5.1, pág. 101. } \description{ Experimento em delineamento quadrado latino onde foram diff --git a/man/ZimmermannTb5.15.Rd b/man/ZimmermannTb5.15.Rd index fd76ebc1..83790e7e 100644 --- a/man/ZimmermannTb5.15.Rd +++ b/man/ZimmermannTb5.15.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb5.15} \alias{ZimmermannTb5.15} -\title{N\enc{ú}{u}mero de Perfilhos em Arroz em Fun\enc{çã}{ca}o de 6 Tratamentos} +\title{N\enc{ú}{u}mero de Perfilhos em Arroz em Fun\enc{çã}{ca}o de 6 + Tratamentos} \format{Um \code{data.frame} com 36 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \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. (Tabela 5.15, pág. 107) +ZIMMERMANN (2004), Tabela 5.15, pág. 107. } \description{ Esperimento conduzido pelo pesquisador Evane Ferreira, diff --git a/man/ZimmermannTb5.2.Rd b/man/ZimmermannTb5.2.Rd index ba0ddd68..61494360 100644 --- a/man/ZimmermannTb5.2.Rd +++ b/man/ZimmermannTb5.2.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb5.2} \alias{ZimmermannTb5.2} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Gen\enc{ó}{o}tipos de Arroz} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Gen\enc{ó}{o}tipos de + Arroz} \format{Um \code{data.frame} com 64 observações e 4 variáveis \describe{ @@ -20,9 +21,7 @@ }} \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. (Tabela 5.2, pág 92) +ZIMMERMANN (2004), Tabela 5.2, pág. 92. } \description{ Experimento em delineamento quadrado latino cujo diff --git a/man/ZimmermannTb7.1.Rd b/man/ZimmermannTb7.1.Rd index ad921f40..02a31bdf 100644 --- a/man/ZimmermannTb7.1.Rd +++ b/man/ZimmermannTb7.1.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb7.1} \alias{ZimmermannTb7.1} -\title{Ensaio de Competi\enc{çã}{ca}o de Cultivares em Reticulado Quadrado} +\title{Ensaio de Competi\enc{çã}{ca}o de Cultivares em Reticulado + Quadrado} \format{Um \code{data.frame} com 75 observações e 4 variáveis, em que \describe{ @@ -21,9 +22,7 @@ }} \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. (Tabela 7.1, pág. 136) +ZIMMERMANN (2004), Tabela 7.1, pág. 136. } \description{ Experimento feito pelos pesquisadores Orlando Peixoto diff --git a/man/ZimmermannTb7.4.Rd b/man/ZimmermannTb7.4.Rd index 15e6c3dd..29d9a36b 100644 --- a/man/ZimmermannTb7.4.Rd +++ b/man/ZimmermannTb7.4.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb7.4} \alias{ZimmermannTb7.4} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Ensaio Reticulado Retangular} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz em Ensaio + Reticulado Retangular} \format{Um \code{data.frame} com 90 observações e 3 variáveis, em que \describe{ @@ -22,9 +23,7 @@ }} \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. (Tabela 7.4, pág. 140) +ZIMMERMANN (2004), Tabela 7.4, pág. 140. } \description{ Dados de um estudo sobre competição de cultivares e diff --git a/man/ZimmermannTb8.5.Rd b/man/ZimmermannTb8.5.Rd index c5feb66e..5f7471e4 100644 --- a/man/ZimmermannTb8.5.Rd +++ b/man/ZimmermannTb8.5.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb8.5} \alias{ZimmermannTb8.5} -\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o em Delineamento de Blocos Aumentos - de Federer} +\title{Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Feij\enc{ã}{a}o em + Delineamento de Blocos Aumentados de Federer} \format{Um \code{data.frame} com 90 observações e 3 variáveis, em que \describe{ @@ -19,9 +19,7 @@ }} \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. (Tabela 8.5, pág. 158) +ZIMMERMANN (2004), Tabela 8.5, pág. 158. } \description{ Dados de um estudo em desenho de blocos aumentados de diff --git a/man/ZimmermannTb9.13.Rd b/man/ZimmermannTb9.13.Rd index eb25ee81..6b986de6 100644 --- a/man/ZimmermannTb9.13.Rd +++ b/man/ZimmermannTb9.13.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb9.13} \alias{ZimmermannTb9.13} -\title{Mat\enc{é}{e}ria Seca de Feij\enc{ã}{a}o em Fatorial 3x3} +\title{Mat\enc{é}{e}ria Seca de Feij\enc{ã}{a}o em Fatorial 3 + \eqn{\times} 3} \format{Um \code{data.frame} com 27 observações e 4 variáveis, em que \describe{ @@ -21,9 +22,7 @@ }} \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. (Tabela 9.13, pág 179) +ZIMMERMANN (2004), Tabela 9.13, pág. 179. } \description{ Dados de um estudo em ensaio fatorial 3 \eqn{times} 3, diff --git a/man/ZimmermannTb9.17.Rd b/man/ZimmermannTb9.17.Rd index 3f9a716c..508cd6c7 100644 --- a/man/ZimmermannTb9.17.Rd +++ b/man/ZimmermannTb9.17.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb9.17} \alias{ZimmermannTb9.17} -\title{\enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz} +\title{\enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na + Produ\enc{çã}{ca}o de Gr\enc{ã}{a}os de Arroz} \format{Um \code{data.frame} com 81 observações e 5 variáveis, em que \describe{ @@ -23,9 +24,7 @@ }} \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. (Tabela 9.17, pág. 182) +ZIMMERMANN (2004), Tabela 9.17, pág. 182. } \description{ Dados de um estudo em ensaio fatorial 3 \eqn{\times} 3, diff --git a/man/ZimmermannTb9.22.Rd b/man/ZimmermannTb9.22.Rd index 5dcd7545..fc171d22 100644 --- a/man/ZimmermannTb9.22.Rd +++ b/man/ZimmermannTb9.22.Rd @@ -2,8 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb9.22} \alias{ZimmermannTb9.22} -\title{Fungicidas e Pol\enc{í}{i}mero na Infec\enc{çã}{ca}o de \emph{Fusarium} em - Sementes} +\title{Fungicidas e Pol\enc{í}{i}mero na Infec\enc{çã}{ca}o de + \emph{Fusarium} em Sementes} \format{Um \code{data.frame} com 55 observações e 4 variáveis, em que \describe{ @@ -25,9 +25,7 @@ }} \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. (Tabela 9.22, pág. 188) +ZIMMERMANN (2004), Tabela 9.22, pág. 188. } \description{ Resultados de um experimento fatorial com tratamentos diff --git a/man/ZimmermannTb9.26.Rd b/man/ZimmermannTb9.26.Rd index c9acb98b..cd8aa8d9 100644 --- a/man/ZimmermannTb9.26.Rd +++ b/man/ZimmermannTb9.26.Rd @@ -2,7 +2,8 @@ % Please edit documentation in R/Zimmermann.R \name{ZimmermannTb9.26} \alias{ZimmermannTb9.26} -\title{\enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Altura de Plantas} +\title{\enc{É}{E}poca de Aplica\enc{çã}{ca}o de NK na Altura de + Plantas} \format{Um \code{data.frame} com 27 observações e 4 variáveis, em que \describe{ @@ -20,9 +21,7 @@ }} \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. (Tabela 9.26, pág. 190) +ZIMMERMANN (2004), Tabela 9.26, pág. 190. } \description{ Dados de um estudo em fatorial \eqn{3^3}, sobre adubação -- GitLab