X-Git-Url: https://git.donarmstrong.com/?p=don.git;a=blobdiff_plain;f=posts%2Fbug_reporting_rate.mdwn;h=d164d1a510d0b5c5cf10f7f4a385b1e33a1c3ccd;hp=4266c45253aaceb363439dbc32b185508af6fcf2;hb=794d3c19083d41fd28505a3387f0562db74335a5;hpb=6555e2cc760ab616da985496b95f5fc310418e81 diff --git a/posts/bug_reporting_rate.mdwn b/posts/bug_reporting_rate.mdwn index 4266c45..d164d1a 100644 --- a/posts/bug_reporting_rate.mdwn +++ b/posts/bug_reporting_rate.mdwn @@ -15,12 +15,13 @@ plot this, lets only look at bugs ending in 00: Now, lets get the data into R and plot it. [For clarity, I'm not showing the R code, but it's available in the source cdoe for this post.] -[[!sweavealike results="hide" fig=1 echo=0 code=""" +[[!sweavealike fig=1 echo=0 code=""" require(lattice) +print(getwd()) reporting.rate <- read.table("data/bug_reporting_rate.txt") colnames(reporting.rate) <- c("bug","epoch") reporting.rate <- data.frame(reporting.rate) -reporting.rate$bug <- as.numeric(gsub("\\.report","",gsub(".*\\/","",reporting.rate$bug))) +reporting.rate$bug <- as.numeric(gsub("\\\\.report","",gsub(".*\\\\/","",reporting.rate$bug))) reporting.rate <- reporting.rate[order(as.numeric(reporting.rate$bug)),] ### this is the number of bugs submitted per second ### however, for bug numbers less than about 100000, this number is wrong.