pies {caroline}R Documentation

Pie chart scatterplot

Description

Plot pie charts in an XY scatterplot. An overhaul of the original pie plot function.

Usage

pies(x, show.labels = FALSE, show.slice.labels = FALSE, color.table = NULL, 
                radii = 1, x0=NULL, y0=NULL, xlim=c(-1,1), ylim=c(-1,1),
                edges = 200,  clockwise = FALSE, 
                init.angle = if (clockwise) 90 else 0, density = NULL, angle = 45, 
                border = NULL, lty = NULL, main = NULL) 

Arguments

x a list of named vectors.
show.labels boolean specifying if the pie point lables should be plotted.
show.slice.labels boolean specifying if the pie slice labels should be plotted.
color.table a named vector of colors. names should correspond to all possible levels of x
radii a vector of radii used to size the pie points.
x0,y0 a vector of x and y positions for the pie points.
xlim, ylim the x and ylimits for the plot.
edges the circular outline of the pie is approximated by a polygon with this many edges.
clockwise logical indicating if slices are drawn clockwise or counter clockwise (i.e., mathematically positive direction), the latter is default.
init.angle number specifying the starting angle (in degrees) for the slices. Defaults to 0 (i.e., 3 o'clock) unless clockwise is true where init.angle defaults to 90 (degrees), (i.e., 12 o'clock).
density the density of shading lines, in lines per inch. The default value of NULL means that no shading lines are drawn. Non-positive values of density also inhibit the drawing of shading lines.
angle the slope of shading lines, given as an angle in degrees (counter-clockwise).
border (possibly vectors) arguments passed to polygon which draws each slice.
lty (possibly vectors) arguments passed to polygon which draws each slice.
main an overall title for the plot.

See Also

pie

Examples

n <- 200
n.groups <- 10
n.subgroups <-  6

grps <- paste('gene',seq(1,n.groups), sep='')[round(runif(n,1,n.groups))]
subgrps <- paste('species',seq(1,n.subgroups), sep='')[round(runif(n,1,n.subgroups))]
group.df <- cbind.data.frame(grps,subgrps)
subgroup.list <- by(group.df, group.df$grps, function(x) x$subgrps)

pie.list <- lapply(subgroup.list, table)
pies(x=pie.list, x0=rnorm(n.groups), y0=rnorm(n.groups), show.labels=TRUE, show.slice.labels=TRUE)

[Package caroline version 0.1-7 Index]