Wirkstoffe <- read.csv2("Beispiel_Univariate.csv")
par(mfrow=c(1,3))
boxplot(Wirkstoffe$Wirkstoff.A, main = "Wirkstoff A")
rug(Wirkstoffe$Wirkstoff.A, side = 2)
boxplot(Wirkstoffe$Wirkstoff.B, main = "Wirkstoff B")
rug(Wirkstoffe$Wirkstoff.B, side = 2)
boxplot(Wirkstoffe$Wirkstoff.C, main = "Wirkstoff C")
rug(Wirkstoffe$Wirkstoff.C, side = 2)
par(mfrow = c(1,1))