similar to: Error in 'legend' help?

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

I could not find a way to specify the border color of the boxes drawn in a legend, so that the legend can match exactly the colors of the actual plot (e.g. in the case of two superimposed histograms which have different shading and different borders). Indeed, the legend function seems to hard code the color "black" for the borders in this call: rect2(left = xt, top = yt +

When legend() is used with the angle argument as follows, not only the boxes beside the legend text, but also the whole legend box is filled with shading lines. I think this is not intended: plot(1:10) legend(8, 4, c("A", "B"), angle=c(10, 80), fill=NULL, density=20) I'd suggest as a fix (legend.R of R-1.5.0): 25c25 < rect2 <- function(left, top, dx, dy,

Full_Name: Jerome Asselin Version: 1.6.2 OS: RedHat Linux 7.2 Submission from: (NULL) (142.103.173.179) Should be an easy fix... Consider the examble below: plot(0,0) legend(0,0,c("Hello!","Hi!"),pch=1:2,lty=1:2,trace=T) It gives the following trace: > plot(0,0) > legend(0,0,c("Hello!","Hi!"),pch=1:2,lty=1:2,trace=T) xchar= 0.05178 ;

Dear R developers, The following command produces an interaction plot with lwd=2. interaction.plot(c(1, 2, 1, 2), c(1, 1, 2, 2), 1:4, lwd=2) In the legend, however, lwd seems to be 1, which does not seem to be intended behavior. Probably the lwd is not correctly forwarded to legend: from the interaction.plot source: legend(xleg, yleg, legend = ylabs, col = col, pch = if (type %in%

Hi R-help, We are using R 2.2 on Win XP and have a detail question on how the legend can be optimised. We use the following; -> plot(,type="b",...) The lines in the plot do not cross the points. How can we obtain the same effect in the legend? (points without a line through them..) We tried setting the pt.bg to white but this did not help. See script below. thanks, Jan

I am trying to create a plot that has multiple plot characters for each point (e.g. a point within a triangle, a triangle within a square, etc). The workaround I have found to do this is by plotting twice, as in this example: x <- c(1.1, 2.3, 4.6) y <- c(2.0, 1.6, 3.2) plot(x, y) points(x,y, pch=20, col="red", cex=0.5) This works, but perhaps there is a better way to do it in one

Hi folks, Please let me know what I am doing wrong. I want to have a legend with symbols that are filled with same color as the drawn line, but I failed to do that: plot(1:100, 1:100, pch=21, bg="red") legend("bottomright", "test", bty='n', pch=21, bg="red", col="red") It looks to me that the "bg" option in legend does not

Dear all, I have a multiline plot with each line labeled with a different letter. But I'm not able to make the legend display the same kind of pattern '-a-', instead the letter is overwritten by the line. A simpler legend with only the letter is not very visible and the pt.bg does nothing with letters. Any idea? plot(1:10,10:1,lty=1,type='b', lwd=2,pch='a')

I need to have the maths symbol for >= in the legend, and to substitute threshold variable with its value. Somehow, various attempts weren't successful. Please help. threshold <- 0.5 plot(NA, xlab="", ylab="", main="", axes=F, xlim=c(0,1), ylim=c(0,1), xaxs="i", yaxs="i") legend(x=0, y=1, fill=c("orange", "white",

HI, This code is part of a code I used to do a linear regression: >points(var1~var2,data=Regress,pch=21,bg="grey") >reg11<-lm(var1~var2,data=Regress) >abline(lm(var1~var2,data=Regress),lty=2,lwd=2,col="grey") >legend("topleft",legend= >c("NDII from composite", >"y= 0.0007x - 0.1156",expression(paste(r^2 ==

Hi, Drawing a legend I would like to be able to specify the color of boxes which are drawn if fill or density is specified. eg. legend(0,40000,c("raw","LR/PR-TPS"),fill=c(1,2),col=c(1,2),density=c(20,20),angle=c(-20,45),bty="n") Currently the color of the boxes -- border is always black and can *not* be changed. To get this option only a *minimal* change is

Lfo@psykiatri.aaa.dk wrote: > (R1.9.1 Windows) > > In legend( ) lwd have no effect on points - contrary to the behaviour > in e.g. plot( ) and points( ). It would be nice to have an option pt.lwd > affecting the line width of legend points (like pt.cex changes the > magnification). > > > An example (note the difference in line width between points in the > plot

Here are another three problems with logarithmic scales: 1) segments() does not work with logarithmic scales. I suggest to change lines 962-973 in "plot.c": for (i = 0; i < n; i++) { if (FINITE(xt(x0[i%nx0])) && FINITE(yt(y0[i%ny0])) && FINITE(xt(x1[i%nx1])) && FINITE(yt(y1[i%ny1]))) { GP->col = INTEGER(col)[i % ncol];

Hello forum! I am currently having trouble getting R to recognize one of my pch characters. Here's what I have: legend(120, 40, c("SAL-arterial", "SAL-portal", "GLP-1-arterial", "GLP-1-portal"), bty="n", col=c("black"), pch=19:15:21:22, pt.bg="white", pt.cex=2:2:2:2, lty=1, lwd=2, text.col="black", cex=1.3) Now,

Hi guys, I use R 2.6.2 and Windows XP. I’ve got the following question: I wrote a lot of text into the margin of a plot. When I use the “jpeg”-function, only a little part of the margin text is displayed in the final jpeg? Any ideas to change it? Source-Code: datenbankdaten<-data.frame(LETTERS[1:20],

I have made a minor hack to "legend" (in R 1.0.0, but I didn't notice any changes to legend in the 1.0.1 NEWS) to allow the legend to be formatted in multiple columns, or horizontally (number of columns <- number of legend items). (I find this helpful when I have lots of legend items and not a lot of vertical space to squeeze the legend into.) (Another hack I've considered

Perhaps this is not a bug but rather my misunderstanding of lty and col. I would like to generate a legend for plots as follows: par(mfcol = c(2, 1), mar = c(5.1, 6.1, 4.1, 2.1)) matplot(t(matrix(1:8,8,20)), type="l") par(mfg = c(2, 1, 2, 1)) box(col = 0) # Rbug workaround. Thanks Martin legend((par()$usr)[1:2], (par()$usr)[3:4], as.character(1:8), lty=1:8, col=1:8,

Perhaps this is not a bug but rather my misunderstanding of lty and col. I would like to generate a legend for plots as follows: par(mfcol = c(2, 1), mar = c(5.1, 6.1, 4.1, 2.1)) matplot(t(matrix(1:8,8,20)), type="l") par(mfg = c(2, 1, 2, 1)) box(col = 0) # Rbug workaround. Thanks Martin legend((par()$usr)[1:2], (par()$usr)[3:4], as.character(1:8), lty=1:8, col=1:8,

Hi, I seem to be unable to get a mixed legend that has lines *or* polygons (not both). For example: ppi <- seq(0,2*pi,length.out=21)[-21] frame() plot.window(ylim=c(-5,5),xlim=c(-5,5),asp=1) polygon(cos(ppi)*4+rnorm(20,sd=.2),sin(ppi)*4+rnorm(20,sd=.2), col="green",border=FALSE) polygon(cos(ppi)*2+rnorm(20,sd=.1),sin(ppi)*2+rnorm(20,sd=.1), col="blue",border=FALSE)