# NOT RUN {
if(interactive()){
p <- l_pairs(iris[,-5], color=iris$Species, linkingGroup = "iris")
p <- l_pairs(iris[,-5], color=iris$Species, linkingGroup = "iris",
showHistograms = TRUE, showSerialAxes = TRUE)
# plot names
names(p)
# Each plot must be accessed to make changes not managed through
# linking.
# E.g. to change the glyph on all scatterplots to open circles
for (plot in l_getPlots(p)) {
if (is(plot, "l_plot")) {
plot["glyph"] <- "ocircle"}
}
}
# }
Run the code above in your browser using DataLab