## none library(Pyramid) library(animation) library(googleVis) library(RJSONIO) ani.options(interval = 0.8) for (i in 1:3) { Pyramid(Chippewa.male[, i], Chippewa.female[, i], widths = widths, fill.male = "aquamarine3", fill.female = "orange", border.male = "black", border.female = "black", main = "Chippewa County Population: 1990, 2000, 2010") } ## R version 2.15.0 (2012-03-30) ## Platform: i386-apple-darwin9.8.0/i386 (32-bit) ## Other packages: Pyramid 1.2, animation 2.0-6, googleVis 0.2.15, RJSONIO 0.98-1