require(ggplot2)
require(scales)
require(dplyr)

df <- read.csv("/tmp/grammypro-node-access-args.csv")

requests <- group_by(df, request_time, patch)

df.grouped <- summarise(requests, total = sum(time))

ggplot(df.grouped, aes(patch, total, colour = patch)) + geom_boxplot() + scale_y_continuous(breaks = pretty_breaks(25)) + 
    theme_bw()