data(iris)
data <- data.frame(Name=paste("Flower", 1:nrow(iris), sep="-"), iris)
plot1 <- glScatter(data, xval="Sepal.Length", yval="Sepal.Width", colval="Species")
plot2 <- glScatter(data, xval="Species", yval="Petal.Length", colval="Species")
link1 <- gllink(1, 2, src="hover", dest="hover", both=TRUE)
glimma(plot1, plot2, link1, layout=c(1,2))
Run the code above in your browser using DataLab