diff --git a/R/Demetrio.R b/R/Demetrio.R index 92eecd3fcbc77b3220a0d3c46f184d1c7c8b593f..fd30e7087396a815f8bf04fdb35c139dd8d522f1 100644 --- a/R/Demetrio.R +++ b/R/Demetrio.R @@ -1,229 +1,199 @@ #' @name DemetrioEg7.7 -#' @title Produtividade de Cana-de-a\enc{çú}{cu}car sob N\enc{í}{i}veis de Pent\enc{ó}{o}xido de F\enc{ó}{o}sforo -#' +#' @title Produtividade de Cana-de-a\enc{çú}{cu}car sob N\enc{í}{i}veis +#' de Pent\enc{ó}{o}xido de F\enc{ó}{o}sforo #' @description Dados referentes a produtividade de cana-de-açúcar, em #' ton/ha, obtidos de um experimento delineado em blocos #' casualizados, com 6 repetições e 5 níveis de \eqn{P_2O_5} #' (pentóxido de fósforo). O conjunto de dados apresenta somente a #' soma das produtividades nos blocos para cada nível de #' \eqn{P_2O_5}. -#' -#' @format Um \code{data.frame} de 5 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 5 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{nivel}}{Nível de \eqn{P_2O_5}, medido em kg/ha.} -#' -#' \item{\code{prod}}{Produtividade de cana-de-açúcar, medida em +#' +#' \item{\code{nivel}}{Nível de \eqn{P_2O_5}, medido em kg/ha.} +#' +#' \item{\code{prod}}{Produtividade de cana-de-açúcar, medida em #' ton/ha.} -#' +#' #' } -#' -#' @keywords RP -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exemplo 7.7 pág. 197) -#' -#' @examples -#' +#' @keywords RS +#' @source DEMÉTRIO; ZOCCHI (2011), Exemplo 7.7 pág. 197. +#' @examples +#' #' data(DemetrioEg7.7) -#' +#' str(DemetrioEg7.7) +#' #' library(lattice) -#' -#' xyplot(prod ~ nivel, data = DemetrioEg7.7, -#' main = "Produtividade por Nível", xlab = "Nível", -#' ylab = "Produtividade") -#' +#' +#' xyplot(prod ~ nivel, +#' data = DemetrioEg7.7, +#' main = "Produtividade por Nível", +#' xlab = "Nível", +#' ylab = "Produtividade") +#' NULL #' @name DemetrioEx1.4.1.1 -#' @title Alturas de Feij\enc{ã}{a}o -#' +#' @title Alturas de Feijão #' @description Dados de altura de feijão durante 7 semanas. -#' -#' @format Um \code{data.frame} de 7 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 7 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{idade}}{Idade do feijão medida em semanas.} -#' -#' \item{\code{altura}}{Altura do feijão medida em centímetros (cm).} -#' +#' +#' \item{\code{idade}}{Idade do feijão medida em semanas.} +#' +#' \item{\code{altura}}{Altura do feijão medida em centímetros (cm).} +#' #' } -#' #' @keywords RS -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 1.4.1.1 pág. 14) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 1.4.1.1 pág. 14. +#' @examples +#' #' data(DemetrioEx1.4.1.1) -#' +#' str(DemetrioEx1.4.1.1) +#' #' library(lattice) -#' -#' xyplot(altura ~ idade, data = DemetrioEx1.4.1.1, -#' main = "Idade VS Altura", -#' xlab = "Idade", -#' ylab = "Altura", -#' type = c("p", "r"), col.line = 3) -#' +#' +#' xyplot(altura ~ idade, +#' data = DemetrioEx1.4.1.1, +#' xlab = "Idade", +#' ylab = "Altura", +#' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioEx1.4.1.2 #' @title Peso M\enc{é}{e}dio de Galinhas -#' #' @description Foi mensurado o peso médio e consumo de alimentos de 50 #' galinhas para 10 linhagens \emph{White Leghorn}. -#' -#' @format Um \code{data.frame} de 10 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 10 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{peso}}{Peso médio.} -#' -#' \item{\code{consumo}}{Consumo de alimentos.} -#' +#' +#' \item{\code{peso}}{Peso médio.} +#' +#' \item{\code{consumo}}{Consumo de alimentos.} +#' #' } -#' #' @keywords RS -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 1.4.1.2 pág. 14) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 1.4.1.2 pág. 14. +#' @examples +#' #' data(DemetrioEx1.4.1.2) -#' +#' str(DemetrioEx1.4.1.2) +#' #' library(lattice) -#' +#' #' xyplot(consumo ~ peso, data = DemetrioEx1.4.1.2, -#' main = "Peso VS Consumo", -#' xlab = "Peso", -#' ylab = "Consumo", -#' type = c("p", "r"), col.line = 3) -#' +#' xlab = "Peso", +#' ylab = "Consumo", +#' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioEx1.4.1.3 #' @title Absor\enc{çã}{ca}o de CO2 por Folhas de Trigo -#' #' @description Foi aplicado \eqn{CO_2} sobre folhas de trigo a uma -#' temperatura de 35°C. Mediu-se a quantia de \eqn{CO_2} absorvido -#' pelas folhas. -#' -#' @format Um \code{data.frame} de 11 linhas e 2 colunas. -#' +#' temperatura de 35\eqn{^\circ}C. Mediu-se a quantia de \eqn{CO_2} +#' absorvido pelas folhas. +#' @format Um \code{data.frame} de 11 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{co2}}{Concentração de \eqn{CO_2} aplicada sobre as -#' folhas de trigo.} -#' -#' \item{\code{absorv}}{Quantia de \eqn{CO2} absorvida pelas folhas -#' de trigo, medida em \eqn{cm^3/dm^2/hora.}} -#' +#' +#' \item{\code{co2}}{Concentração de \eqn{CO_2} aplicada sobre as folhas +#' de trigo.} +#' +#' \item{\code{absorv}}{Quantia de \eqn{CO2} absorvida pelas folhas de +#' trigo, medida em \eqn{cm^3/dm^2/hora.}} +#' #' } -#' +#' #' @keywords RS -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 1.4.1.3 pág. 14) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 1.4.1.3 pág. 14. +#' @examples +#' #' data(DemetrioEx1.4.1.3) -#' +#' str(DemetrioEx1.4.1.3) +#' #' library(lattice) -#' +#' #' xyplot(absorv ~ co2, data = DemetrioEx1.4.1.3, -#' main = "CO2 Aplicado VS Absorvido", -#' xlab = "Aplicado", -#' ylab = "Absorvido", -#' type = c("p", "r"), col.line = 3) +#' xlab = "Aplicado", +#' ylab = "Absorvido", +#' type = c("p", "r"), col.line = 3) #' NULL #' @name DemetrioEx1.4.1.4 #' @title Volume das Cerejeiras -#' #' @description Foram mensurados o diâmetro, a altura e o volume de 31 #' cerejeiras com o objetivo de verificar a relação entre estas #' variáveis, tendo em vista a predição do volume de madeira em uma #' área de floresta. -#' -#' @format Um \code{data.frame} de 31 linhas e 3 colunas. -#' +#' @format Um \code{data.frame} de 31 linhas e 3 colunas, em que +#' #' \describe{ -#' -#' \item{\code{dia}}{Diâmetro da cerejeira a 4.5 pés do solo, -#' medido em polegadas.} -#' -#' \item{\code{alt}}{Altura das cerejeiras, medida em pés.} -#' -#' \item{\code{vol}}{Volume das cerejeiras, medido em pés cúbicos.} -#' +#' +#' \item{\code{dia}}{Diâmetro da cerejeira a 4.5 pés do solo, medido em +#' polegadas.} +#' +#' \item{\code{alt}}{Altura das cerejeiras, medida em pés.} +#' +#' \item{\code{vol}}{Volume das cerejeiras, medido em pés cúbicos.} +#' #' } -#' #' @keywords RM -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 1.4.1.4 pág. 14) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011) (Exercício 1.4.1.4 pág. 14) +#' @examples +#' #' data(DemetrioEx1.4.1.4) -#' +#' str(DemetrioEx1.4.1.4) +#' #' library(lattice) #' #' pairs(~ dia + alt + vol, data = DemetrioEx1.4.1.4, -#' main = "Gráfico de Pares") -#' +#' main = "Gráfico de Pares") +#' #' xyplot(vol ~ dia, data = DemetrioEx1.4.1.4, -#' main = "Diâmetro VS Volume", -#' xlab = "Diâmetro", -#' ylab = "Volume", -#' type = c("p", "r"), col.line = 3) -#' +#' xlab = "Diâmetro", +#' ylab = "Volume", +#' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioEx1.4.1.5 #' @title N\enc{ú}{u}mero de Ovos por Fol\enc{í}{i}culos Ovulados -#' -#' @description Foi contado o número me ovos postos e o número de +#' @description Foi contado o número de ovos postos e o número de #' folículos ovulados. -#' -#' @format Um \code{data.frame} de 14 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 14 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{ovo}}{Número de ovos.} -#' -#' \item{\code{foli}}{Número de folículos.} -#' +#' +#' \item{\code{ovo}}{Número de ovos.} +#' +#' \item{\code{foli}}{Número de folículos.} +#' #' } -#' -#' @keywords TODO -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 1.4.1.5 pág. 15) -#' -#' @examples -#' +#' +#' @keywords RS +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 1.4.1.5 pág. 15. +#' @examples +#' #' data(DemetrioEx1.4.1.5) -#' +#' str(DemetrioEx1.4.1.5) +#' #' library(lattice) -#' +#' #' xyplot(foli ~ ovo, data = DemetrioEx1.4.1.5, -#' main = "Ovos VS Folículos", -#' xlab = "N° Ovos", -#' ylab = "N° Folículos", -#' type = c("p", "r"), col.line = 3) -#' +#' xlab = "Número de ovos", +#' ylab = "Número de folículos", +#' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioEx1.4.2 #' @title Tempo de Irriga\enc{çã}{ca}o de Solo -#' #' @description Neste estudo foram medidos os tempos acumulados de #' irrigação e as correspondentes medidas de infiltração acumulada #' de água no solo. O objetivo do experimento era estimar as @@ -233,139 +203,130 @@ NULL #' para determinar o tempo de irrigação para atingir uma determinada #' lâmina de água, pois é anti-econômico irrigar a uma velocidade #' maior à de infiltração. -#' -#' @format Um \code{data.frame} de 15 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 15 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{tempo}}{Tempo acumulado de irrigação, medido em +#' +#' \item{\code{tempo}}{Tempo acumulado de irrigação, medido em #' minutos.} -#' -#' \item{\code{infil}}{Infiltração acumulada de água no solo, medida +#' +#' \item{\code{infil}}{Infiltração acumulada de água no solo, medida #' em centímetros (cm).} -#' +#' #' } -#' +#' #' @keywords RS -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 1.4.2 pág. 16) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 1.4.2 pág. 16. +#' @examples +#' #' data(DemetrioEx1.4.2) -#' +#' str(DemetrioEx1.4.2) +#' #' library(lattice) -#' +#' library(latticeExtra) +#' +#' xyplot(infil ~ tempo, data = DemetrioEx1.4.2, +#' xlab = "Tempo", +#' ylab = "Infiltração", +#' type = c("p", "r"), col.line = 3) +#' #' xyplot(infil ~ tempo, data = DemetrioEx1.4.2, -#' main = "Tempo VS Infiltração", -#' xlab = "Tempo", -#' ylab = "Infiltração", -#' type = c("p", "r"), col.line = 3) -#' +#' xlab = "Tempo", +#' ylab = "Infiltração", +#' type = c("p", "r"), col.line = 3, +#' scales = list(y = list(log = 10), x = list(log = 10)), +#' yscale.components = yscale.components.log10ticks, +#' xscale.components = xscale.components.log10ticks) +#' NULL #' @name DemetrioEx2.12.15 -#' @title Dados Gen\enc{é}{e}ricos Simulados para Regress\enc{ã}{a}o Simples -#' +#' @title Dados Gen\enc{é}{e}ricos Simulados para Regress\enc{ã}{a}o +#' Simples #' @description Dados simulados para exercício analítico de estimação #' via método dos quadrados mínimos em diferentes modelos de #' regressão linear. -#' -#' @format Um \code{data.frame} de 6 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 6 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{x}}{Variável independente, sem interpretação.} -#' -#' \item{\code{y}}{Variável dependente, sem interpretação.} -#' +#' +#' \item{\code{x}}{Variável independente, sem interpretação.} +#' +#' \item{\code{y}}{Variável dependente, sem interpretação.} +#' #' } -#' -#' @keywords TODO -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 2.12.15 pág. 63) -#' -#' @examples -#' +#' +#' @keywords RS +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 2.12.15 pág. 63. +#' @examples +#' #' data(DemetrioEx2.12.15) -#' +#' str(DemetrioEx2.12.15) +#' #' library(lattice) -#' +#' #' xyplot(y ~ x, data = DemetrioEx2.12.15, -#' main = "x vs y", -#' xlab = "x", -#' ylab = "y", -#' type = c("p", "r"), col.line = 3) -#' +#' main = "x vs y", +#' xlab = "x", +#' ylab = "y", +#' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioEx2.12.16 -#' @title Calagem para a Sucess\enc{ã}{a}o batata-triticale-milho -#' +#' @title Calagem para a Sucess\enc{ã}{a}o Batata-triticale-milho #' @description Neste experimento foram obtidos os valores para o teor #' de cálcio no solo e a porcentagem de tubérculos maduros com o #' objetivo de verificar a relação existente entre estas variáveis. -#' -#' @format Um \code{data.frame} de 9 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 9 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{calcio}}{Teor de cálcio no solo, medido em +#' +#' \item{\code{calcio}}{Teor de cálcio no solo, medido em #' \eqn{meq/100cm^{3}} (miliequivalente por 100 centímetros #' cúbicos).} -#' -#' \item{\code{tm}}{Porcentagem de tubérculos maduros.} -#' +#' +#' \item{\code{tm}}{Porcentagem de tubérculos maduros.} +#' #' } -#' -#' @keywords TODO -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 2.12.16 pág. 63) -#' -#' @examples -#' +#' @keywords RS RNL unitário +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 2.12.16 pág. 63. +#' @examples +#' #' data(DemetrioEx2.12.16) -#' +#' str(DemetrioEx2.12.16) +#' #' library(lattice) -#' +#' #' xyplot(tm ~ calcio, data = DemetrioEx2.12.16, -#' main = "Cálcio VS TM", -#' xlab = "Cálcio", -#' ylab = "Tubérculos Maduros") -#' +#' xlab = "Cálcio", +#' ylab = "Porcentagem de tubérculos maduros") +#' NULL #' @name DemetrioEx2.12.5 #' @title Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o Segmentada -#' #' @description Dados para exercício analítico, com o objetivo de obter #' as estimativas de mínimos quadrados dos parâmetros de um modelo #' de regressão linear segmentada. -#' -#' @format Um \code{data.frame} de 5 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 5 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{x}}{Variável independente, sem interpretação.} -#' -#' \item{\code{y}}{Variável dependente, sem interpretação.} -#' +#' +#' \item{\code{x}}{Variável independente, sem interpretação.} +#' +#' \item{\code{y}}{Variável dependente, sem interpretação.} +#' #' } -#' -#' @keywords RegSeg -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 2.12.5 pág. 60) -#' -#' @examples -#' +#' @keywords RNL +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 2.12.5 pág. 60. +#' @examples +#' #' data(DemetrioEx2.12.5) -#' +#' str(DemetrioEx2.12.5) +#' #' library(lattice) -#' +#' #' xyplot(y ~ x, data = DemetrioEx2.12.5, #' cex = 1.1, pch = 19, #' main = 'Regressão Segmentada', @@ -382,351 +343,310 @@ NULL #' panel.segments(cx[1], cy[1], cx[2], cy[2]) #' panel.segments(cx[2], cy[2], cx[3], cy[3]) #' }) -#' +#' NULL #' @name DemetrioEx5.4.2 -#' @title Estudo F\enc{í}{i}sico Qu\enc{í}{i}mico de M\enc{é}{e}is Silvestres -#' +#' @title Estudo F\enc{í}{i}sico Qu\enc{í}{i}mico de M\enc{é}{e}is +#' Silvestres #' @description Análise físico química de méis silvestres, produzidos #' por \emph{Apis mellifera} em 1999, provenientes de 94 localidades #' de São Paulo. -#' -#' @format Um \code{data.frame} de 94 linhas e 3 colunas. -#' +#' @format Um \code{data.frame} de 94 linhas e 3 colunas, em que +#' #' \describe{ -#' -#' \item{\code{condut}}{Condutividade elétrica, em \eqn{\mu}S.} -#' -#' \item{\code{N}}{Proporção de Nitrogênio proteico.} -#' -#' \item{\code{cinzas}}{Proporção de cinzas.} -#' +#' +#' \item{\code{condut}}{Condutividade elétrica, em \eqn{\mu}S.} +#' +#' \item{\code{N}}{Proporção de Nitrogênio proteico.} +#' +#' \item{\code{cinzas}}{Proporção de cinzas.} +#' #' } -#' #' @keywords RM -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 5.4.2 pág. 169) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 5.4.2 pág. 169. +#' @examples +#' #' data(DemetrioEx5.4.2) -#' +#' str(DemetrioEx5.4.2) +#' #' pairs(~ condut + N + cinzas, data = DemetrioEx5.4.2, -#' main = "Gráfico de Pares") -#' +#' main = "Gráfico de Pares") +#' NULL #' @name DemetrioEx5.4.5 -#' @title Estudo sobre a Avalia\enc{çã}{ca}o Visual do Grau da Infesta\enc{çã}{ca}o de -#' Plantas por Doen\enc{ç}{c}as -#' +#' @title Estudo sobre a Avalia\enc{çã}{ca}o Visual do Grau da +#' Infesta\enc{çã}{ca}o de Plantas por Doen\enc{ç}{c}as #' @description Dados referentes a avaliação visual (realizada por um #' pesquisador) e real do grau de infestação de folhas de amendoim. -#' -#' A avaliação exige um treinamento específico para a cultura e -#' a doença em questão. Por esse motivo, foram desenvolvidos -#' programas computacionais que geram imagens de folhas com -#' diferentes porcentagens de infestação para o pesquisador estimar -#' visualmente e em seguida compara-se com as porcentagens reais. -#' -#' @format Um \code{data.frame} de 10 linhas e 2 colunas. -#' +#' +#' A avaliação exige um treinamento específico para a cultura e a +#' doença em questão. Por esse motivo, foram desenvolvidos programas +#' computacionais que geram imagens de folhas com diferentes +#' porcentagens de infestação para o pesquisador estimar visualmente +#' e em seguida compara-se com as porcentagens reais. +#' @format Um \code{data.frame} de 10 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{visual}}{Estimativas visuais do pesquisador.} -#' -#' \item{\code{real}}{Valores reais do grau de infestação.} -#' +#' +#' \item{\code{visual}}{Estimativas visuais do pesquisador.} +#' +#' \item{\code{real}}{Valores reais do grau de infestação.} +#' #' } -#' +#' #' @keywords RS -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 5.4.5 pág. 165) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 5.4.5 pág. 165. +#' @examples +#' #' data(DemetrioEx5.4.5) -#' +#' str(DemetrioEx5.4.5) +#' #' library(lattice) -#' +#' #' xyplot(visual ~ real, data = DemetrioEx5.4.5, -#' main = "Real vs Visual", -#' xlab = "Real", -#' ylab = "Visual", -#' type = c("p", "r"), col.line = 3) -#' +#' xlab = "Real", +#' ylab = "Visual", +#' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioEx6.5.2 -#' @title Dados Gen\enc{é}{e}ricos Simulados para Regress\enc{ã}{a}o Linear M\enc{ú}{u}ltipla -#' +#' @title Dados Gen\enc{é}{e}ricos Simulados para Regress\enc{ã}{a}o +#' Linear M\enc{ú}{u}ltipla #' @description Dados simulados para exercício de análise de um modelo #' de regressão linear múltipla com 3 covariáveis. -#' -#' @format Um \code{data.frame} de 5 linhas e 4 colunas. -#' +#' @format Um \code{data.frame} de 5 linhas e 4 colunas, em que +#' #' \describe{ -#' -#' \item{\code{x1}}{Variável independente, sem interpretação.} -#' -#' \item{\code{x2}}{Variável independente, sem interpretação.} -#' -#' \item{\code{x3}}{Variável independente, sem interpretação.} -#' -#' \item{\code{y}}{Variável dependente, sem interpretação.} -#' +#' +#' \item{\code{x1}}{Variável independente, sem interpretação.} +#' +#' \item{\code{x2}}{Variável independente, sem interpretação.} +#' +#' \item{\code{x3}}{Variável independente, sem interpretação.} +#' +#' \item{\code{y}}{Variável dependente, sem interpretação.} +#' #' } -#' #' @keywords RM -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 6.5.2 pág. 180) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011) (Exercício 6.5.2 pág. 180) +#' @examples +#' #' data(DemetrioEx6.5.2) -#' -#' pairs(~ x1 + x2 + x3 + y, data = DemetrioEx6.5.2, -#' main = "Gráfico de Pares") -#' +#' str(DemetrioEx6.5.2) +#' +#' pairs(~ x1 + x2 + x3 + y, data = DemetrioEx6.5.2, +#' main = "Gráfico de Pares") +#' NULL #' @name DemetrioEx7.8.3 -#' @title Alturas de Eucaliptos sob Aduba\enc{çã}{ca}o Pot\enc{á}{a}ssica -#' -#' @description Dados referentes a um experimento de adubação, -#' conduzido em casa de vegetação. Foram usadas 4 doses de -#' Potássio (0, 30, 60, 90 ppm), obtendo-se as alturas das árvores -#' da espécie \emph{Eucalyptus grandis}, medidas em cm. -#' -#' @format Um \code{data.frame} de 12 linhas e 2 colunas. -#' +#' @title Alturas de Eucaliptos sob Aduba\enc{çã}{ca}o +#' Pot\enc{á}{a}ssica +#' @description Dados referentes a um experimento de adubação, conduzido +#' em casa de vegetação. Foram usadas 4 doses de Potássio (0, 30, +#' 60, 90 ppm), obtendo-se as alturas das árvores da espécie +#' \emph{Eucalyptus grandis}, medidas em cm. +#' @format Um \code{data.frame} de 12 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{dose}}{Dose de potássio, medida em ppm.} -#' -#' \item{\code{altura}}{Altura da árvore, medida em centímetro -#' (cm).} -#' +#' +#' \item{\code{dose}}{Dose de potássio, medida em ppm.} +#' +#' \item{\code{altura}}{Altura da árvore, medida em centímetro (cm).} +#' #' } -#' -#' @keywords RP -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Exercício 7.8.3 pág. 198) -#' -#' @examples -#' +#' @keywords RS DIC +#' @source DEMÉTRIO; ZOCCHI (2011), Exercício 7.8.3 pág. 198. +#' @examples +#' #' data(DemetrioEx7.8.3) -#' +#' str(DemetrioEx7.8.3) +#' #' library(lattice) -#' +#' #' xyplot(altura ~ dose, data = DemetrioEx7.8.3, -#' main = "Altura vs Dose", xlab = "Dose", ylab = "Altura") -#' +#' main = "Altura vs Dose", xlab = "Dose", ylab = "Altura") +#' NULL #' @name DemetrioTb1.1 -#' @title N\enc{í}{i}veis de F\enc{ó}{o}sforo no Solo ap\enc{ó}{o}s Plantio de Milho -#' +#' @title N\enc{í}{i}veis de F\enc{ó}{o}sforo no Solo ap\enc{ó}{o}s +#' Plantio de Milho #' @description Resultados de um experimento onde diferentes níveis de #' fósforo orgânico foram utilizados na preparação do solo para o #' plantio de milho. Após 38 dias, as plantas foram colhidas, #' mediu-se o novamente os níveis de fósforo e calculou-se o fósforo #' disponível para a planta em cada amostra de solo. -#' -#' @format Um \code{data.frame} com 9 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} com 9 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{fo}}{Níveis de fósforo orgânico adicionado ao solo, +#' +#' \item{\code{fo}}{Níveis de fósforo orgânico adicionado ao solo, #' mensurados em partes por milhão (ppm).} -#' -#' \item{\code{fd}}{Fósforo disponível no solo após a colheita do -#' milho, mensurado em partes por milhão (ppm).} -#' +#' +#' \item{\code{fd}}{Fósforo disponível no solo após a colheita do milho, +#' mensurado em partes por milhão (ppm).} +#' #' } -#' #' @keywords RS -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 1.1 pág. 8) -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 1.1 pág. 8. +#' @examples +#' #' library(lattice) -#' +#' #' data(DemetrioTb1.1) -#' +#' str(DemetrioTb1.1) +#' #' xyplot(fd ~ fo, data = DemetrioTb1.1, -#' main = "Níveis de fósforo no solo", #' xlab = "Fósforo orgânico", #' ylab = "Fósforo disponível", #' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioTb1.2 #' @title Irriga\enc{çã}{ca}o em Batata -#' #' @description Este experimento refere-se a irrigação em batata #' plantada em terra roxa estruturada. Foram medidas as lâminas de #' água a diferentes distâncias do aspersor. O objetivo foi mensurar #' a produtividade, já que, no tipo de solo utilizado no experimento #' (solo argiloso), espera-se que o excesso de água diminua a #' produtividade. -#' -#' @format Um \code{data.frame} com 12 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} com 12 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{lamina}}{Espessura da lâmina de água medida em -#' milímetros (mm).} -#' -#' \item{\code{prod}}{Produtividade medida em toneladas de batatas -#' por hectare (t/ha).} -#' +#' +#' \item{\code{lamina}}{Espessura da lâmina de água medida em milímetros +#' (mm).} +#' +#' \item{\code{prod}}{Produtividade medida em toneladas de batatas por +#' hectare (t/ha).} +#' #' } -#' #' @keywords RS -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 1.2 pág. 9) -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 1.2 pág. 9. #' @examples -#' +#' #' library(lattice) -#' +#' #' data(DemetrioTb1.2) -#' +#' str(DemetrioTb1.2) +#' #' xyplot(prod ~ lamina, data = DemetrioTb1.2, -#' main = "Produção VS Lâmina de Água", #' xlab = "Lâmina de água (mm)", #' ylab = "Produção (t/ha)", #' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioTb1.3 #' @title Estudo da Constru\enc{çã}{ca}o de um Tensi\enc{ô}{o}metro -#' #' @description Estudo da construção de um tensiômetro de leitura #' direta. Neste estudo obteve-se os resultados de alturas da câmara #' no tensiômetro e tensão da água no solo. -#' -#' @format Um \code{data.frame} com 9 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} com 9 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{altura}}{ Altura da câmara no tensiômetro medida +#' +#' \item{\code{altura}}{ Altura da câmara no tensiômetro medida #' em milímetros (mm). } -#' -#' \item{\code{tensao}}{ Tensão da água no solo medida em coloumb +#' +#' \item{\code{tensao}}{ Tensão da água no solo medida em coloumb #' (mb) } -#' +#' #' } -#' -#' @keywords RS -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 1.3 pág. 10; -#' Ex 2.12.14 pág. 62) -#' +#' +#' @keywords RS RNL +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 1.3 pág. 10; Ex 2.12.14 +#' pág. 62. #' @examples -#' +#' #' library(lattice) -#' +#' #' data(DemetrioTb1.3) -#' +#' str(DemetrioTb1.3) +#' #' xyplot(tensao ~ altura, data = DemetrioTb1.3, -#' main = "Altura VS Tensão", -#' xlab = "Altura do Tensiômetro", -#' ylab = "Tensão da Água") +#' xlab = "Altura do Tensiômetro", +#' ylab = "Tensão da Água") #' #' xyplot(tensao ~ log(altura), data = DemetrioTb1.3, -#' main = "Altura VS Tensão", -#' xlab = expression(log~"(Altura do Tensiômetro)"), -#' ylab = "Tensão da Água") +#' main = "Altura VS Tensão", +#' xlab = expression(log~"(Altura do Tensiômetro)"), +#' ylab = "Tensão da Água") #' NULL #' @name DemetrioTb1.4 #' @title Concentra\enc{çã}{ca}o de F\enc{ó}{o}sforo -#' #' @description Dados referentes a medidas de concentrações de fósforo #' inorgânico e orgânico no solo, onde posteriormente mediu-se o #' conteúdo de fósforo nas plantas crescidas no local. O objetivo do #' experimento é estudar a relação existente entre o conteúdo de #' fósforo na planta e as duas fontes do elemento no solo. +#' @format Um \code{data.frame} com 18 linhas e 3 colunas, em que #' -#' @format Um \code{data.frame} com 18 linhas e 3 colunas. -#' #' \describe{ -#' -#' \item{\code{cfi}}{ Conteúdo de fósforo inorgânico no solo. } -#' -#' \item{\code{cfo}}{ Conteúdo de fósforo orgânico no solo. } -#' -#' \item{\code{conteudo}}{ Conteúdo de fósforo nas plantas -#' crescidas no solo. } -#' +#' +#' \item{\code{cfi}}{ Conteúdo de fósforo inorgânico no solo.} +#' +#' \item{\code{cfo}}{ Conteúdo de fósforo orgânico no solo.} +#' +#' \item{\code{conteudo}}{ Conteúdo de fósforo nas plantas crescidas no +#' solo.} +#' #' } -#' #' @keywords RM -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 1.4 pág. 11) -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 1.4 pág. 11. #' @examples -#' +#' #' data(DemetrioTb1.4) -#' +#' str(DemetrioTb1.4) +#' #' pairs(DemetrioTb1.4, main = "Dispersão em Pares") #' #' library(lattice) -#' +#' #' xyplot(conteudo ~ cfi, data = DemetrioTb1.4, -#' main = "Fósforo Inorgânico VS Conteúdo", #' xlab = "Fósforo Inorgânico", #' ylab = "Conteúdo na Planta", #' type = c("p", "r"), col.line = 3) -#' +#' #' xyplot(conteudo ~ cfo, data = DemetrioTb1.4, -#' main = "Fósforo Orgânico VS Conteúdo", #' xlab = "Fósforo Orgânico", -#' ylab = "Conteúdo na Planta", +#' ylab = "Conteúdo na Planta", #' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioTb1.5 #' @title Valores de CTC Direta e Indireta -#' #' @description O experimento foi realizado em quatro blocos, sendo #' planejado para estudar o efeito da calagem sobre a CTC #' (Capacidade de Troca Catiônica) do solo medida por dois métodos #' diferentes. Os valores de CTC foram medidos 18 meses após a -#' calagem incorporada ao solo, na profundidade de 5 a 10 cm, segundo -#' a dose de calcário. +#' calagem incorporada ao solo, na profundidade de 5 a 10 cm, +#' segundo a dose de calcário. +#' @format Um \code{data.frame} de 32 linhas e 4 colunas, em que #' -#' @format Um \code{data.frame} de 32 linhas e 4 colunas. -#' #' \describe{ -#' -#' \item{\code{bloco}}{Fator que indica a qual bloco a amostra -#' pertence, usado para controle de variação.} -#' -#' \item{\code{dose}}{Indica a dose de calcário usada na referida +#' +#' \item{\code{bloco}}{Fator que indica a qual bloco a amostra pertence, +#' usado para controle de variação.} +#' +#' \item{\code{dose}}{Indica a dose de calcário usada na referida #' observação, medida em toneladas por hectare (t/ha).} -#' -#' \item{\code{metodo}}{Fator que indica o método para determinação -#' da CTC, direto (1) ou indireto (0).} -#' -#' \item{\code{ctc}}{É o valor observado de CTC, medido em +#' +#' \item{\code{metodo}}{Fator que indica o método para determinação da +#' CTC, direto (1) ou indireto (0).} +#' +#' \item{\code{ctc}}{É o valor observado de CTC, medido em #' \eqn{mmol_{c}/kg}.} -#' -#' } #' +#' } #' @details Na análise inicial do estudo do estudo foi detectada a #' presença de um dado discrepante (177,00) correspondente ao #' \code{bloco} I, \code{dose} 7,80 e \code{metodo} indireto. Em @@ -734,74 +654,64 @@ NULL #' na transcrição dos dados e que o valor correto seria #' 124,00. Neste conjunto de dados manteve-se o valor discrepante #' para efeitos didáticos. -#' #' @keywords RM dummy -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 1.5 pág. 12) -#' -#' @examples +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 1.5 pág. 12. +#' @examples #' #' data(DemetrioTb1.5) +#' str(DemetrioTb1.5) #' #' library(lattice) -#' +#' #' xyplot(ctc ~ dose | bloco, groups = metodo, #' data = DemetrioTb1.5, -#' main = "Dose VS CTC", #' xlab = "Dose", ylab = "CTC", #' type = c("p", "r"), -#' auto.key = list(space = "right", title = "Método")) -#' +#' auto.key = list(space = "top", title = "Método")) +#' #' # Corrigindo dado, conforme erro verificado pelo pesquisador #' select <- with(DemetrioTb1.5, bloco == 1 & dose == 7.8 & metodo == 0) #' DemetrioTb1.5$ctc[select] <- 124 -#' -#' xyplot(ctc ~ dose | bloco, groups = metodo, +#' +#' xyplot(ctc ~ dose | bloco, groups = metodo, #' data = DemetrioTb1.5, -#' main = "Dose VS CTC", #' xlab = "Dose", ylab = "CTC", -#' type = c("p","r"), -#' auto.key = list(space = "right", title = "Método")) -#' +#' type = c("p", "r"), +#' auto.key = list(space = "top", title = "Método")) +#' NULL #' @name DemetrioTb1.6 #' @title Resposta de Milho ao Fosfato -#' #' @description Neste estudo foram obtidos dados sobre a resposta da #' cultura do milho ao fosfato, produtividade na testemunha, #' porcentagem de saturação de bases e pH do solo. Como todas as #' variáveis computadas são aleatórias, o interesse principal é em #' estudar as correlações entre as variáveis observadas. -#' -#' @format Um \code{data.frame} de 14 linhas e 4 colunas. -#' +#' @format Um \code{data.frame} de 14 linhas e 4 colunas, em que +#' #' \describe{ -#' -#' \item{\code{milho}}{Dados de resposta da cultura do milho ao -#' fosfato em porcentagem.} -#' -#' \item{\code{prod}}{Produtividade da cultura na parcela -#' testemunha, em lb/acre.} -#' -#' \item{\code{satu}}{Saturação de bases em porcentagem.} -#' -#' \item{\code{ph}}{pH do solo.} -#' +#' +#' \item{\code{milho}}{Dados de resposta da cultura do milho ao fosfato +#' em porcentagem.} +#' +#' \item{\code{prod}}{Produtividade da cultura na parcela testemunha, em +#' lb/acre.} +#' +#' \item{\code{satu}}{Saturação de bases em porcentagem.} +#' +#' \item{\code{ph}}{pH do solo.} +#' #' } -#' -#' @keywords TODO -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 1.6 pág. 13) -#' -#' @examples -#' +#' @keywords RM +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 1.6 pág. 13. +#' @examples +#' #' data(DemetrioTb1.6) -#' +#' str(DemetrioTb1.6) +#' #' pairs(~ milho + prod + satu + ph, data = DemetrioTb1.6, -#' main = "Dispersão duas a duas") +#' main = "Dispersão duas a duas") #' #' cor(DemetrioTb1.6) #' @@ -809,71 +719,60 @@ NULL #' @name DemetrioTb10.2 #' @title Estudo em Plantas Nicotianas -#' -#' @description Dados referentes ao comprimento do caule, -#' do ramo e do caule basal de plantas do gênero Nicotiana. -#' -#' @format Um \code{data.frame} de 18 linhas e 3 colunas. -#' +#' @description Dados referentes ao comprimento do caule, do ramo e do +#' caule basal de plantas do gênero Nicotiana. +#' @format Um \code{data.frame} de 18 linhas e 3 colunas, em que +#' #' \describe{ -#' -#' \item{\code{caule}}{Comprimento do caule.} -#' -#' \item{\code{ramo}}{Comprimento do ramo.} -#' -#' \item{\code{basal}}{Comprimento do caule basal.} -#' +#' +#' \item{\code{caule}}{Comprimento do caule.} +#' +#' \item{\code{ramo}}{Comprimento do ramo.} +#' +#' \item{\code{basal}}{Comprimento do caule basal.} +#' #' } -#' -#' @keywords RM -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 10.2 pág. 161; Exercício -#' 5.4.7 pág. 164) -#' +#' +#' @keywords RM AnaFat +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 10.2 pág. 161; Exercício +#' 5.4.7 pág. 164. #' @examples -#' +#' #' data(DemetrioTb10.2) -#' -#' pairs(~ caule + basal + ramo , data = DemetrioTb10.2, -#' main = "Dispersão duas a duas") +#' str(DemetrioTb10.2) +#' +#' pairs(~ caule + basal + ramo , data = DemetrioTb10.2) #' NULL #' @name DemetrioTb2.10 #' @title Absor\enc{çã}{ca}o de CO2 por Folhas de Trigo -#' #' @description Dados provenientes de um ensaio inteiramente casualizado #' onde aplicou-se \eqn{CO_2} sobre folhas de trigo a uma #' temperatura de 35°C e mediu-se a quantia de \eqn{CO_2} absorvido #' pelas folhas. -#' -#' @format Um \code{data.frame} de 17 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 17 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{co2}}{Concentração de \eqn{CO_2} aplicada sobre as -#' folhas de trigo.} -#' -#' \item{\code{absorv}}{Quantia de \eqn{CO_2} absorvida pelas folhas -#' de trigo, medida em \eqn{cm^3/dm^2/hora.}} -#' +#' +#' \item{\code{co2}}{Concentração de \eqn{CO_2} aplicada sobre as folhas +#' de trigo.} +#' +#' \item{\code{absorv}}{Quantia de \eqn{CO_2} absorvida pelas folhas de +#' trigo, medida em \eqn{cm^3/dm^2/hora.}} +#' #' } -#' -#' @keywords TODO -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 2.10 pág. 65, Exercício -#' 1.4.1.3 pág. 14) -#' -#' @examples -#' +#' @keywords RS +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 2.10 pág. 65, Exercício +#' 1.4.1.3 pág. 14. +#' @examples +#' #' data(DemetrioTb2.10) -#' +#' str(DemetrioTb2.10) +#' #' library(lattice) -#' +#' #' xyplot(absorv ~ co2, data = DemetrioTb2.10, -#' main = "CO2 Aplicado VS Absorvido", #' xlab = "Aplicado", #' ylab = "Absorvido", #' type = c("p", "r"), col.line = 3) @@ -881,7 +780,7 @@ NULL #' # Subconjunto do exercício 1.4.1.3 #' obs <- c(1, 2, 3, 5, 6, 7, 8, 11, 12, 16, 17) #' DemetrioEx1.4.1.3 <- DemetrioTb2.10[obs, ] -#' +#' #' xyplot(absorv ~ co2, data = DemetrioEx1.4.1.3, #' type = c("p", "r"), col.line = 3) #' @@ -889,33 +788,29 @@ NULL #' @name DemetrioTb2.11 #' @title Radia\enc{çã}{ca}o Gama em Explantes de Abacaxis -#' #' @description Dados provenientes de um experimento inteiramente #' casualizado onde expuseram explantes de abacaxis a diferentes #' doses de radiação gama e, 45 dias após a irradiação, mensurou-se #' o peso destes explantes. -#' -#' @format Um \code{data.frame} de 70 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 70 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{dose}}{Dose de radiação gama a qual os -#' explantes de abacaxi foram expostos durante 45 dias.} -#' -#' \item{\code{absorv}}{Peso dos explantes de abacaxi após a -#' irradiação, medido em gramas (g).} -#' +#' +#' \item{\code{dose}}{Dose de radiação gama a qual os explantes de +#' abacaxi foram expostos durante 45 dias.} +#' +#' \item{\code{absorv}}{Peso dos explantes de abacaxi após a irradiação, +#' medido em gramas (g).} +#' #' } -#' -#' @keywords TODO -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 2.11 pág. 66) -#' -#' @examples -#' +#' +#' @keywords RS DIC +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 2.11 pág. 66. +#' @examples +#' #' data(DemetrioTb2.11) -#' +#' str(DemetrioTb2.11) +#' #' library(lattice) #' # Estatísticas descritivas #' with(DemetrioTb2.11, tapply(peso, dose, summary)) @@ -939,37 +834,32 @@ NULL #' @name DemetrioTb2.12 #' @title Produ\enc{çã}{ca}o de Ruibarbo -#' #' @description Dados de um experimento conduzido em delineamento de #' blocos ao acaso onde foi mensurada a produção de ruibarbos para #' enlatamento, considerando diferentes datas de colheita. -#' -#' @format Um \code{data.frame} de 28 linhas e 3 colunas. -#' +#' @format Um \code{data.frame} de 28 linhas e 3 colunas, em que +#' #' \describe{ -#' -#' \item{\code{data}}{Data de colheita dos ruibarbos. Obs.: Para +#' +#' \item{\code{data}}{Data de colheita dos ruibarbos. Obs.: Para #' utilizar o formato \code{\link{Date}} foi considerado o ano 1983 #' (Date de publicação do livro que referencia os dados).} -#' -#' \item{\code{bloco}}{Fator que indica o bloco, para controle de +#' +#' \item{\code{bloco}}{Fator que indica o bloco, para controle de #' variação, ao qual a observação pertence.} -#' -#' \item{\code{prod}}{Valor da produção de ruibarbo.} -#' +#' +#' \item{\code{prod}}{Valor da produção de ruibarbo.} +#' #' } -#' -#' @keywords TODO -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 2.12 pág. 66-67) -#' -#' @examples -#' +#' @keywords RS DBC +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 2.12 pág. 66-67. +#' @examples +#' #' data(DemetrioTb2.12) -#' +#' str(DemetrioTb2.12) +#' #' library(lattice) -#' +#' #' # Estatísticas descritivas #' with(DemetrioTb2.12, tapply(prod, data, summary)) #' @@ -992,148 +882,114 @@ NULL #' @name DemetrioTb2.9 #' @title Dados Gen\enc{é}{e}ricos para Regress\enc{ã}{a}o Simples -#' #' @description Dados para exercício analítico, com o objetivo de #' estimar os parâmetros de forma pontual e intervalar, realizar a #' ANOVA, entre outros. -#' -#' @format Um \code{data.frame} de 10 linhas e 2 colunas. -#' +#' @format Um \code{data.frame} de 10 linhas e 2 colunas, em que +#' #' \describe{ -#' -#' \item{\code{x}}{Variável independente, sem interpretação.} -#' -#' \item{\code{y}}{Variável dependente, sem interpretação.} -#' +#' +#' \item{\code{x}}{Variável independente, sem interpretação.} +#' +#' \item{\code{y}}{Variável dependente, sem interpretação.} +#' #' } -#' -#' @keywords TODO -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 2.9 pág. 64) -#' -#' @examples -#' +#' @keywords RS +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 2.9 pág. 64. +#' @examples +#' #' data(DemetrioTb2.9) -#' +#' str(DemetrioTb2.9) +#' #' library(lattice) -#' +#' #' xyplot(y ~ x, data = DemetrioTb2.9, -#' main = "x vs y", -#' xlab = "x", -#' ylab = "y", -#' type = c("p", "r"), col.line = 3) -#' -#' model <- lm(y ~ x, data = DemetrioTb2.9) -#' summary(model) -#' anova(model) -#' +#' main = "x vs y", +#' xlab = "x", +#' ylab = "y", +#' type = c("p", "r"), col.line = 3) +#' NULL #' @name DemetrioTb3.5 -#' @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 Dados para exercício de análise via modelo de regressão #' linear múltipla. -#' -#' @format Um \code{data.frame} de 6 linhas e 3 colunas. -#' +#' @format Um \code{data.frame} de 6 linhas e 3 colunas, em que +#' #' \describe{ -#' -#' \item{\code{x1}}{Variável explicativa, sem interpretação.} -#' -#' \item{\code{x2}}{Variável explicativa, sem interpretação.} -#' -#' \item{\code{y}}{Variável dependente, sem interpretação.} -#' +#' +#' \item{\code{x1}}{Variável explicativa, sem interpretação.} +#' +#' \item{\code{x2}}{Variável explicativa, sem interpretação.} +#' +#' \item{\code{y}}{Variável dependente, sem interpretação.} +#' #' } -#' #' @keywords RM -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 3.5 pág. 99) -#' -#' @references Hoffman, R., Vieira, S. (1983). Análise de Regressão. Uma -#' introdução à Econometria (2en ed.). São Paulo, SP: Ed. Hucitec. -#' -#' @examples -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 3.5 pág. 99. +#' @examples +#' #' data(DemetrioTb3.5) -#' -#' pairs(~ x1 + x2 + y , data = DemetrioTb3.5, -#' main = "Dispersão duas a duas") +#' str(DemetrioTb3.5) #' -#' cor(DemetrioTb3.5) +#' pairs(~ x1 + x2 + y , data = DemetrioTb3.5) #' NULL #' @name DemetrioTb3.6 -#' @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 Dados para exercício de análise via modelo de regressão #' linear múltipla com três variáveis explicativas. +#' @format Um \code{data.frame} de 14 linhas e 4 colunas, em que #' -#' @format Um \code{data.frame} de 14 linhas e 4 colunas. -#' #' \describe{ -#' -#' \item{\code{x1}}{Variável explicativa, sem interpretação.} -#' -#' \item{\code{x2}}{Variável explicativa, sem interpretação.} -#' -#' \item{\code{x3}}{Variável explicativa, sem interpretação.} -#' -#' \item{\code{y}}{Variável dependente, sem interpretação.} -#' +#' +#' \item{\code{x1}}{Variável explicativa, sem interpretação.} +#' +#' \item{\code{x2}}{Variável explicativa, sem interpretação.} +#' +#' \item{\code{x3}}{Variável explicativa, sem interpretação.} +#' +#' \item{\code{y}}{Variável dependente, sem interpretação.} +#' #' } -#' #' @keywords RM -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 3.6 pág. 99) -#' -#' @references Hoffman, R., Vieira, S. (1983). Análise de Regressão. Uma -#' introdução à Econometria (2en ed.). São Paulo, SP: Ed. Hucitec. +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 3.6 pág. 99. +#' @examples #' -#' @examples -#' #' data(DemetrioTb3.6) -#' -#' pairs(~ x1 + x2 + x3 + y , data = DemetrioTb3.6, -#' main = "Dispersão duas a duas") +#' str(DemetrioTb3.6) #' -#' cor(DemetrioTb3.6) +#' pairs(~ x1 + x2 + x3 + y , data = DemetrioTb3.6) #' NULL #' @name DemetrioTb4.2 #' @title Sobreviv\enc{ê}{e}ncia de Ratos ap\enc{ó}{o}s Envenenamento -#' -#' @description Os dados referem-se a tempos de sobrevivência de ratos -#' após envenenamento com 4 tipos de venenos e 3 diferentes +#' @description Os dados referem-se a tempos de sobrevivência de ratos +#' após envenenamento com 4 tipos de venenos e 3 diferentes #' tratamentos. -#' -#' @format Um \code{data.frame} de 48 linhas e 3 colunas. -#' +#' @format Um \code{data.frame} de 48 linhas e 3 colunas, em que +#' #' \describe{ -#' -#' \item{\code{tempo}}{Tempo de sobrevivência.} -#' -#' \item{\code{tipo}}{Tipo de veneno.} -#' -#' \item{\code{trat}}{Tipo de tratamento aplicado (não descrito o -#' que é o tratamento).} -#' +#' +#' \item{\code{tempo}}{Tempo de sobrevivência.} +#' +#' \item{\code{tipo}}{Tipo de veneno.} +#' +#' \item{\code{trat}}{Tipo de tratamento aplicado (não descrito o que é +#' o tratamento).} +#' #' } -#' -#' @keywords dummy -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 4.2 pág. 132) -#' -#' @examples -#' +#' @keywords FAT2 +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 4.2 pág. 132. +#' @examples +#' #' data(DemetrioTb4.2) +#' str(DemetrioTb4.2) #' #' xtabs(~tipo + trat, data = DemetrioTb4.2) #' @@ -1143,37 +999,33 @@ NULL NULL #' @name DemetrioTb4.5 -#' @title Dados Simulados para Regress\enc{ã}{a}o Linear Simples e Polinomial -#' +#' @title Dados Simulados para Regress\enc{ã}{a}o Linear Simples e +#' Polinomial #' @description Dados simulados para exercício de ajuste de modelos de #' regressão linear simples e polinomial. São simulados, para uma #' mesma covariável (x), quatro diferentes variáveis de interesse #' (y). -#' -#' @format Um \code{data.frame} de 9 linhas e 5 colunas. -#' +#' @format Um \code{data.frame} de 9 linhas e 5 colunas, em que +#' #' \describe{ -#' -#' \item{\code{x}}{Variável explicativa, sem interpretação.} -#' -#' \item{\code{y1}}{Variável dependente, sem interpretação.} -#' -#' \item{\code{y2}}{Variável dependente, sem interpretação.} -#' -#' \item{\code{y3}}{Variável dependente, sem interpretação.} -#' -#' \item{\code{y4}}{Variável dependente, sem interpretação.} -#' +#' +#' \item{\code{x}}{Variável explicativa, sem interpretação.} +#' +#' \item{\code{y1}}{Variável dependente, sem interpretação.} +#' +#' \item{\code{y2}}{Variável dependente, sem interpretação.} +#' +#' \item{\code{y3}}{Variável dependente, sem interpretação.} +#' +#' \item{\code{y4}}{Variável dependente, sem interpretação.} +#' #' } -#' -#' @keywords RS RP -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 4.5 pág. 137) -#' +#' @keywords RS +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 4.5 pág. 137. #' @examples -#' +#' #' data(DemetrioTb4.5) +#' str(DemetrioTb4.5) #' #' # Relação da covariável com cada uma das variáveis resposta #' par(mfrow = c(1, ncol(DemetrioTb4.5) - 1)) @@ -1191,83 +1043,70 @@ NULL #' @name DemetrioTb5.1 #' @title Resposta da Cultura de Milho ao Fosfato -#' -#' @description Dados referentes a um estudo sobre a resposta da -#' cultura do milho em função da quantidade de fosfato, porcentagem -#' de saturação de bases e sílica em solos ácidos. -#' -#' Neste estudo a variável resposta, que está em porcentagem, -#' foi medida como a diferença entre as produções que receberam -#' fosfato e as que não receberam, dividida pelas produções -#' das parcelas que receberam fosfato, e multiplicado por 100. -#' Considerando-se esses dados, foi obtida a variável produtividade -#' das parcelas que receberam fosfato, dada por -#' \eqn{Y_1 = X_1(1 + \frac{Y}{100})}. -#' -#' @format Um \code{data.frame} de 14 linhas e 4 colunas. -#' +#' @description Dados referentes a um estudo sobre a resposta da cultura +#' do milho em função da quantidade de fosfato, porcentagem de +#' saturação de bases e sílica em solos ácidos. +#' +#' Neste estudo a variável resposta, que está em porcentagem, foi +#' medida como a diferença entre as produções que receberam fosfato +#' e as que não receberam, dividida pelas produções das parcelas que +#' receberam fosfato, e multiplicado por 100. Considerando-se esses +#' dados, foi obtida a variável produtividade das parcelas que +#' receberam fosfato, dada por \eqn{Y_1 = X_1(1 + \frac{Y}{100})}. +#' @format Um \code{data.frame} de 14 linhas e 4 colunas, em que +#' #' \describe{ -#' -#' \item{\code{resp}}{Resposta da cultura do milho ao fosfato, -#' medida em porcentagem.} -#' -#' \item{\code{prod}}{Produtividade na testemunha, -#' medida em libra por acre (lb/acre).} -#' -#' \item{\code{sat}}{Porcentagem de saturação de bases.} -#' -#' \item{\code{silica}}{Sílica (pH do solo).} -#' +#' +#' \item{\code{resp}}{Resposta da cultura do milho ao fosfato, medida em +#' porcentagem.} +#' +#' \item{\code{prod}}{Produtividade na testemunha, medida em libra por +#' acre (lb/acre).} +#' +#' \item{\code{sat}}{Porcentagem de saturação de bases.} +#' +#' \item{\code{silica}}{Sílica (pH do solo).} +#' #' } -#' #' @keywords RM -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 5.1 pág. 157; Exercício -#' 5.4.7 pág. 161; Exercício 5.4.7 pág. 167) -#' +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 5.1 pág. 157; Exercício 5.4.7 +#' pág. 161; Exercício 5.4.7 pág. 167. #' @examples -#' +#' #' data(DemetrioTb5.1) -#' -#' pairs(~ resp + prod + sat + silica , data = DemetrioTb5.1, -#' main = "Dispersão duas a duas") +#' str(DemetrioTb5.1) +#' +#' pairs(~ resp + prod + sat + silica , data = DemetrioTb5.1) #' NULL #' @name DemetrioTb7.1 -#' @title Produ\enc{çã}{ca}o de Milho por Adubo -#' +#' @title Produ\enc{çã}{ca} de Milho em Função da Adubação #' @description Os dados referem-se a produções de milho, em kg/parcela, -#' de um experimento casualizado em blocos de adubação com +#' de um experimento casualizado em blocos de adubação com #' diferentes doses de \eqn{P_2O_5}. -#' -#' @format Um \code{data.frame} de 20 linhas e 3 colunas. -#' +#' @format Um \code{data.frame} de 20 linhas e 3 colunas, em que +#' #' \describe{ -#' -#' \item{\code{dose}}{Dose de \eqn{P_2O_5}.} -#' -#' \item{\code{bloco}}{Bloco ao qual a observação pertence, para +#' +#' \item{\code{dose}}{Dose de \eqn{P_2O_5}.} +#' +#' \item{\code{bloco}}{Bloco ao qual a observação pertence, para #' controle local de variação.} -#' -#' \item{\code{sat}}{Valor da produção de milho, medido em -#' kg/parcela.} -#' +#' +#' \item{\code{sat}}{Valor da produção de milho, medido em kg/parcela.} +#' #' } -#' -#' @keywords DBC RegSeg -#' -#' @source Demétrio, C. G. B., Zocchi, S. S. (2011). Modelos de -#' Regressão. Piracicaba: ESALQ. (Tabela 7.1 pág. 195) -#' +#' @keywords DBC RS +#' @source DEMÉTRIO; ZOCCHI (2011), Tabela 7.1 pág. 195. #' @examples -#' +#' #' data(DemetrioTb7.1) -#' +#' str(DemetrioTb7.1) +#' #' library(lattice) +#' #' xyplot(producao ~ dose, groups = bloco, data = DemetrioTb7.1, -#' xlab = "Dose", ylab = "Produção") -#' +#' xlab = "Dose", ylab = "Produção") +#' NULL -