From eedf4be81a5bfeca37e0f47f6cc923fb91923e1f Mon Sep 17 00:00:00 2001 From: Lineu <lialcafre@gmail.com> Date: Mon, 5 Sep 2016 13:43:53 -0300 Subject: [PATCH] Adiciona Tabela 2A.1 --- R/NetoTb2A.1.R | 34 ++++++++++++++--------------- data-raw/NetoTb2A.1.txt | 46 ++++++++++++++++++++-------------------- data/NetoTb2A.1.rda | Bin 578 -> 586 bytes man/NetoTb2A.1.Rd | 32 +++++++++++++--------------- 4 files changed, 54 insertions(+), 58 deletions(-) diff --git a/R/NetoTb2A.1.R b/R/NetoTb2A.1.R index ef3aaf36..a08931cc 100644 --- a/R/NetoTb2A.1.R +++ b/R/NetoTb2A.1.R @@ -1,37 +1,35 @@ #' @name NetoTb2A.1 #' @title De casa para o trabalho -#' @description A tabela contém resultados de 32 ensaios em que foi -#' cronometrado o tempo transcorrido desde a passagem por uma ponte -#' até a chegada do pesquisador ao seu destino final. +#' @description Foi cronometrado o tempo transcorrido desde o momento em +#' que o ônibus passa por uma ponte no trajeto até a hora que o +#' pesquisador chega à seu destino final. #' @format Um \code{data.frame} com 32 observações e 5 variáveis, em que #' #' \describe{ #' -#' \item{\code{ens}}{Ensaio correspondente.} +#' \item{\code{ens}}{Número do ensaio.} #' -#' \item{\code{sai}}{Fator de 25 níveis qualitativos referente aos -#' horários de saída do pesquisador.} -#' -#' \item{\code{dia}}{Fator de 5 níveis qualitativos referente aos dias -#' da semana em que o pesquisador realizou o percurso.} +#' \item{\code{sai}}{Fator de 25 níveis referentes aos horários de +#' saída do pesquisador.} #' -#' \item{\code{perc}}{Fator de 3 níveis referente ao percurso realizado -#' pelo pesquisador} +#' \item{dia}{Fator de 5 níveis referentes aos dias em que o pesquisador +#' realizou o trajeto.} +#' +#' \item{perc}{Fator de e níveis referentes ao percurso realizado.} #' -#' \item{\code{tem}}{Tempo de viagem, em minutos} +#' \item{tem}{Tempo de viagem do pesquisador.} #' #' } #' @keywords DBC #' @source Barros Neto, Benício de (2010), (Tabela 2A.1, pág. 86) #' @examples #' -#' library(lattice) -#' #' data(NetoTb2A.1) #' str(NetoTb2A.1) #' -#' xyplot(tem ~ ens, xlab = "Ensaio", ylab = "Tempo", -#' main = "Tempos do Experimento na Ordem de Obtenção", -#' data = NetoTb2A.1) +#' plot(tem ~ ens, type = "o", col = "blue", data = NetoTb2A.1, +#' xlab = "Ensaio", ylab = "Tempo", +#' main = "Tempo de Viagem") +#' #' -NULL \ No newline at end of file +NULL diff --git a/data-raw/NetoTb2A.1.txt b/data-raw/NetoTb2A.1.txt index 47dea3d5..b14a3805 100644 --- a/data-raw/NetoTb2A.1.txt +++ b/data-raw/NetoTb2A.1.txt @@ -1,27 +1,27 @@ ens sai dia perc tem -1 10:55 segunda C 18.3 -2 11:20 quarta C 18.9 -3 10:40 sexta B 10.9 -4 11:25 segunda C 20.7 -5 12:50 sexta B 11.4 -6 11:30 quarta C 22.9 -7 11:25 quarta B 12.1 -8 07:35 ter�a A 12.8 -9 08:10 segunda C 56.3 -10 07:00 ter�a A 13.3 -11 08:10 quinta B 10.9 -12 17:00 sexta A 13.1 -13 15:00 quarta A 12.7 -14 12:30 segunda C 20.6 -15 07:30 ter�a C 18.9 -16 12:30 quarta B 11 -17 08:15 sexta B 10.3 -18 07:05 quinta A 13 -19 12:50 segunda C 18.6 -20 07:35 ter�a A 13 -21 08:00 quinta B 10.6 -22 09:20 quarta B 10.4 -23 07:15 quinta C 21.5 +1 10:55 seg C 18.3 +2 11:20 qua C 18.9 +3 10:40 sex B 10.9 +4 11:25 seg C 20.7 +5 12:50 sex B 11.4 +6 11:30 qua C 22.9 +7 11:25 qua B 12.1 +8 07:35 ter A 12.8 +9 08:10 seg C 56.3 +10 07:00 ter A 13.3 +11 08:10 qui B 10.9 +12 17:00 sex A 13.1 +13 15:00 qua A 12.7 +14 12:30 seg C 20.6 +15 07:30 ter C 18.9 +16 12:30 qua B 11 +17 08:15 sex B 10.3 +18 07:05 qui A 13 +19 12:50 seg C 18.6 +20 07:35 ter A 13 +21 08:00 qui B 10.6 +22 09:20 qua B 10.4 +23 07:15 qui C 21.5 24 08:15 sexta B 10.9 25 08:40 segunda B 10.9 26 08:40 quarta B 11 diff --git a/data/NetoTb2A.1.rda b/data/NetoTb2A.1.rda index 7b82583c3a097839d543c3975fa536e95fdb0ef0..13161cdea851970dffa916b4556af6366ca4696f 100644 GIT binary patch delta 572 zcmX@aa*9RJDJsL#&@oaiIFjYwl@bP~V-p3X>lqjr4={c#P~_!MTk_Q=@RfA%sf-Mx zs)h?vj0+gp8or!lTQ>QE#$Q*H6NgexFi5!hv^5-JV31^&H1OqVb93|MWymlxXvi?h zoN&a1!DUfas(-Mrt>Xj+h7%bKNx9CPi?3W@d?okmw!%zy-iYQ$CR2Jc&IM{ra+Q&A z%#IXLtzWyyBh7|$9ozQ_3W07LrFoZiERgxWGk?jp<7%xcDj8hCvKl^Y3;fu6%*-O0 zb9N{cgq-~O_>`59Sy}kye*y}wel3A^WyUdIHa&m3E%nT;YdL2-nZB5mY<cU&y0cEp zFsVAlL9`%2)vs-9z|QWqw=Un?wP)>Io@*?@VH%ISroXBG_0MYV-@D!`-?#fuT<6It zDd8#X^5?*|ESnI4tD!0_3aft=Ul8tRd0@8C?PTKOPNj{?nGz9AQh{sqI~1PvMYKk6 zDzWwE29!^@-&AZ=_d$QI@2+53ZSP*qa_-v77Z2WrteBt}a58(=98n&&7!h{6XZK!q z3%BxeC9<${JDEt=dx%f?{3UqW)<w!Zhk7rr?ALj!^J<ktn}CKy(8O@wEGH+|Ek}QZ zKHU9l`iDBXvzjZy%~$X&ykd0a$rowycu}X#OPglINgUXB;((5-+gj^dB}<iOwT&&e z-s>5tJUq3gjC05HW>F)4wRFD4oi8jeCSIH-v}Z+6UUnRVxMS?R_3}#Yd$%|_?F=+} f-TJr3_v87V|1q=joQ~E%dgrm6ONe3it-b~T2om=U delta 564 zcmX@ba)?FHDJsL#&@oaiII>KmVJ!pGu8D%u^$iS+2N*vVm>HbnoZ>6LDs$qiN>gUX zt+vWn*jF&SH83uaYpQDY6-o@gQq`llRf+)u*c#6oN=llXTp-CS$upCIfmzw7mzg7l zV~WGdSGhipi<KQ1*xGy=Um5ZTR5eK1I==3o!gHbFSW5TAOS(3Pc8M5YnC!%_IMtK2 zKIvSRUJ`3KNAxKdftXW|4xD^#^T73;!qg@0A{qCCl;j$PZV0q(kqX-NaD^IY(6<j2 z{z(tN?oUqt<;uA^arL<Z6HPM?lQl-FH&U(5l8&8-o40J;))fwY@--fkm)tyAKQws+ zT)(j*;-Hz;ubDaP_W7O54iI^JFeXsw&%FNj?2YwrAAa8QXUT+#6I&)4PIK7TD$Bxf ziA5z+kwfc)<%^YzS<X~Gbi1-8LtG_HC3j-$5|&2?*625ARX?7j7{=t$*thM9e3WFu ztXVb^;^)%7YIaRs+AbG)=+vH;g7Q}(9s(;eqmzS8of)UGGM?YR_m$qxLv5`FZN|=r z_J}X=TX_A(#ronot2PTs99!+nE)~pnbt#uq8wXcVXfAh<msi*k?sMTe`#bm6_0Hca zab~lh!Tp@~Q4_XaIvXrJy;YxwFE^mhi@`+l?Ss2JBmdmX>SynkPkOk9MW*Cf<*A$> zFGVj-7qQzK?L1?dt=G;40c)n@=ae+?UOuY+<(7506H9A(pm~kd!TPXgKb{|{-@4W> Ucv(#NKfNbi1q&741Tsbe0KxJ0WB>pF diff --git a/man/NetoTb2A.1.Rd b/man/NetoTb2A.1.Rd index ecc0a301..6ccd6398 100644 --- a/man/NetoTb2A.1.Rd +++ b/man/NetoTb2A.1.Rd @@ -7,38 +7,36 @@ \describe{ -\item{\code{ens}}{Ensaio correspondente.} +\item{\code{ens}}{Número do ensaio.} -\item{\code{sai}}{Fator de 25 níveis qualitativos referente aos - horários de saída do pesquisador.} - -\item{\code{dia}}{Fator de 5 níveis qualitativos referente aos dias - da semana em que o pesquisador realizou o percurso.} +\item{\code{sai}}{Fator de 25 níveis referentes aos horários de + saída do pesquisador.} -\item{\code{perc}}{Fator de 3 níveis referente ao percurso realizado - pelo pesquisador} +\item{dia}{Fator de 5 níveis referentes aos dias em que o pesquisador + realizou o trajeto.} + +\item{perc}{Fator de e níveis referentes ao percurso realizado.} -\item{\code{tem}}{Tempo de viagem, em minutos} +\item{tem}{Tempo de viagem do pesquisador.} }} \source{ Barros Neto, Benício de (2010), (Tabela 2A.1, pág. 86) } \description{ -A tabela contém resultados de 32 ensaios em que foi - cronometrado o tempo transcorrido desde a passagem por uma ponte - até a chegada do pesquisador ao seu destino final. +Foi cronometrado o tempo transcorrido desde o momento em + que o ônibus passa por uma ponte no trajeto até a hora que o + pesquisador chega à seu destino final. } \examples{ -library(lattice) - data(NetoTb2A.1) str(NetoTb2A.1) -xyplot(tem ~ ens, xlab = "Ensaio", ylab = "Tempo", - main = "Tempos do Experimento na Ordem de Obtenção", - data = NetoTb2A.1) +plot(tem ~ ens, type = "o", col = "blue", data = NetoTb2A.1, + xlab = "Ensaio", ylab = "Tempo", + main = "Tempo de Viagem") + } \keyword{DBC} -- GitLab