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.
Advertisements
