X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=debbugs.Rnw;h=6fd3082c8ecc7f7af7eb8bca75ab85806c3c2062;hb=da40a1c24d79a428f7541faf11b4e8989db3890b;hp=4131fcfc7c816a3c97865b933c5c38f6e7fae558;hpb=6e908a1c272c7c2565036306888cdc74a120672e;p=debbugs-presentations.git

diff --git a/debbugs.Rnw b/debbugs.Rnw
index 4131fcf..6fd3082 100644
--- a/debbugs.Rnw
+++ b/debbugs.Rnw
@@ -173,7 +173,7 @@ print(ggplot(bug.growth,#[date > as.POSIXct(ISOdatetime(2005,1,1,0,0,0)),],
 \end{center}
 \end{frame}
 
-\begin{frame}{Bug Growth Rate}
+\begin{frame}[fragile]{Bug Growth Rate}
 <<bug_growth_rate,echo=FALSE>>=
 print(ggplot(bug.growth[date > as.POSIXct(ISOdatetime(2014,1,1,0,0,0)),],
              aes(x=date,y=`bugs per day`))+
@@ -186,7 +186,17 @@ print(ggplot(bug.growth[date > as.POSIXct(ISOdatetime(2014,1,1,0,0,0)),],
 @ 
 \end{frame}
 
-\begin{frame}{My entries into Cristian's game}
+\begin{frame}[fragile]{Is the bug filing rate decreasing?}
+\tiny
+<<bug_growth_rate_over_time>>=
+summary(lm(log(`bugs per day`)~date,
+           bug.growth[date > "2014-01-01 PST",]))
+@ 
+\normalsize
+Not significantly decreasing.
+\end{frame}
+
+\begin{frame}{My entries into Christian's game}
   \begin{columns}
     \column{0.5\textwidth}
   \begin{center}
@@ -273,15 +283,6 @@ print(ggplot(rc.bugs.long[date >
       scale_color_discrete("Measure"))
 @ 
 \end{center}
-  \setbeamercolor{postit}{fg=black,bg=yellow}
-  \begin{textblock}{4}(6,4)
-    \begin{onlyenv}<2>
-      \begin{beamercolorbox}[sep=1em,wd=5cm]{postit}
-        \centering \huge Too many RC bugs!
-      \end{beamercolorbox}
-    \end{onlyenv}
-  \end{textblock}
-
 \end{frame}
 
 \section{Debbugs Structure and Infrastructure}