search for: varwidth

Hi, Is there such a thing? If no: is it easily simulated? thanks, Joh

I''d like to make the following changes (differences are from R1.0.1): boxplot.default() 1c1 < function (x, ..., range = 1.5, width = NULL, varwidth = FALSE, --- > function (x, ..., range = 1.5, width = NULL, varwidth = FALSE, boxwex=0.8, 37c37,38 < bxp(groups, width, varwidth = varwidth, notch = notch, --- > bxp(groups, width, varwidth = varwidth, boxwex=boxwex, > notch = notch, bxp() 1c1,2 < fun...

.... The code for the bxp function, which is what is called to actually do the plotting, has a section if (!is.null(width)) { if (length(width) != n | any(is.na(width)) | any(width <= 0)) stop("invalid boxplot widths") width <- 0.8 * width/max(width) } else if (varwidth) { width <- 0.8 * sqrt(z[[i]]$n/nmax) } if (n == 1) width <- 0.4 else width <- rep(0.8, n) The effect of either an explicit "width" argument or a TRUE "varwidth" argument is being overridden in the next statement. Since the default value of "width&...

...and I'm trying to do the following (p. 19 of his book): boxplot(log(marketvalue)~country, data = subset(Forbes2000, country %in% c("United Kingdom","Germany","India","Turkey")), ylab="log(marketvalue", varwidth=TRUE) This *almost* works, but I'm getting ALL the countries on the x-axis, not just the 4-specified. I tried tinkering with variations in the subset command to no avail. Can someone tell me what's wrong/missing with the above command? Thanks, Joe

...hnologies Fax: (908) 582-3340 600 Mountain Ave Email: dj at bell-labs.com Murray Hill, NJ 07974 -------------------------------------------------------------------- Generalized Box Plots USAGE: gboxplot(..., type = "box", range.=, width=, varwidth=F, notch=F, names.=, horiz = T, fill=F, col=1, old = T, plot.it=TRUE) gboxplot(..., type = "vase", from=, to=, kernel.width=, n=, width=, varwidth=F, notch=F, names.=, horiz = T, fill=F, col=1, plot.it=TRUE) gboxplot(..., type =...

Hi everyone, I made this set of boxplots that would show me the widths of some sites broken up by some chromosome, but I don't know how to make it indicate the number of data points that created the boxplot. How do I do that? boxplot(data$site~data$chr,varwidth='TRUE') -- View this message in context: http://r.789695.n4.nabble.com/boxplot-width-tp2266805p2266805.html Sent from the R help mailing list archive at Nabble.com.

...the graph from blue to green? I tried a number of changes, but to no avail. Thanks for your help, John bwplot(voice.part ~ height, singer, panel = function(..., box.ratio) { panel.violin(..., col = "transparent", varwidth = FALSE, box.ratio = box.ratio) panel.bwplot(..., fill = NULL, box.ratio = .1) } )

...Score", fontfamily="HersheySans") #for titles such as 'main', 'sub', 'xlab' and 'ylab' Here is the example: bwplot(school.name~score|assessment+course_code, data=temp2.stack, plot.points=FALSE, drop.unused.levels=TRUE, panel=function(..., box.ratio, varwidth) { panel.violin(..., col="cornsilk", varwidth=FALSE, box.ratio=box.ratio) panel.bwplot(..., box.ratio=0.1) }, layout=c(2,3,1), par.strip.text=list(fontfamily="HersheySans"), scales=list(alternating=1, tck=c(1,0), fontfamily="HersheySans", x=list(relation=&q...

...data x.obs.pos <- rep(my.xlim[2],dim(obs.pos)[2]) y.obs.pos <- 1:dim(obs.pos)[2] x.obs.neg <- rep(my.xlim[1],dim(obs.neg)[2]) y.obs.neg <- 1:dim(obs.neg)[2] bwplot(treatment~foo|group, data = dat, panel=function(...) { panel.violin(..., col = "transparent", varwidth = F) panel.abline(v=0, lty = "dotted") ltext(x.obs.pos, y.obs.pos, obs.pos, pos = 2) ltext(x.obs.neg, y.obs.neg, obs.neg, pos = 4) }, par.strip.text = list(cex = 0.8), xlim = my.xlim) obs.pos obs.neg # note that the numbers in the plot only...

...;R-code> oldpar <- par() # changing the margins par(mar=c(4.1,5.1,4.1,5.1) +0.1) P <- boxplot(bs.s ~ geologie, data=frame34, xlab="Gew.-Prozent der Sand-Gehalte [%]", col="grey", main=("Boxplot der Sandgehalte im Einzugsgebiet Hacketal"), horizontal=T, axes=F, varwidth=T) segments(P$stats[3, ], 1:length(P$n) - 0.4, P$stats[3, ], 1:length(P$n) + 0.4, lwd = 3, col = "black") box() par(las=2) axis(2, label=P$names) axis(4, label=P$n) par(las=1) axis(1) dev.off() par(oldpar) </R-code> another possible sollution would be to change the ylabs to letter...

Hi, I was wondering if there is a ready made function or parameter for indicating the sample size in boxplots? Here's what I came up with so far: library(ISwR) data(energy) attach(energy) boxplot(expend~stature) sample.size <- tapply(expend, stature, length) sample.size <- paste("N=", sample.size, sep="") mtext(sample.size, at=1:length(unique(stature)), line=2,

...version of R. > >Yusuke Uchiyama >e-mail: yusuke at kais.kyoto-u.ac.jp > >----please cut--- > >*** boxplot.R.org Tue Jan 12 12:18:48 1999 >--- boxplot.R Mon Jan 11 22:55:31 1999 >*************** >*** 1,6 **** > boxplot <- function(x, ..., range=1.5, width=NULL, varwidth=FALSE, > notch=FALSE, names.x, data=sys.frame(sys.parent()), >! plot=TRUE, border=par("fg"), col=NULL, log="", pars=NULL) > { > args <- list(x,...) > namedargs <- >--- 1,6 ---- > boxplot <- function(x, ..., range=1.5, width=...

...the text() function for regular y~x plots but in this particular case, I'm kinda lost... Here is my code: # creating labels for x-axis labelling lb <- c() for( n in names(o) ) lb <- c(lb, paste("\n",n,"\n",o[[n]], sep="")) boxplot(x[,-c(10,11)], varwidth=TRUE, col=c("#FF0000","#EE0000","#DD0000","#00FF00","#0000FF","#0000DD","#0000BB","#000099"), col.lab="dark red", col.axis="blue", main="Boxplots for Pollin...

...ime | sex + age , scales = list(x = list(rot = 45)), ylab = list(label = paste(sname[i],"-value",sep=""), cex = 0.8), xaxis = list(cex = 0.6), panel = function(x, y){panel.bwplot(x, y, pch = '|',horiz=F,stats = boxplot.stats, fill = "khaki2", varwidth = T)}))) } Thanks, Tom --------------------------------- Sök efter kärleken! [[alternative HTML version deleted]]

...agues   I have the following code that generates a boxplot for one specific labtest:   boxplot.n(LBSTRESN~COHORT, main="Boxplot of laboratory data for XLXXX-XXX test=Creatinine", subset = LBTEST=="Creatinine", xlab = "Cohort Number", ylab = "Units = umol/L", varwidth=TRUE   I would like to know if there is a way to loop through the dataset and produce the boxplot for a number of specific labtest.   Looking at the documentation for loops I can't see how I would change the "ylab","main"and "subset"     Can someone refer me to a s...

...t would work the same way but to no avail. Could someone please show me how this or something similar is done in R? (I'm trying to convert to R.) Thanks. graphsheet(Name="SheetOne") boxplot(GraphSheet = "SheetOne" , split(Df01$AUC , Df01$Response), varwidth=TRUE, whisklty=4, notch = TRUE, ylab ="Y" , xlab = "X" ) export.graph("C:/SheetOne.EMF", Name = "SheetOne", ExportType = "EMF" ) Regards, Michael [[alternative HTML version deleted]]

...el). I can do that with the box plots, but the violin density areas just take on one colour. My basic call is as follows: bwplot(rmsd ~ file | code, data=spread_data.filtered, panel = function(..., box.ratio){ panel.violin(..., col = c("red", "blue"), cut = 1, varwidth = FALSE, box.ratio = box.ratio) panel.bwplot(..., fill = c("red", "blue"), box.ratio = .1, pch="|") }, par.settings = list(plot.symbol = list(pch = 21, col = "gray"), box.rectangle = list(col = "black"), box.umbrella = list(col = &qu...

Dear all, How can I plot the number of observations per box in a boxplot. Many thanks, Bernard --------------------------------- [[alternative HTML version deleted]]

...seen this error using version 0.65.0. (I've been using versions since 0.61 or so.) The error message is in the subject line. Here's the traceback from the most recent occurrence: Error: incorrect number of arguments to "lambda" > traceback() [1] "bxp(groups, width, varwidth = varwidth, notch = notch, border = border, " [2] " col = col, log = log, pars = pars, lwd = lwd, pch = pch, " [3] " lty = lty, p.size = p.size, ...)" [4] "boxplot(split(mf[[response]], mf[[-response]]), ...)" [5] "boxplot.formula(c.est ~ frac.vec, col...

Dear List-Members, I would like to produce a ordered boxplot in which the categories with the smallest median are plotted at the left end and the box with the largest median at the right. Thanks in advance for any advices Thomas H.