You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

38 lines
1.0 KiB

#!/usr/bin/env Rscript
# To use this to graph some benchmarks, install R (http://www.r-project.org/)
# and ggplot (http://ggplot2.org/).
#
# Once installed, you can generate some CSV output with a command like this:
#
# $ OUTPUT_FORMAT=csv iojs benchmark/http/client-request-body.js > data.csv
# $ ./benchmark/plot_csv.R data.csv data.png bytes type
#
# Where the 3rd argument to this script is the graph's X coordinate, the 4th is
# how the output is grouped, and the Y coordinate defaults to result.
library(methods)
library(ggplot2)
# get info from arguments
args <- commandArgs(TRUE)
csvFilename <- args[1]
graphFilename <- args[2]
xCoordinate <- args[3]
groupBy <- args[4]
# read data
data <- read.csv(file = csvFilename, head = TRUE)
# plot and save
plot <- ggplot(data = data, aes_string(x = xCoordinate, y = 'result', col = groupBy)) +
geom_point(size = 5) +
ggtitle(data$filename)
png(filename = graphFilename, width = 560, height = 480, units = 'px')
print(plot)
graphics.off()
cat(paste('Saved to', graphFilename, '\n'))