library(rggobi)

airquality$fmonth <-
    droplevels(with(airquality,
                    factor(Month, levels = 1:12, labels = month.name)))

## Create GGobi instance with R dataset. Multiple views will be
## linked. Datasets can also be loaded directly from files.

g <- ggobi(airquality)

## Can create new plots, start tours, brush, etc from GUI.

## Can also manipulate some aspects of the display using R command line

names(g)
g$airquality

glyph_color(g$airquality)
glyph_color(g$airquality) <- as.numeric(airquality$fmonth)
glyph_color(g$airquality)

## Try View -> 2-D Tour, and keep only first four variables.

## Try Display -> New Parallel Coordinates Display