example.r

pdf("C:\\Users\\Odhran\\Desktop\\Test\\example.pdf")
L1 <- c(0.2234,0.7471,0.3520,0.2940,0.1928,0.1828,0.6042,0.5172,0.8191,0.4532)
L2 <- c(0.2814,0.7744,0.9374,0.2261,0.8558,0.4750,0.2155,0.2763,0.6965,0.3463)
L3 <- c(0.3067,0.1373,0.3733,0.4777,0.0805,0.5826,0.6299,0.9875,0.8450,0.7834)
g_range <- range(0, L1,L2,L3)
plot(L1,type="o",pch=1,lty=1,col="black",ylim=g_range, axes=FALSE, ann=FALSE)
axis(1, at=1:10)
axis(2, las=1)
box(xpd=TRUE)
lines(L2,type="o",pch=2,lty=2,col="red")
lines(L3,type="o",pch=3,lty=3,col="blue")
title(main="Tests")
title(xlab="Test")
title(ylab="Execution Speed (s)")
legend("bottomleft",inset=c(0.01,0),g_range[2],c("Lua","Ruby","Python"),cex=0.75,col = c("black","red","blue"),pch=1:3,lty=1:3,bty="n");