fix: csv, echo

doc/report.Rnw

@@ -19,13 +19,13 @@
 
 \subsection{Descriptive Statistics}\label{descriptive-statistics}
 
-<<>>=
+<<echo=FALSE>>=
 results <- read.csv("../data/results.csv", sep=",", header=TRUE)
 summary(results[, c("qwerty_ter", "dvorak_ter", "circle_ter")])
 summary(results[, c("qwerty_wpm", "dvorak_wpm", "circle_wpm")])
 @
 
-<<>>=
+<<echo=FALSE>>=
 boxplot(results$qwerty_ter,
         results$dvorak_ter,
         results$circle_ter,
@@ -34,7 +34,7 @@ boxplot(results$qwerty_ter,
         main = "Layout of onscreen keyboard")
 @
 
-<<>>=
+<<echo=FALSE>>=
 boxplot(results$qwerty_wpm,
         results$dvorak_wpm,
         results$circle_wpm,