Introduction

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

Histogram

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.

Two Sample T-Test

\[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.

Works Cited

https://bolt.mph.ufl.edu/6050-6052/unit-4b/module-13/paired-t-test/