]> git.donarmstrong.com Git - don.git/blobdiff - posts/bug_reporting_rate.mdwn
reduce the range slightly
[don.git] / posts / bug_reporting_rate.mdwn
index 4266c45253aaceb363439dbc32b185508af6fcf2..8d21da6a2465df450fd775bef857479f1cc74a0c 100644 (file)
@@ -13,14 +13,14 @@ 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.]
+[For clarity, I'm not showing the R code, but it's available in the source code for this post.]
 
-[[!sweavealike results="hide" fig=1 echo=0 code="""
+[[!sweavealike width=800 fig=1 echo=0 results="hide" code="""
 require(lattice)
 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.
@@ -32,7 +32,7 @@ print(xyplot(rate~day,reporting.rate[reporting.rate$epoch >= 1041408000,],
        panel=function(x,y,col,...){
             panel.xyplot(x,y,col="cyan",...);
                 panel.loess(x,y,col="red",...);},
-      ylim=c(0,0.005),
+      ylim=c(0,0.004),
          ylab="Bugs per Second",
          xlab="Time"))
 """]]