Grafiken mit Hintergrundbild erstellen

Manchmal kann es sinnvoll sein, die graphische Darstellung einer statistischen Größe auf ein Hintergrundbild zu applizieren. Mit R lässt sich das folgendermaßen bewerkstelligen:

Zuerst liest man mit der readJPEG()-Funktion aus dem jpeg-Paket das ausgewählte Hintergrundbild ein (im Beispiel heißt es blackboard.jpg).

library(jpeg)
imgage <- readJPEG("blackboard.jpg")

Danach lädt man die Pakete ggplot2 und grid, wobei mit dem ersten Paket die Grafik erzeugt und mit dem zweiten Paket das Hintergrundbild – hier eine Tafel – eingebunden wird.

library(ggplot2)
library(grid)

ggplot(diamonds) +
  annotation_custom(rasterGrob(imgage, 
                               width=unit(1,"npc"), 
                               height=unit(1,"npc")), 
                    -Inf, Inf, -Inf, Inf) +
  geom_bar(aes(clarity), fill="white", colour="red") +
  xlab("") +
  ylab("") +
  ggtitle("Säulendiagramm mit Hintergrundbild") +
  scale_fill_continuous(guide = FALSE)

PS: Der Dataframe diamonds sowie die darin enthaltene Variable clarity werden mit dem Paket ggplot2 geladen.