similar to: example(..., ask=getOption("example.ask"))

Hi, a few days back I had asked for help on a Qt device package. Thanks to hints from Duncan TL and Thomas Friedrichsmeier, I now have something more or less functional. For those interested, It can be downloaded from http://dsarkar.fhcrc.org/R/R-Qt.html I have a couple of related questions. First, dev.interactive(), used in example() and many demo()-s to decide if the current device is

I have a simple graph (oode below) which looks fine on the screen but when I save it in png format the title (actually the last mtext line) is cut off. I am pretty sure that I am doing something very stupid but other than playing around with the png height and width commands which don't seem to help I have no idea of what to look for. Any suggestions or cures would be appreciated. Thanks

Hi R-users, I inted to make multiple plots using for loop. The question is how can I adjust the left hand side margin of the plot according to the names.arg argument in barplot2. In every plot I have different annotations in the y axis and they vary in length. Now when I have fixed margins opar <- par(mar=c(3,15,0,2)... I get the same margins in all of the plots. That leaves lots of white

Env: Win XP, R 2.9.2] It's a minor annoyance, but I find that after I run example(), the console state of prompting to press Enter for each new graph remains as it is under example. It's more annoying that it seems difficult to turn this behavior off! In a fresh session: > getOption("example.ask") [1] "default" Run an example: > example(plot) plot>

Dear list, Is it intentional that example() opens a new device and leaves it in a mode where it asks (prompts) the user to Press return to see the next plot for *all* subsequent plots on that device. For example; with an already opened device, example() works as I would expect: > par("ask") [1] FALSE > example(lm) .... OUTPUT CLIPPED .... lm> plot(lm.D9, las = 1) #

Sir, I have hit a the limits of my understanding of text / par / opar etc... I have a few related xts data frames which have multiple columns, and have written a for-loop to make a set of charts - however i do not get any margin text when i run the loop. when i test the code outside of the loop the margin text appears - however when i run the loop the margin text does not appear ... what gives?

Hello, I am creating plots of hourly precipitation and accumulated precipitation (on different axis, see attached image). I was wondering how can I have the plot frame (black border) start at zero, it looks like it is plotted less than zero? The code I use to create the png files is below: CairoPNG(PNG_file,width=1000, height=600, pointsize=14, bg="white") opar <-

hi everybody, I noticed the following: in one of my scripts 'layout' is used to generate a (approx. square) grid of variable dimensions (depending on no. of input files). if the no. of subplots (grid cells) becomes moderately large (say > 9) I use a construct like ###layout grid computation and set up occurs here### ... opar <- par(no.readonly = T);

Dear R-devel members, I'm in the process of building a package (akmisc) for my own use (Win XP, R 2.0.1 Patched - see details at end). As I was adding functions (and hence more source .R files) to my package it got to the point were "R CMD check" failed with the following error (output has been cut). * checking S3 generic/method consistency ... WARNING Error in .try_quietly({ :

I propose the following small changes to pairs.default. The point is to allow control of the outer margin settings, so that there is for example room for legends. [Note also the issue re the setting of par()$usr on exit] ---------------------------------------------------------------- (1) Replace function (x, labels, panel = points, main = NULL, font.main = par("font.main"),

Dear R-devel, Kurt had alerted me to the problem that the randomForest package that I maintain has been failing checks in R-devel. However, I just can't see why or where it's failing. I'd very much appreciate any pointer. The failure occur when running the example code in varImpPlot.Rd: > varImpPlot(mtcars.rf) Error in par(opar) : invalid value specified for graphical parameter

Hi, I try to create PNG images of a certain size where each pixel intensity corresponds to exactly one probe signal in an Affymetrix array. I try to use png() and image() with zero margins to do this. Example: z <- matrix(1:15, nrow=45, ncol=30) png("large.png", height=nrow(z), width=ncol(z), bg="red") par(mar=c(0,0,0,0)) image(z, col=gray.colors(16), axes=FALSE)

Hi, I am trying to infer the dimension of an opened bitmap (png, jpeg, bitmap device...) from par() parmeters. From the help on par(), I found that: > dim <- c(400, 200) > png("foo.png", width=dim[1], height=dim[2]) > dim2 <- par("din") * par("cra") / par("cin") > dev.off() > dim2 [1] 399.9999 199.9999 I've tried the above on

Dear all, I have a simple plot using "gridBase" like this. The problem occurs whenever I execute this code there is always a blank page created before the actual plot. How can we disable that blank page? I am using: R version 2.7.2 (2008-08-25) and gridBase version: 0.4-3 __ BEGIN__ library(grid) library(gridBase) opar <- par(no.readonly=TRUE) par(opar) grid.newpage()

Hello, I'm willing to plot a sequence of densities on a 3d graph, something like ----------------------------------------------------------------- x <- sapply(1:10, function(i)rnorm(1000)) f <- sapply(1:10, function(i)density(x[,i], from=-5,to=5)$y) grid <- density(x[,1], from=-5,to=5)$x win.graph() persp(grid1, 1:10, f,theta=-50, phi=30, d=2)

I think this was asked recently but I can't find the item. Is it possible to find the colour at a point on a graphics page? I want to estimate the area of a complex shape by colouring it then random sampling from an enclosing box ... Richard Rowe Richard Rowe Senior Lecturer Department of Zoology and Tropical Ecology, James Cook University Townsville, Queensland 4811, Australia fax (61)7

Dear R users, I'm making multiple plots within the same pdf page (par(mfcol = c(5,1)), and want a legend for this at the bottom of all the plots. From previous mails it has been suggested to use par(xpd=TRUE), increase the margin at the last plot, and then draw the legend. However, when I do this, the last plot gets smaller with the same amount I increase the margin with. The problem seems to

Dear All, Would you please tell me how to display the sample No. on the map ? ---Below commands don't display the sample No.(from 1 to 150).--- library(som) library(klaR) iris.som3 <- som(iris[,1:4], xdim = 14,ydim = 6) library(klaR); opar<- par(xpd = NA) shardsplot(iris.som3, data.or = iris,label = TRUE) legend(3.5,14.3, col = rainbow(3), xjust =0.5, yjust = 0,legend =

Dear List, Suppose I want to do a demonstration with R, which I will be showing a couple of different graphs (e.g. demo(graphics) ). However I want R to run through each graphics automatically. I can achieve this by changing the line in demo(graphics): opar <- par(ask = interactive() && (.Device %in% c("X11", "GTK", "windows",

R 2.4.0 for Windows The following plot appears as a squared window (as all r-plots) Not all subtitles are visible, but all subtitle will appear, when changing the aspect ratio of the plot window with the mouse to a wide format. But does not work when using the save as postscript menu item from the plot window. is there any solution for that? opar <- par(mfrow = c(2,2), oma = c(0, 0, 1.1,