add wd print

diff --git a/posts/bug_reporting_rate.mdwn b/posts/bug_reporting_rate.mdwn
index 0f952b719f3d595f00cbb17384e5f7c01c249e62..d164d1a510d0b5c5cf10f7f4a385b1e33a1c3ccd 100644 (file)
--- a/posts/bug_reporting_rate.mdwn
+++ b/posts/bug_reporting_rate.mdwn
@@ -15,9 +15,10 @@ 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.]
 
 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)
 require(lattice)

-reporting.rate <- read.table("../data/bug_reporting_rate.txt")
+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)))
 colnames(reporting.rate) <- c("bug","epoch")
 reporting.rate <- data.frame(reporting.rate)
 reporting.rate$bug <- as.numeric(gsub("\\\\.report","",gsub(".*\\\\/","",reporting.rate$bug)))