g <- ggplot(data=dat.sub,
            aes(x=Datenumfang, y=Durchsatz,
                colour=Konfiguration)) +
     geom_point() + geom_line()
print(g)