Get name of the active colour scheme
colorscheme(x)
x
Hadley Wickham <h.wickham@gmail.com>
g <- ggobi(mtcars) colorscheme(g)