From 9dfec536c3c5138c0d92fd5ab37e01897683da86 Mon Sep 17 00:00:00 2001
From: Lineu <lialcafre@gmail.com>
Date: Mon, 5 Sep 2016 14:12:54 -0300
Subject: [PATCH] Adiciona Tabela 2A.5
---
R/NetoTb2A.5.R | 28 ++++++++++++++++++++++++++++
data-raw/NetoTb2A.5.txt | 11 +++++++++++
data/NetoTb2A.5.rda | Bin 0 -> 296 bytes
man/NetoTb2A.5.Rd | 36 ++++++++++++++++++++++++++++++++++++
4 files changed, 75 insertions(+)
create mode 100644 R/NetoTb2A.5.R
create mode 100644 data-raw/NetoTb2A.5.txt
create mode 100644 data/NetoTb2A.5.rda
create mode 100644 man/NetoTb2A.5.Rd
diff --git a/R/NetoTb2A.5.R b/R/NetoTb2A.5.R
new file mode 100644
index 00000000..4d4a54cd
--- /dev/null
+++ b/R/NetoTb2A.5.R
@@ -0,0 +1,28 @@
+#' @name NetoTb2A.5
+#' @title Produtividade de algas marinhas
+#' @description Teor de Agar-agar de algas retiradas de 2 locais.
+#' @format Um \code{data.frame} com 10 observações e 2 variáveis, em que
+#'
+#' \describe{
+#'
+#' \item{\code{A}}{Teor de Agar-agar observado em algas do local A.}
+#'
+#' \item{\code{B}}{Teor de Agar-agar observado em algas do local B.}
+#' }
+#' @keywords DBC
+#' @source Barros Neto, Benício de (2010), (Tabela 2A.5, pág. 97)
+#' @examples
+#'
+#' data(NetoTb2A.5)
+#' str(NetoTb2A.5)
+#'
+#' par(mfrow = c(1,2))
+#'
+#' plot(NetoTb2A.5$A, xlab = "Local A", ylab = "(%)",
+#' main = "Teor de agar no local A", col = "blue")
+#'
+#' plot(NetoTb2A.5$B, xlab = "Local B", ylab = "(%)",
+#' main = "Teor de agar no local B", col = "red")
+#'
+#'
+NULL
diff --git a/data-raw/NetoTb2A.5.txt b/data-raw/NetoTb2A.5.txt
new file mode 100644
index 00000000..067b3a4f
--- /dev/null
+++ b/data-raw/NetoTb2A.5.txt
@@ -0,0 +1,11 @@
+A B
+39.75 42.37
+36.4 45.23
+33.88 34.14
+27.85 37
+31.42 29.96
+34.4 31.82
+36.62 34.58
+36.5 42.58
+38.04 42.38
+23.8 NA
diff --git a/data/NetoTb2A.5.rda b/data/NetoTb2A.5.rda
new file mode 100644
index 0000000000000000000000000000000000000000..ce2d3c36f491304cbf5dbd2b6bf697cd8bb20d9f
GIT binary patch
literal 296
zcmZ>Y%CIzaj8qGb^vy80WMF8o|Nn1u1|x&xt*-xqTU_k<|1=z8XfTpsU~mv%Q&`}@
z<IK2$;o5<W3A1<_d>qcIFAzA9xa7!zQ`G^PFPS~nS1xwz4`B8+VK6b_mEvh&V31U4
zU|^79U~6EIVqjojzQ>^CfRoFLevucUKYT7WwoSEKVpr=T;Bqvt(vPDna^a$oh}O<N
zFD8qHO$~i-83II_EV35ymZ&6r3gMAG%yOk$KrATU_`g$H<$+bkO&7`~44M-6{xjGa
z{V_^KwRKts>#c}CJqia65`q_;d6y8~SbsNi*;0f4??0kuauyWVh<m0*=TB`=Jm33x
z8sFCQ?m>$>=BcJU`R`$|K!xLUV)5@n7p1#0UV?ii$~S4TFu&7#(p9ifVb+DbA^-#;
BcvJuY
literal 0
HcmV?d00001
diff --git a/man/NetoTb2A.5.Rd b/man/NetoTb2A.5.Rd
new file mode 100644
index 00000000..7881f9b5
--- /dev/null
+++ b/man/NetoTb2A.5.Rd
@@ -0,0 +1,36 @@
+% Generated by roxygen2: do not edit by hand
+% Please edit documentation in R/NetoTb2A.5.R
+\name{NetoTb2A.5}
+\alias{NetoTb2A.5}
+\title{Produtividade de algas marinhas}
+\format{Um \code{data.frame} com 10 observações e 2 variáveis, em que
+
+\describe{
+
+\item{\code{A}}{Teor de Agar-agar observado em algas do local A.}
+
+\item{\code{B}}{Teor de Agar-agar observado em algas do local B.}
+}}
+\source{
+Barros Neto, Benício de (2010), (Tabela 2A.5, pág. 97)
+}
+\description{
+Teor de Agar-agar de algas retiradas de 2 locais.
+}
+\examples{
+
+data(NetoTb2A.5)
+str(NetoTb2A.5)
+
+par(mfrow = c(1,2))
+
+plot(NetoTb2A.5$A, xlab = "Local A", ylab = "(\%)",
+ main = "Teor de agar no local A", col = "blue")
+
+plot(NetoTb2A.5$B, xlab = "Local B", ylab = "(\%)",
+ main = "Teor de agar no local B", col = "red")
+
+
+}
+\keyword{DBC}
+
--
GitLab