search for: xinch

...ing to have a symbol or a line for every item in the legend, and to be able to put symbols and lines in the same column (option "merge"). The spacing's not quite perfect, though. 3c3 < xjust=0, yjust=1, merge=FALSE, ...) --- > xjust=0, yjust=1, ...) 5,8c5,8 < xchar <- xinch(par("cin")[1])*par("cex") < ychar <- yinch(par("cin")[2])*1.2*par("cex") < xbox <- xinch(par("cin")[2]*0.8)*par("cex") < ybox <- yinch(par("cin")[2]*0.8)*par("cex") --- > xchar <- xinch(par(&...

...offset = 0, add = FALSE, ! args.legend = NULL, ...) { if (!missing(inside)) .NotYetUsed("inside", error = FALSE)# -> help(.) *************** *** 176,184 **** angle <- rev(angle) } xy <- par("usr") ! legend(xy[2] - xinch(0.1), xy[4] - yinch(0.1), ! legend = legend.text, angle = angle, density = density, ! fill = legend.col, xjust = 1, yjust = 1) } title(main = main, sub = sub, xlab = xlab, ylab = ylab, ...) if(axes) axis(if(horiz) 1 else 2, cex.axis = cex.axis, ...) --- 177,1...

...y, pch, bty = "o", bg = par("bg"), xjust = 0, yjust = 1, ...) { xlog <- par("xlog") ylog <- par("ylog") if (xlog) x <- log10(x) if (ylog) y <- log10(y) xchar <- xinch(par("cin")[1]) ychar <- yinch(par("cin")[2]) * 1.2 xbox <- xinch(par("cin")[2] * 0.8) ybox <- yinch(par("cin")[2] * 0.8) yline <- 2 * xchar w <- 2 * xchar + max(strwidth(legend)) h <- (length(l...

Hi I want to draw sth in a pdf file with a predefined defined size. Say a 5cm x 3cm rectangle (a ruler): pdf("rect.pdf", paper="a4") plot(c(1,5,5,1,1),c(1,1,3,3,1),asp=1,axes="n") dev.off() but how do I fix that one unit is 1cm? Thanks thomas

..., k, trymax=50) postscript("metaMDS-CASE-DIMENd.ps", horizontal=TRUE) plot(meta$points, col="blue", xlab="Dim 1", ylab="Dim 2", main=sprintf("metaMDS f?r Variante = \"CASE\", dim = %d, Stress = %.2f %%", k, meta$stress)) text(meta$points+xinch(0.09), labels=names(distab), cex=0.8) ### Cut of data set: ### US-1020525;US-1027783;US-1032733 US-1020525;1.00000000;0.00903941;0.93719674 US-1027783;0.00903941;1.00000000;0.01013081 US-1032733;0.93719674;0.01013081;1.00000000 ### (Remark: I did *not* test exactly the given small data set cut but...

Dear R-users, I am using R version 2.10.1 under windows. In a barplot, I want to mark one of the bars with a special border color. For example: barplot(c(3, 7, 11), border = c(NA, "red", NA)) But how to do this when the bars are stacked? for example: barplot(matrix(1:6, ncol=3)) # border of second bar (i.e. the one with total height = 7) should be red again, I try: barplot(matrix(1:6,

Hi, I have a plot and I would like to overlay a PNG image over it. I'm using the rasterImage function to do this, but the problem I'm facing is working out the coordinates of the upper right corner of the final image in user coordinates. That is I can place the image so the lower left is located at the bottom of the y-axis and the left end of the x-axis. Since my image is say 100px x

Is there an equivalent to the S-PLUS par()$cxy in R? Also, is it possible to get notice taken of some equivalent of \n in R when using text()? For what it is worth I am using RW-0.64.1. John Maindonald email : john.maindonald at anu.edu.au Statistical Consulting Unit, phone : (6249)3998 c/o CMA, SMS, fax : (6249)5549 John Dedman Mathematical

...t) if (!is.null(names.arg)) for (i in 1:length(names.arg)) if (horiz) axis(2, at = MID, labels = names.arg, lty = 0) else axis(1, at = MID, labels = names.arg, lty = 0) } if (!missing(legend.text) && !missing(col)) { xy <- par("usr") legend(xy[2] - xinch(0.1), xy[4] - yinch(0.1), legend = rev(legend.text), fill = rev(col), xjust = 1, yjust = 1) } title(main = main, xlab = xlab, ylab = ylab, ...) if (axes) if (horiz) axis(1) else axis(2) } =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-...

Hi, I was hoping someone could help me with this problem. I’m trying to produce what can be referred to as L’Abbe plots, where a character (my preference is a circle) is plotted at some specified co-ordinates and the size of the character is proportional to a weighting variable. I’ve tried this plot (x, y, type="n") size <- weight/mean(weight) for ( i in 1:length(x) ) { points

...side) || (!horiz & !beside)) { legend.text <- rev(legend.text) legend.col <- rev(legend.col) density <- rev(density) angle <- rev(angle) } xy <- par("usr") legend(xy[2] - xinch(0.1), xy[4] - yinch(0.1), legend =3D legen= d.text, angle =3D angle, density =3D density, fill =3D legend.col, xjust =3D 1, yjust =3D 1) } title(main =3D main, sub =3D sub, xlab =3D xlab, ylab =3D ylab, ...) if (axes) a...

I inherited a function written either for an older version of R or SPlus to draw a brace, "{", in a graph. It uses par("uin") to determine the scaling of the quarter circles that make up segments of the brace, but that setting doesn't exist in current R. I'm guessing that, in the function below, ux, uy can be defined from par("usr") and

Hi, are there any plans to add a colorbar legend to image()? Or such a possibility already implemented which I just haven't discovered yet. Anyway, I will be willing to spent some time on the implementation if there isn't anyone working on that already. Thanks Thomas -.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.- r-devel mailing list -- Read

...n C. For simple matrices and data frames this is several times faster than before, and uses negligible memory compared to the object size. The old version (which no longer coerces a matrix to a data frame and then back to a matrix) is available for now as write.table0(). o The functions xinch(), yinch(), and xyinch() have been moved from package 'grDevices' into package 'graphics'. o Plotmath now allows underline in expressions. (PR#7286, contributed by Uwe Ligges.) o BATCH on Unix no longer sets --gui="none" as the X11 module is only loaded if n...

...n C. For simple matrices and data frames this is several times faster than before, and uses negligible memory compared to the object size. The old version (which no longer coerces a matrix to a data frame and then back to a matrix) is available for now as write.table0(). o The functions xinch(), yinch(), and xyinch() have been moved from package 'grDevices' into package 'graphics'. o Plotmath now allows underline in expressions. (PR#7286, contributed by Uwe Ligges.) o BATCH on Unix no longer sets --gui="none" as the X11 module is only loaded if n...