From b43cc22960b98f62798bbcc8a8945716c0534906 Mon Sep 17 00:00:00 2001 From: Lineu <lialcafre@gmail.com> Date: Mon, 10 Oct 2016 19:57:14 -0300 Subject: [PATCH] Adiciona Tabela 6.5 & modifica Tabela 6.3 --- R/NetoTb6.5.R | 32 ++++++++++++++++++++++++++++++++ data-raw/NetoTb6.5.txt | 8 ++++++++ data/NetoTb6.3.rda | Bin 182 -> 243 bytes data/NetoTb6.5.rda | Bin 0 -> 181 bytes man/NetoTb6.5.Rd | 40 ++++++++++++++++++++++++++++++++++++++++ 5 files changed, 80 insertions(+) create mode 100644 R/NetoTb6.5.R create mode 100644 data-raw/NetoTb6.5.txt create mode 100644 data/NetoTb6.5.rda create mode 100644 man/NetoTb6.5.Rd diff --git a/R/NetoTb6.5.R b/R/NetoTb6.5.R new file mode 100644 index 00000000..ff068b79 --- /dev/null +++ b/R/NetoTb6.5.R @@ -0,0 +1,32 @@ +#' @name NetoTb6.5 +#' @title Resultados de Um Novo Planejamento 2^2 com Ponto Central +#' @description Resultados de um planejamento 2^2 com ponto central. +#' @format Um \code{data.frame} com 7 observações e 3 variáveis, em que +#' +#' \describe{ +#' +#' \item{\code{x1}}{Valores do fator 1.} +#' +#' \item{\code{x2}}{Valores do fator 2.} +#' +#' \item{\code{y}}{Resposta.} +#' +#' } +#' @keywords DBC +#' @source Barros Neto, Benício de (2010), (Tabela 6.5, pág. 273) +#' @examples +#' +#' data(NetoTb6.5) +#' str(NetoTb6.5) +#' +#' par(mfrow = c(1,2)) +#' +#' plot(y ~ x1, data = NetoTb6.5) +#' +#' abline(lm(y ~ x1, data = NetoTb6.5), col = 2) +#' +#' plot(y ~ x2, data = NetoTb6.5) +#' +#' abline(lm(y ~ x2, data = NetoTb6.5), col = 3) +#' +NULL diff --git a/data-raw/NetoTb6.5.txt b/data-raw/NetoTb6.5.txt new file mode 100644 index 00000000..f35ae8eb --- /dev/null +++ b/data-raw/NetoTb6.5.txt @@ -0,0 +1,8 @@ +x1 x2 y +-1 -1 86 +1 -1 85 +-1 1 78 +1 1 84 +0 0 90 +0 0 88 +0 0 89 diff --git a/data/NetoTb6.3.rda b/data/NetoTb6.3.rda index f2cb5fe9155c4bc46e8f161232673cf93332c557..ec0f98204e7093ebcfa65f5903e06d43611c44c0 100644 GIT binary patch literal 243 zcmZ>Y%CIzaj8qGb+&m|{ih-f}|LuRpK8y^EmQ2@~OC9Xl|2%MF;9y{IU}#{_VaVUW zu<b;zrpblNzKjc`GMFziE|3;9VhIjD$se34l_(+XE7vF`mDw<hL8#R~fI*6Zt$~4o zK`NQCL3PR^o@0t0ECyXB>Mr}*IJTwTFL^)z{OuqH=hWr$iX5z^j!)|*f4ET4x<Hgg zW|4tMiqeXw1_zEf7#2mnX*lhpk^5+>aKSFqFL!yKOfFe$&^*IomTRQYsZBvC??aP( xxK2rA9#@!{@A}}jawV(aIkkwNCSM{JxceL{eC8tkMf~r7@gi4?fC(T^0sxM;UL61c literal 182 zcmZ>Y%CIzaj8qGbJQp1~fq|i{{=mOo9t;eOmK<`7A`bTKa~?P_Feoly=;9ShnYV1- zg0IY`ytXE@m@j8FxdwJlT-Gzw<iZ6LBeo6^ucQNIQ*SJIo3k-7B{kyPX7N}KJAp;Y z4a}>o*7GW8XWV+b=tdwDH$##OuTH~7VWZ8}N~~%txX+w1vbe}x`00X?QSZ*DO-fwp pmRq?WzdSQFdQSh8vkSf-@%XSsQow3I|D$&v%ejOkPiGr3003wvNnii~ diff --git a/data/NetoTb6.5.rda b/data/NetoTb6.5.rda new file mode 100644 index 0000000000000000000000000000000000000000..e489df3413c8eec0ce343d02bd7f9347022697c4 GIT binary patch literal 181 zcmZ>Y%CIzaj8qGbylM73n}MOY{=mOo9t;eO#tbZs;sy5Xa~?P_Feoly=;Gx{ndkXR zimmyIvBza+vlS|#5^Zg5jT17GQVwwmOkBgnpX#Bwa;t$s&q|36$E~fxZyC;7!@#6n zDtF7l=i=Fm`#J)d_!<nA*rqvTbk2;tI+1DZ3HD-R-fcful>SKgU8$B9w|7Bkpv}|C nS2o_Z=G1HvFWF?yd_QC2-6N6$R(Ac5-gzwN5|UQCpPK*x&;Upg literal 0 HcmV?d00001 diff --git a/man/NetoTb6.5.Rd b/man/NetoTb6.5.Rd new file mode 100644 index 00000000..15642f2a --- /dev/null +++ b/man/NetoTb6.5.Rd @@ -0,0 +1,40 @@ +% Generated by roxygen2: do not edit by hand +% Please edit documentation in R/NetoTb6.5.R +\name{NetoTb6.5} +\alias{NetoTb6.5} +\title{Resultados de Um Novo Planejamento 2^2 com Ponto Central} +\format{Um \code{data.frame} com 7 observações e 3 variáveis, em que + +\describe{ + +\item{\code{x1}}{Valores do fator 1.} + +\item{\code{x2}}{Valores do fator 2.} + +\item{\code{y}}{Resposta.} + +}} +\source{ +Barros Neto, Benício de (2010), (Tabela 6.5, pág. 273) +} +\description{ +Resultados de um planejamento 2^2 com ponto central. +} +\examples{ + +data(NetoTb6.5) +str(NetoTb6.5) + +par(mfrow = c(1,2)) + +plot(y ~ x1, data = NetoTb6.5) + +abline(lm(y ~ x1, data = NetoTb6.5), col = 2) + +plot(y ~ x2, data = NetoTb6.5) + +abline(lm(y ~ x2, data = NetoTb6.5), col = 3) + +} +\keyword{DBC} + -- GitLab