From 8eaf9ebacf73ce03f3edf55987668c5214829339 Mon Sep 17 00:00:00 2001
From: Don Armstrong <don@donarmstrong.com>
Date: Thu, 10 Aug 2017 08:42:04 -0700
Subject: [PATCH] show whether bug growth is decreasing over time

---
 debbugs.Rnw | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

diff --git a/debbugs.Rnw b/debbugs.Rnw
index 4131fcf..2deb057 100644
--- a/debbugs.Rnw
+++ b/debbugs.Rnw
@@ -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}
-- 
2.39.5