#Daten generieren
x=rnorm(100, mean = 0, sd = 10)
y=rexp(100, 0.1)

#Boxplot von x und y in ein Bild
boxplot(x,y)

#Laden der benötigten Pakete
library(ggplot2)
library(Cairo)
library(extrafont)
library(tidyverse)
library(hrbrthemes)
library(viridis)

#Daten generieren
a<-rnorm(100,20,9)
b<-rnorm(100,20,11)
c<-rnorm(100,20,5)
d<-rnorm(100,20,7)+runif(100,0,1)

l1<-length(a)
l2<-length(b)
l3<-length(c)
l4<-length(d)


DV2<-c(a,b,c,d)

dataforplot<-data.frame( name=c(rep("A",l1),rep("B",l2), rep("C",l3),rep("D",l4)), Temperaturen=c(DV2) ) dataforplot%>%
  ggplot(aes(x=name,y=Temperaturen,fill=name)) +
  geom_boxplot()+
  scale_fill_viridis(discrete = TRUE, alpha=0.6)+
  theme_ipsum()+
  theme(
    legend.position = "none",
    plot.title = element_text(size=11)
  ) + 
  ggtitle("Boxplot der 4 Gruppen")+
  xlab("")