library(ggplot2)

d <- read.table("perf.dat", header=TRUE, fill=TRUE)

png("img.png")
ggplot(d[d$Operation == "remplir" & d$Structure == "arraylist",], aes(x=n, y=Temps, color=Structure)) +
    geom_point() + geom_smooth() +
    ggtitle("Remplir ArrayList") + xlab("Taille de l'ArrayList") + ylab("Temps d'exécution") +
    theme(plot.title = element_text(hjust = 0.5))



#ggplot(d,aes(x=n,y=Mem,colour=Structure,shape=Operation))+geom_point()+facet_grid(Structure~Operation)