问题
I am using gWidgets in R. I would like two plots to appear side by side after I split the screen. I cannot figure out why no data points appear in the second screen.
library(gWidgets)
win <- gwindow("Graphics example") # Create a window.
# You will be prompted to select a GUI toolkit.
# Enter "1" for gWidgetsRGtk2
ggraphics(ps=6, container=win)
split.screen(c(1,2)) # Split screen into 2 halves
screen(1)
plot(c(1:10), rnorm(10))
screen(2)
plot(c(1:10), rnorm(10))
You should see that the second plot appears but it contains no data points. I am using 32-bit R 2.13.2 on a 32-bit Windows laptop. Any help with this is much appreciated. Thank you.
回答1:
Is is a problem of refresh ggraphics. I think it is better to put it in a ggroup.
For example you can do this:
library(gWidgets)
options(guiToolkit="RGtk2") ## "Qt"
w <- gwindow("brush example", visible=FALSE)
g <- ggroup(container=w)
## I create 2 ggraphics , the container is ggroup
gg <- ggraphics(container=g)
gg1 <- ggraphics(container=g)
visible(w) <- TRUE
## Here we create 2 handlers to refresh the plot on the click
## See documentation of gWidgets for other handler
ID <- addHandlerChanged(gg, handler=function(h,...) {
## udpate graphic and data frame
plot(c(1:10), rnorm(10))
})
ID1 <- addHandlerChanged(gg1, handler=function(h,...) {
## udpate graphic and data frame
plot(c(1:10), rnorm(10))
})
回答2:
It may also be an issue with the window not allocating enough initial space to accommodate the graphic. To avoid this, try passing visible=FALSE
to the gwindow
constructor and after all the components are added show the window with visible(win) <- TRUE
来源:https://stackoverflow.com/questions/13586572/gwidgets-points-are-not-appearing-in-second-screen