The purpose of this report is to find out whether or not there is an increase in the average reaction time when driving after alcohol intake. Below is a table that shows reaction times while driving from before and after drinking two beers, as well as the differences between the times for each subject.
## SubjectID Before After AfterMinusBefore
## 1 2 2.96 4.78 1.82
## 2 13 3.16 4.55 1.39
## 3 4 3.94 4.01 0.07
## 4 16 4.05 5.59 1.54
## 5 17 4.42 3.96 -0.46
## 6 20 4.69 3.72 -0.97
## 7 6 4.81 5.34 0.53
## 8 5 4.85 5.91 1.06
## 9 10 4.88 5.75 0.87
## 10 3 4.95 5.57 0.62
## 11 18 4.99 5.93 0.94
## 12 19 5.01 6.03 1.02
## 13 9 5.15 4.19 -0.96
## 14 12 5.26 7.23 1.97
## 15 8 5.33 5.84 0.51
## 16 15 5.49 5.25 -0.24
## 17 11 5.75 6.25 0.50
## 18 1 6.25 6.85 0.60
## 19 7 6.60 6.09 -0.51
## 20 14 6.65 6.42 -0.23
While the histogram below is obviously not exactly a normal distribution, it is approximately normally distributed as you can see, with the peak in the middle of the plot at around 0.5.
\[H_0:\,\mu_1 - \mu_2=0\] \[H_a:\,\mu_1 - \mu_2>0\]
##
## Welch Two Sample t-test
##
## data: After2Beers$After and Before2Beers$Before
## t = 1.6302, df = 37.994, p-value = 0.05566
## alternative hypothesis: true difference in means is greater than 0
## 95 percent confidence interval:
## -0.01723034 Inf
## sample estimates:
## mean of x mean of y
## 5.4630 4.9595
Based on the data given above by the two sample t-test, \(p-value = 0.05566 > alpha = 0.05\). Since the p-value is greater than alpha, this study does not provide enough evidence to prove that two beers increases the average reaction time while driving.