panel.beeswarm.Rd 2.19 KB
Newer Older
1
% Generated by roxygen2: do not edit by hand
2 3 4 5 6 7 8 9
% Please edit documentation in R/panel.beeswarm.R
\name{panel.beeswarm}
\alias{panel.beeswarm}
\title{Diagrama de Dispersão com Aranjo dos Pontos como Colmeia}
\usage{
panel.beeswarm(x, y, subscripts, spread, ...)
}
\arguments{
10 11
\item{x, y, subscripts, ...}{Argumentos passados para a
\code{\link[lattice]{panel.xyplot}}.}
12 13

\item{spread}{Um escalar numérico a distância entre os pontos. Esse
14 15 16 17 18 19 20 21
valor é obtido por tentativa erro e toda vez que mudar as
dimensões do gráfico, eles precisam ser novamente fornecidos, no
entanto são valores na escala do eixo \code{x} e por isso são
baseados nas distâncias entre os níveis do fator representado
neste eixo. Como sugestão, abra sempre a janela gráfica
(\code{x11()}) ou faça a exportação (\code{png()}, \code{pdf()},
etc) com dimensões conhecidas e calibre o \code{spred} para que
seja exibido adequadamente.}
22 23 24 25 26 27 28 29 30
}
\value{
A função passa conteúdo para o argumento \code{panel}.
}
\description{
Used to make scatter plot of discrete variables with no
overlapping points. Observations with the same y value are spread.
}
\examples{
31

32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56
data(capdesfo)
str(capdesfo)

library(lattice)

# x11(width = 7, height = 2.8)
xyplot(ncap ~ des | est, data = capdesfo,
       layout = c(5, 1), as.table = TRUE,
       type = c("p", "smooth"), col = 1, col.line = "gray50",
       xlim = extendrange(c(0:1), f = 0.15),
       xlab = "Nível de desfolha artificial",
       ylab = "Número de capulho produzidos",
       spread = 0.07, panel = panel.beeswarm)

# x11(width = 7, height = 2.8)
xyplot(ncap ~ est | factor(des), data = capdesfo,
       layout = c(5, 1), as.table = TRUE,
       type = c("p", "smooth"), col = 1, col.line = "gray50",
       xlab = "Fase de desenvolvimento da planta",
       ylab = "Número de capulhos produzidos",
       scales = list(x = list(
                         at = 1:nlevels(capdesfo$est),
                         labels = substr(levels(capdesfo$est),
                                         start = 1, stop = 3))),
       spread = 0.35, panel = panel.beeswarm)
57

58 59 60 61 62 63 64 65 66
}
\author{
Walmes Zeviani baseado no pacote
    \href{http://www.cbs.dtu.dk/~eklund/beeswarm/}{beeswarm}.
}
\seealso{
\code{\link[lattice]{xyplot}}.
}