Adiciona Tabela 2A.3

R/NetoTb2A.3.R

+#' @name NetoTb2A.3
+#' @title Bioequivalencia de medicamentos
+#' @description à 21 voluntários foram ministrados dois medicamentos
+#'    distintos e observou-se a concentração do princípio ativo no 
+#'    sangue dos indivíduos no período de 8 horas.
+#' @format Um \code{data.frame} com 21 observações e 3 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{vol}}{Número do voluntário.}
+#'
+#' \item{\code{A}}{Resultados da aplicação do medicamento A.}
+#'
+#' \item{\code{B}}{Resultados da aplicação do medicamento B.}
+#'
+#' }
+#' @keywords DBC
+#' @source Barros Neto, Benício de (2010), (Tabela 2A.3, pág. 93)
+#' @examples
+#'
+#' data(NetoTb2A.3)
+#' str(NetoTb2A.3)
+#'
+#' par(mfrow = 1:2)
+#'
+#' plot(A ~ vol, type = "o", xlab = "Voluntário",
+#'      ylab = "Área sob a Curva",
+#'      main = "Medicamento A",
+#'      col = "blue", data = NetoTb2A.3)
+#'
+#' plot(B ~ vol, type = "o", xlab = "Voluntário",
+#'      ylab = "Área sob a Curva",
+#'      main = "Medicamento B",
+#'      col = "red", data = NetoTb2A.3)
+#'
+NULL
\ No newline at end of file

data-raw/NetoTb2A.3.txt

+vol	A	B
+1	12.761	10.983
+2	10.241	8.211
+3	8.569	9.105
+4	13.321	12.508
+5	11.481	12.114
+6	14.061	11.520
+7	12.287	11.983
+8	14.696	14.454
+9	12.526	11.246
+10	9.060	10.740
+11	12.329	10.879
+12	13.244	13.818
+13	7.864	7.156
+14	9.684	12.297
+15	11.811	12.279
+16	10.109	9.571
+17	10.966	9.895
+18	10.485	15.579
+19	11.899	9.296
+20	13.200	16.163
+21	12.368	11.838

man/NetoTb2A.3.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2A.3.R
+\name{NetoTb2A.3}
+\alias{NetoTb2A.3}
+\title{Bioequivalencia de medicamentos}
+\format{Um \code{data.frame} com 21 observações e 3 variáveis, em que
+
+\describe{
+
+\item{\code{vol}}{Número do voluntário.}
+
+\item{\code{A}}{Resultados da aplicação do medicamento A.}
+
+\item{\code{B}}{Resultados da aplicação do medicamento B.}
+
+}}
+\source{
+Barros Neto, Benício de (2010), (Tabela 2A.3, pág. 93)
+}
+\description{
+à 21 voluntários foram ministrados dois medicamentos
+   distintos e observou-se a concentração do princípio ativo no 
+   sangue dos indivíduos no período de 8 horas.
+}
+\examples{
+
+data(NetoTb2A.3)
+str(NetoTb2A.3)
+
+par(mfrow = 1:2)
+
+plot(A ~ vol, type = "o", xlab = "Voluntário",
+     ylab = "Área sob a Curva",
+     main = "Medicamento A",
+     col = "blue", data = NetoTb2A.3)
+
+plot(B ~ vol, type = "o", xlab = "Voluntário",
+     ylab = "Área sob a Curva",
+     main = "Medicamento B",
+     col = "red", data = NetoTb2A.3)
+
+}
+\keyword{DBC}
+