bar3d.ade: 3D Bar-Plot

In epade: Easy Plots

3D Bar-Plot

Description

Draw pseudo 3d Bar-Plot

Usage

bar3d.ade(x, y=NULL, data=NULL, xw=0.5, zw=1,
          main=NULL, xlab=NULL, ylab=NULL, zlab=NULL,
          xticks=NULL, yticks=NULL, zticks=NULL,
          col=NULL, tcol=NULL, bgcol=NULL, lcol=NULL, alpha=NULL,
          axes=TRUE, fgbox=TRUE, bgbox=TRUE, wall=0)

Arguments

x	a table or matrix a numeric vector or factor a string with the name of the variable in the data.frame a formula x~y
y	a numeric vector or factor a string with the name of the variable in the data.frame
data	data.frame if used strings of formul for x and y
xw	width of bars in x direction
zw	width of bars in z direction
main	an overall title for the plot
xlab	a title for the x axis
ylab	a title for the y axis
zlab	a title for the z axis
xticks	a vector of labels for the x axis
yticks	the number of ticks on the y axis or a vector of exact ticks
zticks	a vector of labels for the z axis
col	a color for the bars a vector of colors a matrix of colors
tcol	color of the text in whole plot
bgcol	the background color for plot dekoration
lcol	bar edges color
alpha	a parameter in [0, 1] for semi-transparency of bars
axes	logical asking whether to plot axis
fgbox	logical asking whether to draw 3d box in forderground (dotted part of box)
bgbox	logical asking whether to draw 3d box (if FALSE, set fgbox to FALSE too)
wall	a number between 0 and 6 for selection the dekoration style of the plot.

See Also

bar.plot.ade

Examples

bar3d.ade(rpois(200,2), rpois(200,2), wall=3)
x <- seq(-16, 16, length= 48)
y <- x
f <- function(x,y) { r <- sqrt(x^2+y^2); 10 * sin(r)/r }
z <- outer(x, y, f)
z[is.na(z)] <- 1
bar3d.ade(z, wall=2, xw=1, zw=0.2, axes=FALSE, bgbox=FALSE,
xlab='', ylab='', zlab='', alpha=1, col='lavender')

epade documentation built on Oct. 29, 2022, 1:14 a.m.