Suppose that the population mean of systolic blood pressure in the US is 115. We hypothesize mean systolic blood pressure is lower than 115 among people who consume a small amount (e.g., around 3.5 ounces) of dark chocolate every day. Assume that systolic blood pressure, X, in this population has a N(,2) distribution. To evaluate our hypothesis, we randomly selected 100 people, who include a small amount of dark chocolate in their daily diet, and measured their blood pressure. If the sample mean is x = 111 and the sample variance is s = 32, can we reject the null hypothesis at 0.1 confidence level?

Please use R code to solve