| 12345678910111213 |
- 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)
|