colnames(reporting.rate) <- c("bug","epoch")
reporting.rate <- data.frame(reporting.rate)
reporting.rate$bug <- as.numeric(gsub("\\\\.report","",gsub(".*\\\\/","",reporting.rate$bug)))
colnames(reporting.rate) <- c("bug","epoch")
reporting.rate <- data.frame(reporting.rate)
reporting.rate$bug <- as.numeric(gsub("\\\\.report","",gsub(".*\\\\/","",reporting.rate$bug)))