Wie kann ich leere Faktoren aus ggplot2-Facetten entfernen?
Ich versuche eine zu ändernBeispiel eines einfachen Waldes Plotten durch Einführen von Facetten nach einer Faktorvariablen.
Angenommene Daten dieser Struktur:
<code>test <- structure(list(characteristic = structure(c(1L, 2L, 3L, 1L, 2L ), .Label = c("Factor1", "Factor2", "Factor3"), class = "factor"), es = c(1.2, 1.4, 1.6, 1.3, 1.5), ci_low = c(1.1, 1.3, 1.5, 1.2, 1.4), ci_upp = c(1.3, 1.5, 1.7, 1.4, 1.6), label = structure(c(1L, 3L, 5L, 2L, 4L), .Label = c("1.2 (1.1, 1.3)", "1.3 (1.2, 1.4)", "1.4 (1.3, 1.5)", "1.5 (1.4, 1.6)", "1.6 (1.5, 1.7)"), class = "factor"), set = structure(c(1L, 1L, 1L, 2L, 2L), .Label = c("H", "S" ), class = "factor")), .Names = c("characteristic", "es", "ci_low", "ci_upp", "label", "set"), class = "data.frame", row.names = c(NA, -5L)) </code>
Und den Code ausführen:
<code>p <- ggplot(test, aes(x=characteristic, y=es, ymin=ci_low, ymax=ci_upp)) + geom_pointrange() + coord_flip() + geom_hline(aes(x=0), lty=2) + facet_wrap(~ set, ncol = 1) + theme_bw() + opts(strip.text.x = theme_text()) </code>
Erzeugt eine Ausgabe wie folgt:
Alles gut soweit. Ich möchte jedoch das leere Faktor3-Level von meinem unteren Panel loswerden und kann keinen Weg finden, dies zu tun. Gibt es eine Möglichkeit, das zu tun?
Danke für die Hilfe.