A quick graph from the 911 punk song trove I mentioned earlier. R Code: library(ggplot2) songs <- read.csv("songs.csv",stringsAsFactors =FALSE) songs$seconds <- as.numeric(sub(":.*","", songs$Time)) * 60 + as.numeric(sub(".*:","",songs$Time)) songs$year <- sub(".*\\(","", songs$Song) songs$year <- as.numeric(sub(")","", songs$year)) ggplot(songs) + geom_boxplot(aes(as.factor(year),seconds)) at github View high resolution

A quick graph from the 911 punk song trove I mentioned earlier.

R Code:

library(ggplot2)
songs <- read.csv("songs.csv",stringsAsFactors =FALSE)
songs$seconds <- as.numeric(sub(":.*","", songs$Time)) * 60 + as.numeric(sub(".*:","",songs$Time))
songs$year <-  sub(".*\\(","", songs$Song)
songs$year <- as.numeric(sub(")","", songs$year))
ggplot(songs) + geom_boxplot(aes(as.factor(year),seconds))

at github