xy<-cbind(1:100, (1:100)+rnorm(100,,5))
plot(xy,xlim=c(-50,150),ylim=c(-50,150))
boxplot2D(xy,box.shift=-30,angle=3,angle.typ=1)
boxplot2D(xy,box.shift=20,angle=1,angle.typ=1)
boxplot2D(xy,box.shift=50,angle=5,angle.typ=1)Run the code above in your browser using DataLab