plot.r 478 B

12345678910111213
  1. library(ggplot2)
  2. d <- read.table("perf.dat", header=TRUE, fill=TRUE)
  3. png("img.png")
  4. ggplot(d[d$Operation == "remplir" & d$Structure == "arraylist",], aes(x=n, y=Temps, color=Structure)) +
  5. geom_point() + geom_smooth() +
  6. ggtitle("Remplir ArrayList") + xlab("Taille de l'ArrayList") + ylab("Temps d'exécution") +
  7. theme(plot.title = element_text(hjust = 0.5))
  8. #ggplot(d,aes(x=n,y=Mem,colour=Structure,shape=Operation))+geom_point()+facet_grid(Structure~Operation)