shipunov (version 1.0)

Boxplots: Grouped boxplots

Description

Boxplots for every scaled variable grouped by factor

Usage

Boxplots(vars, groups, boxcols=Pastels, legpos="topleft", srt=45, adj=1,
 slty=3, yticks=FALSE, ymarks=FALSE, ...)

Arguments

vars

data frame consists of variables to plot

groups

grouping factor

boxcols

colors of character boxes, default is 'Pastels', i.e. c("white", "lightblue", "mistyrose", "lightcyan", "lavender", "cornsilk")

legpos

where to place automatic legend, default is 'topleft', for no legend use 'legpos=NA'

slty

line type to delimit groups of boxes

srt, adj, yticks, ymarks

regular 'plot()' arguments

...

additional arguments to 'boxplot()'

Value

For the efficiency reasons, the function does not return anything.

Details

There are many ways to represent groups in data. One is trellis plots. 'Boxplots()' make grouped plots which fit the plot box linearly and therefore easy to compare. So the main idea for grouped plots is to make comparison easier.

Please note that because characters within group are likely of different nature, they are scaled. Consequently, tick marks are removed as they have no sense.

See Also

boxplot, Linechart, Dotchart3

Examples

# NOT RUN {
Trees <- trees
Trees[, 4] <- sample(letters[1:3], nrow(Trees), replace=TRUE)
Boxplots(Trees[, 1:3], factor(Trees[, 4]), srt=0, adj=c(.5, 1)) # horizontal labels

lo <- read.table("http://ashipunov.info/shipunov/open/eq_l.txt", h=TRUE, sep=";")
me <- read.table("http://ashipunov.info/shipunov/open/eq_s.txt", h=TRUE, sep=";")
## uses Recode() from this same package
sp <- Recode(me$N.POP, lo$N.POP, as.character(lo$SPECIES))
eq <- cbind(sp, me[-1])
eq3 <- eq[eq$sp %in% levels(eq$sp)[1:3], ]
Boxplots(eq3[, 2:9], eq3[, 1], boxcols=grey(1:3/3), slty=0) # no border lines
# }