Skip to content
Snippets Groups Projects
Commit 4eba3e1b authored by Eduardo E. R. Junior's avatar Eduardo E. R. Junior
Browse files

Realiza correções conforme indicação no MR!123

parent f9a9f221
Branches
No related tags found
1 merge request!123Bruno150 - Adiciona 8 tabelas do Andrade
Pipeline #
#' @name AndradeTb2.24 #' @name AndradeTb2.24
#' @title Estudo sobre a Adoção de uma Variedade de Arroz #' @title Estudo sobre a Adoção de uma Variedade de Arroz
#' @description Estudo realizado por um economista agrícola que tem #' @description Estudo realizado por um economista agrícola que tem
#' interesse em identificar a associação entre o tipo de posse de #' interesse em identificar o comportamento da adoção de uma nova
#' terra de [DESCOBRIR QUEM] e sua propensão a adoção da nova #' variedade de arroz altamente produtiva segundo a situação de
#' variedade de arroz. #' posse de terra.
#' @format Um \code{data.frame} com 6 observações e 3 variáveis, em que #' @format Um \code{data.frame} com 6 observações e 3 variáveis, em que
#' #'
#' \describe{ #' \describe{
...@@ -11,10 +11,11 @@ ...@@ -11,10 +11,11 @@
#' \item{\code{posse}}{Identifica o tipo de posse de terra #' \item{\code{posse}}{Identifica o tipo de posse de terra
#' (proprietário, único arrendatário e vários arrendatários).} #' (proprietário, único arrendatário e vários arrendatários).}
#' #'
#' \item{\code{adocao}}{Identifica o se há, ou não, a adoção da nova #' \item{\code{adocao}}{Identifica o se houve, ou não, a adoção da nova
#' variedade de arroz.} #' variedade de arroz.}
#' #'
#' \item{\code{freq}}{Frequência [DE QUEM? FAZENDEIROS?].} #' \item{\code{freq}}{Frequência de terras com as características de
#' \code{posse} e \code{adocao}.}
#' #'
#' } #' }
#' @keywords contingência #' @keywords contingência
...@@ -27,7 +28,11 @@ ...@@ -27,7 +28,11 @@
#' str(AndradeTb2.24) #' str(AndradeTb2.24)
#' #'
#' xt <- xtabs(freq ~ ., data = AndradeTb2.24) #' xt <- xtabs(freq ~ ., data = AndradeTb2.24)
#'
#' xt #' xt
#' prop.table(xt)
#' prop.table(xt, margin = 1)
#' prop.table(xt, margin = 2)
#' #'
#' mosaicplot(t(xt), col = c("darkturquoise", "lawngreen", "blue"), #' mosaicplot(t(xt), col = c("darkturquoise", "lawngreen", "blue"),
#' cex.axis = 0.8, las = 2, main = "") #' cex.axis = 0.8, las = 2, main = "")
...@@ -41,6 +46,6 @@ ...@@ -41,6 +46,6 @@
#' title = "Posse", #' title = "Posse",
#' cex.title = 1.1), #' cex.title = 1.1),
#' xlab = "Adoção da nova variedade", #' xlab = "Adoção da nova variedade",
#' ylab = "Frequência DE ???") #' ylab = "Frequência de terras")
#' #'
NULL NULL
#' @name AndradeTb2.29 #' @name AndradeTb2.29
#' @title Biometria Total do Camarão \emph{Macrobrachium Potiuna} #' @title Biometria Total do Camarão \emph{Macrobrachium Potiuna}
#' (MÜLLER, 1880)
#' @description Biometria total, em milímetros, do Camarão de água doce #' @description Biometria total, em milímetros, do Camarão de água doce
#' \emph{Macrobrachium potiuna} (MÜLLER, 1880), da família #' \emph{Macrobrachium potiuna} (MÜLLER, 1880), da família
#' \emph{Palaemonidae}. #' \emph{Palaemonidae}.
...@@ -9,8 +10,6 @@ ...@@ -9,8 +10,6 @@
#' ciências agrárias e biológicas com noções de experimentação (2nd #' ciências agrárias e biológicas com noções de experimentação (2nd
#' ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.29, pág. 110) #' ed.). Florianópolis, SC. Editora da UFSC. (Tabela 2.29, pág. 110)
#' #'
#' @references COLOQUE A REFERENCIA DO MULLER (ATENTE-SE AO ESTILO DE
#' REFERÊNCIA)
#' @examples #' @examples
#' #'
#' data(AndradeTb2.29) #' data(AndradeTb2.29)
......
...@@ -10,10 +10,11 @@ ...@@ -10,10 +10,11 @@
\item{\code{posse}}{Identifica o tipo de posse de terra \item{\code{posse}}{Identifica o tipo de posse de terra
(proprietário, único arrendatário e vários arrendatários).} (proprietário, único arrendatário e vários arrendatários).}
\item{\code{adocao}}{Identifica o se há, ou não, a adoção da nova \item{\code{adocao}}{Identifica o se houve, ou não, a adoção da nova
variedade de arroz.} variedade de arroz.}
\item{\code{freq}}{Frequência [DE QUEM? FAZENDEIROS?].} \item{\code{freq}}{Frequência de terras com as características de
\code{posse} e \code{adocao}.}
}} }}
\source{ \source{
...@@ -23,9 +24,9 @@ Andrade, D. F., Ogliari, P. J. (2010). Estatística para as ...@@ -23,9 +24,9 @@ Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
} }
\description{ \description{
Estudo realizado por um economista agrícola que tem Estudo realizado por um economista agrícola que tem
interesse em identificar a associação entre o tipo de posse de interesse em identificar o comportamento da adoção de uma nova
terra de [DESCOBRIR QUEM] e sua propensão a adoção da nova variedade de arroz altamente produtiva segundo a situação de
variedade de arroz. posse de terra.
} }
\examples{ \examples{
...@@ -33,7 +34,11 @@ data(AndradeTb2.24) ...@@ -33,7 +34,11 @@ data(AndradeTb2.24)
str(AndradeTb2.24) str(AndradeTb2.24)
xt <- xtabs(freq ~ ., data = AndradeTb2.24) xt <- xtabs(freq ~ ., data = AndradeTb2.24)
xt xt
prop.table(xt)
prop.table(xt, margin = 1)
prop.table(xt, margin = 2)
mosaicplot(t(xt), col = c("darkturquoise", "lawngreen", "blue"), mosaicplot(t(xt), col = c("darkturquoise", "lawngreen", "blue"),
cex.axis = 0.8, las = 2, main = "") cex.axis = 0.8, las = 2, main = "")
...@@ -47,7 +52,7 @@ barchart(t(xt), ...@@ -47,7 +52,7 @@ barchart(t(xt),
title = "Posse", title = "Posse",
cex.title = 1.1), cex.title = 1.1),
xlab = "Adoção da nova variedade", xlab = "Adoção da nova variedade",
ylab = "Frequência DE ???") ylab = "Frequência de terras")
} }
\keyword{contingência} \keyword{contingência}
......
...@@ -2,7 +2,8 @@ ...@@ -2,7 +2,8 @@
% Please edit documentation in R/AndradeTb2.29.R % Please edit documentation in R/AndradeTb2.29.R
\name{AndradeTb2.29} \name{AndradeTb2.29}
\alias{AndradeTb2.29} \alias{AndradeTb2.29}
\title{Biometria Total do Camarão \emph{Macrobrachium Potiuna}} \title{Biometria Total do Camarão \emph{Macrobrachium Potiuna}
(MÜLLER, 1880)}
\format{Um \code{vetor} numérico com 36 observações.} \format{Um \code{vetor} numérico com 36 observações.}
\source{ \source{
Andrade, D. F., Ogliari, P. J. (2010). Estatística para as Andrade, D. F., Ogliari, P. J. (2010). Estatística para as
...@@ -30,10 +31,6 @@ hist(AndradeTb2.29, ...@@ -30,10 +31,6 @@ hist(AndradeTb2.29,
lines(density(AndradeTb2.29), lwd = 2) lines(density(AndradeTb2.29), lwd = 2)
}
\references{
COLOQUE A REFERENCIA DO MULLER (ATENTE-SE AO ESTILO DE
REFERÊNCIA)
} }
\keyword{AAS} \keyword{AAS}
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment