Adiciona tabela exercicio 6 capitulo 7

R/SoaresEx7.6.R

+#' @name SoaresEx7.6
+#' @title  Pressão sanguínea sistólica de 35 indivíduos.
+#' @description 35 pacientes com doença arterial coronariana, de idade 
+#'     entre 35 e 75 anos, foram submetidos a teste ergométrico (Miller 
+#'     et al., 1990). Os estudos realizaram-se em bicicleta ergométrica, 
+#'     com os exercícios continuando até angina ou fadiga que requeresse 
+#'     a suspensão da atividade. Os dados apresentados referem-se a 
+#'     pressão sanguíneamsistólica em mmHg dos indivíduos em repouso e 
+#'     no pico do exercício.
+#' @format Um \code{data.frame} com 70 observações e 2 variáveis.
+#'
+#' \describe{
+#'
+#' \item{\code{ps}}{Pressão sanguínea sistólica em mmHg dos indivíduos 
+#'     em repouso e no pico do exercício.}
+#'
+#' \item{\code{exp}}{Variável explicativa com os valores obtidos.}
+#'
+#' }
+#' @keywords AAS
+#' @source SOARES; SIQUEIRA, (2002), Ex.7.6, pg.259.
+#' @references MILLER, P. F., SHEPS, D. S., BRAGDON, E. E. et al. 
+#'     Aging and pain perception in ischemic heart disease. American 
+#'     Heart Journal, v.120, p.22-30, 1990.
+#' @examples
+#' 
+#' library(lattice)
+#' data(SoaresEx7.6)
+#' SoaresEx7.6$n <- seq(1:35)
+#' xyplot(exp~n|ps, data = SoaresEx7.6, 
+#'     type = c('g', 'b'),
+#'     main = 'Pressão sanguínea sistólica de 35 indivíduos',
+#'     xlab = 'Pacientes que participaram do estudo', 
+#'     ylab = 'Pressão sanguínea em mmHg') 
+#' 
+#' 
+#' 
+#'
+NULL

data-raw/SoaresEx7.6.txt

+ps	exp
+repouso	175
+repouso	140
+repouso	140
+repouso	148
+repouso	154
+repouso	140
+repouso	170
+repouso	158
+repouso	175
+repouso	140
+repouso	154
+repouso	150
+repouso	132
+repouso	178
+repouso	122
+repouso	128
+repouso	160
+repouso	125
+repouso	120
+repouso	150
+repouso	162
+repouso	172
+repouso	178
+repouso	168
+repouso	134
+repouso	154
+repouso	130
+repouso	120
+repouso	160
+repouso	160
+repouso	150
+repouso	170
+repouso	122
+repouso	180
+repouso	140
+exercicio	190
+exercicio	160
+exercicio	225
+exercicio	190
+exercicio	232
+exercicio	170
+exercicio	200
+exercicio	190
+exercicio	185
+exercicio	170
+exercicio	166
+exercicio	174
+exercicio	144
+exercicio	214
+exercicio	154
+exercicio	150
+exercicio	218
+exercicio	172
+exercicio	186
+exercicio	180
+exercicio	194
+exercicio	204
+exercicio	220
+exercicio	220
+exercicio	168
+exercicio	180
+exercicio	220
+exercicio	146
+exercicio	214
+exercicio	160
+exercicio	170
+exercicio	204
+exercicio	162
+exercicio	220
+exercicio	190

man/SoaresEx7.6.Rd

+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/SoaresEx7.6.R
+\name{SoaresEx7.6}
+\alias{SoaresEx7.6}
+\title{Pressão sanguínea sistólica de 35 indivíduos.}
+\format{Um \code{data.frame} com 70 observações e 2 variáveis.
+
+\describe{
+
+\item{\code{ps}}{Pressão sanguínea sistólica em mmHg dos indivíduos 
+    em repouso e no pico do exercício.}
+
+\item{\code{exp}}{Variável explicativa com os valores obtidos.}
+
+}}
+\source{
+SOARES; SIQUEIRA, (2002), Ex.7.6, pg.259.
+}
+\description{
+35 pacientes com doença arterial coronariana, de idade 
+    entre 35 e 75 anos, foram submetidos a teste ergométrico (Miller 
+    et al., 1990). Os estudos realizaram-se em bicicleta ergométrica, 
+    com os exercícios continuando até angina ou fadiga que requeresse 
+    a suspensão da atividade. Os dados apresentados referem-se a 
+    pressão sanguíneamsistólica em mmHg dos indivíduos em repouso e 
+    no pico do exercício.
+}
+\examples{
+
+library(lattice)
+data(SoaresEx7.6)
+SoaresEx7.6$n <- seq(1:35)
+xyplot(exp~n|ps, data = SoaresEx7.6, 
+    type = c('g', 'b'),
+    main = 'Pressão sanguínea sistólica de 35 indivíduos',
+    xlab = 'Pacientes que participaram do estudo', 
+    ylab = 'Pressão sanguínea em mmHg') 
+
+
+
+
+}
+\references{
+MILLER, P. F., SHEPS, D. S., BRAGDON, E. E. et al. 
+    Aging and pain perception in ischemic heart disease. American 
+    Heart Journal, v.120, p.22-30, 1990.
+}
+\keyword{AAS}
+