diff --git a/data/results.csv b/data/results.csv index 62d0342..26c996b 100644 --- a/data/results.csv +++ b/data/results.csv @@ -1,3 +1,3 @@ id,age,sequence,qwerty_wpm, qwerty_ter, dvorak_wpm, dvorak_ter, circle_wpm, circle_ter en, 24, qwerty-dvorak-circle, 21.6, 0.067, 9.0, 0.023, 8.5, 0.017 -la, 25, qwerty-circle-dvorak, 18.5, 0.007, 8.8, 0.017, 9.8, 0.022 \ No newline at end of file +la, 25, qwerty-circle-dvorak, 18.5, 0.007, 8.8, 0.017, 9.8, 0.022 diff --git a/doc/report.Rnw b/doc/report.Rnw index 4ba716b..1be7342 100644 --- a/doc/report.Rnw +++ b/doc/report.Rnw @@ -19,13 +19,13 @@ \subsection{Descriptive Statistics}\label{descriptive-statistics} -<<>>= +<>= 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")]) @ -<<>>= +<>= boxplot(results$qwerty_ter, results$dvorak_ter, results$circle_ter, @@ -34,7 +34,7 @@ boxplot(results$qwerty_ter, main = "Layout of onscreen keyboard") @ -<<>>= +<>= boxplot(results$qwerty_wpm, results$dvorak_wpm, results$circle_wpm,