similar to: barplot forces xpd=TRUE (PR#1088)

There seems to be a minor bug in barplot.default when used with log scale w= here one or more values is NA: dat <- matrix(1:25, 5) dat[2,3] <- NA barplot(dat, beside =3D T) #Plots and appropriate barplot with gaps for m= issing data barplot(dat, beside =3D T, log =3D "y") #Error in if (min(height + offset) <=3D 0) stop("log scale error: at least = one 'height +

This in an enhancement requestion, to add the capability to pass arguments through barplot() to legend(). I've created a version that does this. # Run this code; notice that the legend # is superposed over one bar: barplot(height = cbind(x = c(465,91) / 465 * 100, y = c(840,200) / 840 * 100, z = c(37,17) / 37 * 100), beside = FALSE, width =

I've created a hacked version of barplot() which is more compatible with the S version, but currently ONLY FOR VECTORS. Differences && new features: * The `space' argument is interpreted as the fraction of the average bar width. (The current version has the width of the bar plus the space in between constrained to sum to 1.) * There is a new argument `width'. * There is a

Clearly, barplot should have an `axes' argument. The following trivial patch does that ... pls apply. -k *** src/library/base/funs/barplot.orig Sat Aug 2 15:58:44 1997 --- src/library/base/funs/barplot Sat Aug 2 16:00:22 1997 *************** *** 1,7 **** "barplot" <- function (height, names.arg, col=NULL, border=par("fg"), beside=FALSE, space=0.2,

I have a simple barplot that looks fine in the R graphics device window. However when I export it to png I am losing the x-label. It must be an obvious problem but I cannot see it. Trying to resize the plot does not seem to help. Code is below. Any help gratefully received. ###### Start Code############ Groups <-c(21.8,45, 43, 17.2, 8.3, 18) names(Groups) <- c("Exeter",

To all, Recently I created a version of barplot() to include some new features as follows: 1. Plot confidence intervals for each bar: The user can pass lower (ci.l) and upper (ci.u) bounds in the same vector/matrix format as "height". The CI boundary lines will vary in width per bar, if a varying "width" argument is specified. CI line width, type and color can be

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 =

{diverted from the R-SIG-gui list} >>>>> "PD" == Peter Dalgaard <p.dalgaard@biostat.ku.dk> >>>>> on 26 Jun 2004 11:51:02 +0200 writes: PD> James Wettenhall <wettenhall@wehi.edu.au> writes: >> Hi, >> >> Does anyone know a good way to get rid of warnings like: >> Warning message: calling

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

>>>>> "MM" == Martin Maechler <maechler@stat.math.ethz.ch> writes: MM> This is not a bug in the very strict sense, MM> but for consistency, MM> I feel that MM> abline() MM> should obey par("xpd") setting, even by ...-argument. MM> The following code shows how lines() ``works'' and abline() does not :

Hi everyone, I'm trying to plot density curves on the axes of a plot, in a similar way to the 'rug' function. I have had a look at a few approaches and libraries, including: * layout http://addictedtor.free.fr/graphiques/RGraphGallery.php? graph=78 * fancygraph http://addictedtor.free.fr/graphiques/RGraphGallery.php? graph=81 * ggplot - gave up since it needs R 2.3.0 and

hi everyone : i'm trying to rotate the x axis labels in my barlot ( yes, since yesterday ) and my prob12matrix is 2 rows and 16 columns and i followed the instructions in the archive "rotate barplot labels". i was really looking forward to seeing my labels turned but the plot just came back with no labels ? can anyone see what might be going on ? it worked when i followed the

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,

R users, I have a problem with function strwidth in 2.7.1. I'm trying to set the plot margins in a way that horizontal column labels will fit to the graph. tmp.t is a list of data.frame objects. This code works well in 2.6.0. ...snip.. library(gplots) for (i in names(tmp.t)) { bmp(filename=paste(i, "_", Sys.Date(), ".bmp", sep=""), width=1038,

> On Apr 16, 2018, at 10:41 AM, Jiaxuan Chen <Jiaxuan.Chen at cruk.cam.ac.uk> wrote: > > Dear R-devel, > > I think I've found a bug - the alpha transparency doesn't work when plotting lines with xpd = TRUE. > > #works > plot(1:20, col="#1874CD", xpd=T, type="l") > > #works > plot(1:20, col="#1874CD50", xpd=F,

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, I think I've found a bug - the alpha transparency doesn't work when plotting lines with xpd = TRUE. #works plot(1:20, col="#1874CD", xpd=T, type="l") #works plot(1:20, col="#1874CD50", xpd=F, type="l") #doesn't work plot(1:20, col="#1874CD50", xpd=T, type="l") Thank you. Jim [[alternative HTML version

Hi, is it possible to draw a box around the following barplot; using "box=TRUE" won't work. ---------- pc<-c(1,2,5,29,27) barplot(pc,ylim=c(0,30),yaxs="r",xaxs="r",ylab="Anzahl" ,names.arg=c("Mac","286er","386er","486er","Pentium I") ,axisnames=T,col="gray") ---------- Thanks in

Dear all, Our quite basic function mtext() does wrong adjustments in some parameter configurations. This gets obvious when using multi line texts: There is no way to properly adjust text perpendicular to axis 2, for example. Best Jens Oehlschl?gel m <- matrix(1:9, 3) colnames(m) <- c("several\nlines", "several\nlines", "several\nlines") par(mfrow=c(2,2))

Hi All, BG: Will try be brief. I'd like 3 graphs on a page (below each other mfrow=c(3,1)), saved to pdf. The three plot data on the same subject so I'm having one legend, to the right of the center graph. I'm using mar=c(5,15,4,15) to bring the sides in so that the graphs are square and not stretched wide. To have the graph to the side I'm thinking xpd=T. Each graph has a number