How can I have better looking menus in gWidget? I found a code in Stackoverflow
library(gWidgets)
options(guiToolkit="RGtk2")
w <- gwindow()
g <- ggroup(cont=w)
do_expand=TRUE
options <- glayout(cont=g, spacing=5, expand=do_expand)
items <- ""
options[1,1] = "vanilla"
options[1,2] <- gcombobox(items, cont=options)
options[2,1] = "expand"
options[2,2, expand=TRUE] <- gcombobox(items, cont=options)
options[3,1] = "expand, fill"
options[3,2, expand=TRUE, fill="y"] <- gcombobox(items, cont=options)
options[4,1] = "size"
options[4,2] <- (cb <- gcombobox(items, cont=options))
size(cb) <- c(250, -1)
## populate comboboxes
items <- state.name
sapply(options[,2], function(i) i[] <- items)
that creates a menu like the following:
And say when you are using one of the dropdown menus it shows something like this:
However I want to have a flashier look as in the following, any idea how can I create better looking GUI in R (say using gWidgets)?
