Edit Question - KnowledgeHub

Title Body

I'd like to place four plots onto a single page. Axis labels should be printed only at the very rim, i.e. x axis labels for the bottom diagrams only, and y axis labels for the left diagrams only. This goes both for the name of the axis as a whole and the individual tick marks. I can generate something along these lines using the following code: pdf(file = "ExampleOutput.pdf", width = 6.61, height = 6.61, pointsize = 10 ) set.seed(42) catA <- factor(c("m100", "m500", "m1000", "m2000", "m3000", "m5000")) catB <- factor(20:28) samples <- 100 rsample <- function(v) v[ceiling(runif(samples, max=length(v)))] Tab <- data.frame(catA = rsample(catA), catB = rsample(catB), valA = rnorm(samples, 150, 8), valB = pmin(1,pmax(0,rnorm(samples, 0.5, 0.3)))) par(mfrow = c(2,2)) for (i in 0:3) { x <- Tab[[1 + i %% 2]] plot(x, Tab[[3 + i %/% 2]], xlab = if (i %/% 2 == 1) "Some Categories" else NULL, ylab = if (i %% 2 == 0) "Some Values" else NULL, axes = FALSE ) axis(side = 1, at=1:nlevels(x), labels = if (i %/% 2 == 1) levels(x) else FALSE) axis(side = 2, labels = (i %% 2 == 0)) box(which = "plot", bty = "l") } par(mfrow = c(1,1)) dev.off() I'll welcome suggestions for how to improve my ploting commands, perhaps avoid draing the axes and the L in the lower left corner manually. But that's only a besides. The result of this sequence looks like this: The problem here is the huge amount of wasted whitespace. I have the impression that R reserves space for axis and tick labels even if they are not used. As a consequence of this wasted space, for the left bottom diagram, only every second x tick actually gets labeled, which is really bad here. I'd like to generate a similar plot witho

Tags (comma-separated) Cancel