You could work around it like this. n <- length(levels(TDBU$system)) rows <- ceiling(sqrt(n)) TDBU$rows <- ceiling(as.numeric(TDBU$system) / rows) TDBU$cols <- (as.numeric(TDBU$system) - 1) %% rows
ggplot(TDBU,aes(x=x))+geom_histogram(aes(y=..density..))+ geom_density() + facet_grid(rows ~ cols) HTH, Thierry ------------------------------------------------------------------------ ---- ir. Thierry Onkelinx Instituut voor natuur- en bosonderzoek / Research Institute for Nature and Forest Cel biometrie, methodologie en kwaliteitszorg / Section biometrics, methodology and quality assurance Gaverstraat 4 9500 Geraardsbergen Belgium tel. + 32 54/436 185 [EMAIL PROTECTED] www.inbo.be Do not put your faith in what statistics say until you have carefully considered what they do not say. ~William W. Watt A statistical analysis, properly conducted, is a delicate dissection of uncertainties, a surgery of suppositions. ~M.J.Moroney -----Oorspronkelijk bericht----- Van: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Namens Ben Bolker Verzonden: donderdag 8 november 2007 14:53 Aan: r-help@r-project.org Onderwerp: [R] ggplot2 facets as rows and columns Does anyone (Hadley??) know if there's a straightforward way in ggplot2 to get data divided by a single factor to plot as a rectangular grid of subplots? So far I've only been able to get such data plotted as a single row or single column of skinny subplots. The code below gives an example implemented with lattice, and my best attempt in ggplot2 cheers Ben Bolker ------------ g= rep(1:9,each=50) means = rnorm(9) vars = runif(9) x = rnorm(450,means[g],vars[g]) TDBU = data.frame(system=factor(g),x) require(lattice) histogram( ~ x | system, data = TDBU, xlab = "LRR Effect Size",type="density", panel = function(x, ...) { panel.histogram(x, ...) panel.densityplot(x,...) } ) library(ggplot2) ggplot(TDBU,aes(x=x))+geom_histogram(aes(y=..density..))+ geom_density()+facet_grid(system~.) -- View this message in context: http://www.nabble.com/ggplot2-facets-as-rows-and-columns-tf4771000.html# a13647294 Sent from the R help mailing list archive at Nabble.com. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
