g <- ggplot(data=dat,
            aes(x=Datenumfang, y=Durchsatz,
                colour=Konfiguration,
                shape=Algorithmus)) +
     geom_point(size=3) + geom_line() +
     scale_x_log10()