Jhenifer125

Adiciona 14 tabelas referentes a issue #125

man/PaulinoTb1.1.Rd

@@ -2,7 +2,7 @@
 % Please edit documentation in R/PaulinoTb1.1.R
 \name{PaulinoTb1.1}
 \alias{PaulinoTb1.1}
-\title{Acidentes de Viação Ocorridos na Suécia}
+\title{Acidentes Rodoviários Ocorridos na Suécia}
 \format{Um \code{data.frame} com 4 observações e 3 variáveis, em que
 
 \describe{
@@ -21,15 +21,17 @@ Paulino, C. D., Singer, J. M. (2006). Análise de Dados
     (Tabela 1.1, pág. 04)
 }
 \description{
-Durante 18 semanas de 1961 contaram-se o acidentes de
-    viação registrados na Suécia avaliando-se o tipo de estrada e o
+Durante 18 semanas, no ano de 1961, contou-se o número de acidentes 
+    rodoviários registrados na Suécia segundo o tipo de estrada e o
     fato de haver ou não um limite de velocidade de 90 km/h no dia
-    em que ocorreram. Pretendia-se saber, nomeadamente, se a 
-    imposição do limite de velocidade influenciava a ocorrência de
-    acidentes de um modo diferente consoante o tipo de estrada.
+    em que ocorreram. Pretendia-se investigar se a 
+    imposição do limite de velocidade estava relacionado à ocorrência de
+    acidentes e a relação com o tipo de estrada.
 }
 \examples{
 
+data(PaulinoTb1.1)
+
 str(PaulinoTb1.1)
 
 xt <- xtabs(acid ~ veloc + estr, data = PaulinoTb1.1)