diff --git a/R/PaulinoEx10.1.R b/R/PaulinoEx10.1.R index b3c071f1dc1a2f6f8f94946f73a621513f76f47b..cc165abb18a1e3a9bb0ddf2b5329c862c52e1993 100644 --- a/R/PaulinoEx10.1.R +++ b/R/PaulinoEx10.1.R @@ -11,7 +11,7 @@ #' #' \item{\code{freq}}{Frequência de células com múltiplos micronúcleos.} #' -#' \item{\code{total}}{Total de células examinaddas.} +#' \item{\code{total}}{Total de células examinadas.} #' #' } #' @keywords binomial @@ -22,17 +22,13 @@ #' #' str(PaulinoEx10.1) #' -#' barplot(PaulinoEx10.1$freq, +#' barplot(PaulinoEx10.1$freq/PaulinoEx10.1$total, #' col = "darkturquoise", #' names.arg = PaulinoEx10.1$dose, -#' ylim = c(0, 300), +#' ylim = c(0, 0.20), #' xlab = "Dose de radiação", -#' ylab = "Frequência") +#' ylab = "Proporção de células com múltiplos micronúcleos", +#' las = 1) #' -#' library(lattice) -#' -#' xyplot(freq/total ~ dose, data = PaulinoEx10.1, -#' xlab = "Dose de radiação", -#' ylab = "Proporção de células") #' NULL \ No newline at end of file diff --git a/R/PaulinoEx10.6.R b/R/PaulinoEx10.6.R index 403123b928d219ee2aabd08a64ede2cf3e8be70c..307396cfe6642cc36b6c44704047ea2d84c25f22 100644 --- a/R/PaulinoEx10.6.R +++ b/R/PaulinoEx10.6.R @@ -4,13 +4,13 @@ #' avaliados quanto a sensibilidade ao sal através de um método #' usual e um método experimental (utiliza a fludrocortizona como #' agente potencializador da sensibilidade). Sob cada método, o -#' paciente foi classificado em uma das três categorias: sensível ao +#' paciente foi classificado em uma de três categorias: sensível ao #' sal, inconclusivo e insensível ao sal. #' @format Um \code{data.frame} com 18 observações e 4 variáveis, em que #' #' \describe{ #' -#' \item{\code{estudo}}{Paciente avaliado no estudo 1 ou 2.} +#' \item{\code{estudo}}{Estudo em que os indivíduos foram avaliados (1 ou 2).} #' #' \item{\code{usual}}{Avaliação segundo o método usual (insensível, #' inconclusivo ou sensível ao sal).} diff --git a/R/PaulinoTb10.4.R b/R/PaulinoTb10.4.R index ef0335c9ba8cc2bda1ae5d338902672ce91abd51..a09ee355facf1e8716d810e13b4104ca9c4b6567 100644 --- a/R/PaulinoTb10.4.R +++ b/R/PaulinoTb10.4.R @@ -1,7 +1,7 @@ #' @name PaulinoTb10.4 -#' @title Suscetibilidade à Síndrome de Malária Celebral +#' @title Suscetibilidade à Síndrome de Malária Cerebral #' @description Estudo de genética experimental cujo objetivo é mapear -#' a suscetibilidade à síndrome de malária celebral (SMC) em +#' a suscetibilidade à síndrome de malária cerebral (SMC) em #' camundongos. Para a realização do estudo, foram considerados os #' genótipos em dois loci, identificados como relevantes para o #' fenótipo (doença) em causas em animais de progenia F2 resultantes @@ -16,7 +16,7 @@ #' #' \item{\code{locus2}}{Genótipos no locus 2.} #' -#' \item{\code{smc}}{Suscetibilidade ao SMC (suscetíveis, resistentes).} +#' \item{\code{smc}}{Suscetibilidade ao SMC (suscetíveis ou resistentes).} #' #' \item{\code{freq}}{Número de camundongos.} #' @@ -44,6 +44,7 @@ #' title = "SMC"), #' xlab = "Locus1", #' ylab = "Frequências", +#' ylim = c(0,45), #' strip = strip.custom( #' strip.names = TRUE, #' var.name = "Locus2"))