Skip to content
Snippets Groups Projects
Commit 649f1c65 authored by Cesar Taconeli's avatar Cesar Taconeli
Browse files

Merge branch 'alessandra108' into devel

parents 8b6e51ca 8919718f
No related branches found
No related tags found
No related merge requests found
Showing
with 522 additions and 0 deletions
#' @name PaulaEx3.7.7a
#' @title Influência de Extrato Vegetal e Químico
#' @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.
#'
#' @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
#' computacional. São Paulo, SP: IME-USP. (Ex 3.7.7a, pág. 269)
#'
#' @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,
#' title="Caramujos", cex.title=1,
#' lines=TRUE, points=FALSE))
#'
NULL
\ No newline at end of file
#' @name PaulaEx3.7.7b
#' @title Influência de Extrato Vegetal e Químico
#' @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.
#'
#' @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
#' computacional. São Paulo, SP: IME-USP. (Ex 3.7.7b, pág. 269)
#'
#' @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,
#' title="Caramujos", cex.title=1,
#' lines=TRUE, points=FALSE))
#'
#'
NULL
\ No newline at end of file
#' @name PaulaEx3.7.7c
#' @title Influência de Extrato Vegetal e Químico
#' @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.
#'
#' @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
#' computacional. São Paulo, SP: IME-USP. (Ex 3.7.7c, pág. 269)
#'
#' @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,
#' title="Caramujos", cex.title=1,
#' lines=TRUE, points=FALSE))
#'
#'
#'
NULL
\ No newline at end of file
#' @name PaulaEx3.7.8
#' @title Salá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
#' 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
#' computacional. São Paulo, SP: IME-USP. (Ex 3.7.8, pág. 270)
#'
#' @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,
#' xlab = "Nível de temperatura",
#' ylab = "Número de sementes germinadas")
#'
NULL
\ No newline at end of file
#' @name PaulaTb3.21
#' @title Distribuição de Rotifers das Duas Espécies
#' @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
#' computacional. São Paulo, SP: IME-USP. (Tb 3.21, pág. 257)
#'
#' @examples
#'
#' data(PaulaTb3.21)
#'
#' str(PaulaTb3.21)
#'
#' library(lattice)
#'
#' xyplot(PaulaTb3.21$susp/PaulaTb3.21$exp ~ dens,
#' groups = esp,
#' data = PaulaTb3.21,
#' xlab = "Densidade",
#' ylab = "Proporção de rotifers suspensos",
#' type = c("p"),
#' auto.key = TRUE)
#'
NULL
\ No newline at end of file
dose cexp cmort
0 50 4
15 50 5
20 50 14
25 50 29
30 50 38
35 50 41
40 50 47
dose cexp cmort
0 65 2
100 52 2
150 52 8
200 52 20
250 52 41
300 52 48
350 52 51
400 52 52
dose cexp cmort
0.000 30 2
0.010 30 4
0.015 30 4
0.020 30 11
0.030 29 9
0.040 30 14
0.050 30 24
temp numid ntemp sgerm
11 baixo 21 98
11 baixo 42 96
11 baixo 62 62
11 medio 21 94
11 medio 42 79
11 medio 62 3
11 alto 21 92
11 alto 42 41
11 alto 62 1
21 baixo 21 94
21 baixo 42 93
21 baixo 62 65
21 medio 21 94
21 medio 42 71
21 medio 62 2
21 alto 21 91
21 alto 42 30
21 alto 62 1
dens susp exp esp
1.019 11 58 Polyarthra
1.020 7 86 Polyarthra
1.021 10 76 Polyarthra
1.030 19 83 Polyarthra
1.030 9 56 Polyarthra
1.030 21 73 Polyarthra
1.031 13 29 Polyarthra
1.040 34 44 Polyarthra
1.040 10 31 Polyarthra
1.041 36 56 Polyarthra
1.048 20 27 Polyarthra
1.049 54 59 Polyarthra
1.050 20 22 Polyarthra
1.050 9 14 Polyarthra
1.060 14 17 Polyarthra
1.061 10 22 Polyarthra
1.063 64 66 Polyarthra
1.070 68 86 Polyarthra
1.070 488 492 Polyarthra
1.070 88 89 Polyarthra
1.019 13 161 Keratella
1.020 14 248 Keratella
1.021 30 234 Keratella
1.030 10 283 Keratella
1.030 14 129 Keratella
1.030 35 161 Keratella
1.031 26 167 Keratella
1.040 32 286 Keratella
1.040 22 117 Keratella
1.041 23 162 Keratella
1.048 7 42 Keratella
1.049 22 48 Keratella
1.050 9 49 Keratella
1.050 34 160 Keratella
1.060 71 74 Keratella
1.061 25 45 Keratella
1.063 94 101 Keratella
1.070 63 68 Keratella
1.070 178 190 Keratella
1.070 154 154 Keratella
File added
File added
File added
File added
File added
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/PaulaEx3.7.7a.R
\name{PaulaEx3.7.7a}
\alias{PaulaEx3.7.7a}
\title{Influência de Extrato Vegetal e Químico}
\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.}
}}
\source{
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
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.
}
\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,
title="Caramujos", cex.title=1,
lines=TRUE, points=FALSE))
}
\keyword{MLG}
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/PaulaEx3.7.7b.R
\name{PaulaEx3.7.7b}
\alias{PaulaEx3.7.7b}
\title{Influência de Extrato Vegetal e Químico}
\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.}
}}
\source{
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
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.
}
\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,
title="Caramujos", cex.title=1,
lines=TRUE, points=FALSE))
}
\keyword{MLG}
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/PaulaEx3.7.7c.R
\name{PaulaEx3.7.7c}
\alias{PaulaEx3.7.7c}
\title{Influência de Extrato Vegetal e Químico}
\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.}
}}
\source{
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
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.
}
\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,
title="Caramujos", cex.title=1,
lines=TRUE, points=FALSE))
}
\keyword{MLG}
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/PaulaEx3.7.8.R
\name{PaulaEx3.7.8}
\alias{PaulaEx3.7.8}
\title{Salário de Executivos}
\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.}
}}
\source{
Paula, G. A. (2004). Modelos de regressão: com apoio
computacional. São Paulo, SP: IME-USP. (Ex 3.7.8, pág. 270)
}
\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
cada 100 sementes submetidas a cada condição experimental.
}
\examples{
data(PaulaEx3.7.8)
str(PaulaEx3.7.8)
library(lattice)
PaulaEx3.7.8$ntemp <- as.factor(PaulaEx3.7.8$ntemp)
xyplot(temp ~ numid + ntemp,
groups = sgerm,
data = PaulaEx3.7.8,
xlab = " ",
ylab = "Densidade",
auto.key = list(space="top", columns=2,
title="Espécie", cex.title=1,
lines=TRUE, points=FALSE))
}
\keyword{MLG}
% Generated by roxygen2: do not edit by hand
% Please edit documentation in R/PaulaTb3.21.R
\name{PaulaTb3.21}
\alias{PaulaTb3.21}
\title{Distribuição de Rotifers das Duas Espécies}
\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).}
}}
\source{
Paula, G. A. (2004). Modelos de regressão: com apoio
computacional. São Paulo, SP: IME-USP. (Tb 3.21, pág. 257)
}
\description{
Experimentos 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.
}
\examples{
data(PaulaTb3.21)
str(PaulaTb3.21)
library(lattice)
xyplot(PaulaTb3.21$susp/PaulaTb3.21$exp ~ dens,
groups = esp,
data = PaulaTb3.21,
xlab = "Densidade",
ylab = "Proporção de rotifers suspensos",
type = c("o"),
auto.key = list(space="top", columns=2,
title="Espécie", cex.title=1,
lines=TRUE, points=FALSE))
}
\keyword{MLG}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment