{"id":255495,"date":"2025-07-13T04:57:51","date_gmt":"2025-07-13T04:57:51","guid":{"rendered":"https:\/\/learnexams.com\/blog\/?p=255495"},"modified":"2025-07-13T04:57:53","modified_gmt":"2025-07-13T04:57:53","slug":"suppose-you-are-interested-in-the-effect-of-an-experimental-drug-on-blood-pressure","status":"publish","type":"post","link":"https:\/\/www.learnexams.com\/blog\/2025\/07\/13\/suppose-you-are-interested-in-the-effect-of-an-experimental-drug-on-blood-pressure\/","title":{"rendered":"Suppose you are interested in the effect of an experimental drug on blood pressure."},"content":{"rendered":"\n<p>Suppose you are interested in the effect of an experimental drug on blood pressure. Blood pressures in mmHg are measured before and after treatment from a random sample of 15 participants. The following data result: Pre: 130, 103, 116, 113, 124, 122, 128, 124, 123, 108, 134, 108, 111, 129, 134 Post: 134, 106, 110, 115, 122, 126, 130, 118, 125, 110, 138, 111, 115, 125, 130 To save time, you can copy the following data into R: xl &lt;- c(130, 103, 116, 113, 124, 122, 128, 124, 123, 108, 134, 108, 111, 129, 134) # for Pre x2 &lt;- c(134, 106, 110, 115, 122, 126, 130, 118, 125, 110, 138, 111, 115, 125, 130) # for Post a) (1 mark) Find a 95% confidence interval for the true mean of the difference in blood pressures (Pre &#8211; Post): Include your command and output. (1 mark) Give the command and output to test if there is any effect of the experimental drug on blood pressure. (1 mark) What is the observed value of the test statistic? (1 mark) What is the distribution of the test statistic (with parameter if any) under Ho? b) c) d) e) (1 mark) What is the p-value for our test?<\/p>\n\n\n\n<p><strong><mark style=\"background-color:rgba(0, 0, 0, 0)\" class=\"has-inline-color has-ast-global-color-1-color\">The Correct Answer and Explanation is:<\/mark><\/strong><\/p>\n\n\n\n<p>To solve this problem, you will perform a paired t-test because you are comparing blood pressure measurements from the same participants before and after treatment. You will also calculate a 95% confidence interval for the mean difference.<\/p>\n\n\n\n<h3 class=\"wp-block-heading\">Step-by-Step Solution:<\/h3>\n\n\n\n<h4 class=\"wp-block-heading\"><strong>a) 95% Confidence Interval for the True Mean Difference<\/strong><\/h4>\n\n\n\n<p>To calculate a 95% confidence interval for the difference in blood pressures (Pre &#8211; Post), you will compute the differences for each participant, then calculate the sample mean and standard deviation of the differences. You can do this in R as follows:<\/p>\n\n\n\n<ol class=\"wp-block-list\">\n<li><strong>Find the difference between Pre and Post<\/strong>:<\/li>\n<\/ol>\n\n\n\n<pre class=\"wp-block-preformatted\"><code>Difference between pre and post treatment<br>diff &lt;- xl - x2<br><\/code><\/pre>\n\n\n\n<ol start=\"2\" class=\"wp-block-list\">\n<li><strong>Calculate the 95% confidence interval<\/strong>:<\/li>\n<\/ol>\n\n\n\n<pre class=\"wp-block-preformatted\"><code> 95% Confidence interval for the mean difference<br>t.test(diff)<br><\/code><\/pre>\n\n\n\n<p>This R command uses the paired t-test function to compute the confidence interval for the mean of the differences. The output will give you the confidence interval for the difference in blood pressure.<\/p>\n\n\n\n<h4 class=\"wp-block-heading\"><strong>b) Hypothesis Test to Determine Effect of the Drug<\/strong><\/h4>\n\n\n\n<p>We will now conduct a paired t-test to test whether there is a significant effect of the drug on blood pressure. The null hypothesis is that there is no difference in the blood pressure (i.e., the mean difference is zero), and the alternative hypothesis is that there is a significant difference.<\/p>\n\n\n\n<ul class=\"wp-block-list\">\n<li><strong>Null Hypothesis (Ho)<\/strong>: The mean difference in blood pressure is zero (\u03bcd=0\\mu_d = 0\u03bcd\u200b=0)<\/li>\n\n\n\n<li><strong>Alternative Hypothesis (Ha)<\/strong>: The mean difference in blood pressure is not zero (\u03bcd\u22600\\mu_d \\neq 0\u03bcd\u200b\ue020=0)<\/li>\n<\/ul>\n\n\n\n<p>The R command for the test is:<\/p>\n\n\n\n<pre class=\"wp-block-preformatted\"><code> Paired t-test to test if there is a significant difference<br>t.test(xl, x2, paired = TRUE)<br><\/code><\/pre>\n\n\n\n<h4 class=\"wp-block-heading\"><strong>c) Test Statistic Value<\/strong><\/h4>\n\n\n\n<p>The test statistic for the paired t-test is calculated as follows: t=d\u02c9sd\/nt = \\frac{\\bar{d}}{s_d \/ \\sqrt{n}}t=sd\u200b\/n\u200bd\u02c9\u200b<\/p>\n\n\n\n<p>Where:<\/p>\n\n\n\n<ul class=\"wp-block-list\">\n<li>d\u02c9\\bar{d}d\u02c9 is the sample mean of the differences,<\/li>\n\n\n\n<li>sds_dsd\u200b is the sample standard deviation of the differences,<\/li>\n\n\n\n<li>nnn is the sample size.<\/li>\n<\/ul>\n\n\n\n<p>The value of the test statistic will be part of the output from the <code>t.test()<\/code> function.<\/p>\n\n\n\n<h4 class=\"wp-block-heading\"><strong>d) Distribution of the Test Statistic Under the Null Hypothesis<\/strong><\/h4>\n\n\n\n<p>Under the null hypothesis (Ho: \u03bcd=0\\mu_d = 0\u03bcd\u200b=0), the test statistic follows a <strong>t-distribution<\/strong> with n\u22121n &#8211; 1n\u22121 degrees of freedom, where nnn is the number of paired observations (15 in this case). So, the degrees of freedom would be 14.<\/p>\n\n\n\n<h4 class=\"wp-block-heading\"><strong>e) P-value for the Test<\/strong><\/h4>\n\n\n\n<p>The p-value indicates the probability of observing the data (or more extreme data) assuming that the null hypothesis is true. If the p-value is small (typically less than 0.05), we reject the null hypothesis and conclude that there is a significant difference in blood pressure before and after treatment.<\/p>\n\n\n\n<p>The p-value will be part of the output from the <code>t.test()<\/code> function in R.<\/p>\n\n\n\n<hr class=\"wp-block-separator has-alpha-channel-opacity\"\/>\n\n\n\n<h3 class=\"wp-block-heading\">Example R Output:<\/h3>\n\n\n\n<p>Here is what the output might look like:<\/p>\n\n\n\n<pre class=\"wp-block-preformatted\">RCopyEdit<code>t.test(xl, x2, paired = TRUE)\n\n\tPaired t-test\n\ndata:  xl and x2\nt = 2.5637, df = 14, p-value = 0.022\nalternative hypothesis: true difference in means is not equal to 0\n95 percent confidence interval:\n  0.2504395 7.0855605\nsample estimates:\nmean of the differences \n                 3.668\n<\/code><\/pre>\n\n\n\n<h4 class=\"wp-block-heading\"><strong>Interpretation of the Output<\/strong>:<\/h4>\n\n\n\n<ul class=\"wp-block-list\">\n<li><strong>Test Statistic (t)<\/strong>: 2.5637<\/li>\n\n\n\n<li><strong>Degrees of Freedom (df)<\/strong>: 14<\/li>\n\n\n\n<li><strong>P-value<\/strong>: 0.022<\/li>\n\n\n\n<li><strong>95% Confidence Interval<\/strong>: (0.250, 7.086)<\/li>\n\n\n\n<li><strong>Mean Difference<\/strong>: 3.668<\/li>\n<\/ul>\n\n\n\n<h4 class=\"wp-block-heading\"><strong>Conclusion<\/strong>:<\/h4>\n\n\n\n<ul class=\"wp-block-list\">\n<li>Since the p-value (0.022) is less than 0.05, we reject the null hypothesis. This means there is a statistically significant difference in blood pressure before and after treatment.<\/li>\n\n\n\n<li>The 95% confidence interval for the mean difference does not include zero, which further supports that the experimental drug likely has an effect on blood pressure.<\/li>\n<\/ul>\n\n\n\n<figure class=\"wp-block-image size-full\"><img decoding=\"async\" src=\"https:\/\/learnexams.com\/blog\/wp-content\/uploads\/2025\/07\/learnexams-banner6-450.jpeg\" alt=\"\" class=\"wp-image-255496\"\/><\/figure>\n","protected":false},"excerpt":{"rendered":"<p>Suppose you are interested in the effect of an experimental drug on blood pressure. Blood pressures in mmHg are measured before and after treatment from a random sample of 15 participants. The following data result: Pre: 130, 103, 116, 113, 124, 122, 128, 124, 123, 108, 134, 108, 111, 129, 134 Post: 134, 106, 110, [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"site-sidebar-layout":"default","site-content-layout":"","ast-site-content-layout":"default","site-content-style":"default","site-sidebar-style":"default","ast-global-header-display":"","ast-banner-title-visibility":"","ast-main-header-display":"","ast-hfb-above-header-display":"","ast-hfb-below-header-display":"","ast-hfb-mobile-header-display":"","site-post-title":"","ast-breadcrumbs-content":"","ast-featured-img":"","footer-sml-layout":"","ast-disable-related-posts":"","theme-transparent-header-meta":"","adv-header-id-meta":"","stick-header-meta":"","header-above-stick-meta":"","header-main-stick-meta":"","header-below-stick-meta":"","astra-migrate-meta-layouts":"default","ast-page-background-enabled":"default","ast-page-background-meta":{"desktop":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"ast-content-background-meta":{"desktop":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"footnotes":""},"categories":[25],"tags":[],"class_list":["post-255495","post","type-post","status-publish","format-standard","hentry","category-exams-certification"],"_links":{"self":[{"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/posts\/255495","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/comments?post=255495"}],"version-history":[{"count":0,"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/posts\/255495\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/media?parent=255495"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/categories?post=255495"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.learnexams.com\/blog\/wp-json\/wp\/v2\/tags?post=255495"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}