search for: ascairodevice

Hi All, I found this issue when using asCairoDevice to transforming splom scatter plot to my RGtk2 GUI: If I put the code in R GUI or using CairoPNG or Cairo_pdf() to draw the scatter plot, I can get it correctly: The codes are: (you can copy and paste to your R GUI) super.sym <- trellis.par.get("superpose.symbol") plot.call<-splo...

Hi R-devel I use the packages RGtk2 and cairoDevice. The cairoDevice package has a few stand-alone functions, plus "asCairoDevice" which depends on RGtk2 and calls require(RGtk2). So cairoDevice lists RGtk2 under "Suggests" in the DESCRIPTION file. It can not Import RGtk2 because that would force all users to install RGtk2. The upshot of this is, if you *import* the RGtk2 namespace into another package and the...

When using a gtkDrawingArea as a Cairo device I very often encounter the error: "figure margins too large" Even for the below "getting started" example from http://www.ggobi.org/rgtk2/ this is the case. > win = gtkWindow() > da = gtkDrawingArea() > win$add(da) > asCairoDevice(da) [1] TRUE > plot(1:10) Fehler in plot.new() : Grafikr?nder zu gro? > Also enlarging the drawing area does not help. > win = gtkWindow() > da = gtkDrawingArea() > win$add(da) > asCairoDevice(da) [1] TRUE > da$setSizeRequest(700, 700) > plot(1:10) Fehler in plot.ne...

...e current drawing context e.g. using dev.set(). But this is tedious. How can I set the context using the objects da1 or da2? w <- gtkWindow() w$setSizeRequest(400, 400) vbox <- gtkVBox() da1 <- gtkDrawingArea() da2 <- gtkDrawingArea() vbox$add(da1) vbox$add(da2) dummy <- asCairoDevice(da1) dummy <- asCairoDevice(da2) w$add(vbox) par(oma=c(0,0,0,0), mar=c(0,0,0,0)) plot(1:10) THX --Mark ???????????????????????????????????? Mark Heckmann Blog: www.markheckmann.de R-Blog: http://ryouready.wordpress.com

...awingArea with a button (or any other widget). I tried to put both into a gtkFixed container. But this does not work, no printing occurs. Does someone know a solution? What I tried: w <- gtkWindow() w$setSizeRequest(400,400) fx <- gtkFixed() da <- gtkDrawingArea() fx$put(da, 100, 100) asCairoDevice(da) par(mar=c(0,0,0,0)) plot(1:10) btn.1 <- gtkButton("button") fx$put(btn.1, 200, 200) w$add(fx) Thanks Mark ???????????????????????????????????? Mark Heckmann Blog: www.markheckmann.de R-Blog: http://ryouready.wordpress.com

...devices and then sift through the pictures. That is very unappealing. Manfred P.S. The closest I've come was: library("RGtk2") library("cairoDevice") win <- gtkWindow(show=FALSE) gtkWindowResize(win,800,600) da <- gtkDrawingArea() win$add(da) win$visible <- TRUE asCairoDevice(da) win$visible <- FALSE plot.new() par(mfrow=c(2,2)) plot(1:10) # more plot commands win$visible <- TRUE