Difference between revisions of "SMHS SLR"

From SOCR
Jump to: navigation, search
(Simple linear regression (SLR))
m (Inference on Correlation)
 
(31 intermediate revisions by 2 users not shown)
Line 1: Line 1:
==[[SMHS| Scientific Methods for Health Sciences]] - Correlation and Simple Linear Regression (SLR) ==
+
== [[SMHS|Scientific Methods for Health Sciences]] - Correlation and Simple Linear Regression (SLR) ==
  
===Overview===
+
=== Overview ===
Many scientific applications involve the analysis of relationships between two or more variables involved in studying a process of interest. In this section, we are going to study on the correlations between 2 variables and start with simple linear regressions. Consider the simplest of all situations where Bivariate data (X and Y) are measured for a process and we are interested in determining the association with an appropriate model for the given observations. The first part of this lecture will discuss about correlation and then we are going to talk about SLR to address correlations.
+
In scientific research, we often analyze the relationship between two or more variables to understand underlying processes. While univariate analysis describes a single variable, bivariate analysis explores the association between two variables—typically an independent variable (<math>X</math>) and a dependent variable (<math>Y</math>).
  
===Motivation===
+
This module focuses on two fundamental techniques:
The analysis of relationships, if any, between two or more variables involved in the process of interest is widely needed in various studies. We begin with the simplest of all situations where bivariate data (X and Y) are measured for a process and we are interested in determining the association, relation or an appropriate model for these observations (e.g., fitting a straight line to the pairs of (X,Y) data). For example, we measured students of their math scores in the final exam and we want to find out if there is any association between the final score and their participation rate in the math class. Or we are interested to find out if there is any association between weight and lung capacity. Simple linear regression would certainly be a simple way to start and it can address the association very well in simple cases.
+
* Correlation: Quantifies the strength and direction of the linear association between two variables.
 +
* Simple Linear Regression (SLR): Models the relationship mathematically, allowing us to predict <math>Y</math> based on <math>X</math> by fitting a straight line to the data.
  
===Theory===
+
Common applications include studying the association between final exam scores and class participation, or physiological traits such as body weight and lung capacity.
  
*Correlation: correlation efficient $(-1≤\rho≤1)$ is a measure of linear association or clustering around a line of multivariate data. The main relationship between two variables (X,Y) can be summarized by $(\mu_{X},\sigma_{X})$,$(\mu_{Y},\sigma_{Y})$ and the correlation coefficient denoted by $\rho$=$\rho(X,Y)$.
+
=== Correlation ===
**The correlation is defined only if both of the standard deviations are finite and are nonzero and it is bounded by -1≤$\rho$≤1.
+
==== Theory and Definition ====
**If $\rho$=1, perfect positive correlation (straight line relationship between the two variables); if $\rho$=0, no correlation (random cloud scatter), i.e., no linear relation between X and Y; if $\rho$=-1, a perfect negative correlation between the variables.
+
The correlation coefficient (denoted <math>\rho</math> for the population and <math>r</math> for the sample) measures the strength and direction of the linear relationship between two continuous variables. It is bounded by:
**$\rho(X,Y)$ $=\frac{cov(X,Y)}{\sigma_{X}\sigma_{Y}}$=$\frac{E((X-μ_{X})(Y-μ_{Y}))}{\sigma_{X}\sigma_{Y}}$=${E(XY)-E(X)E(Y)}\over{\sqrt{E(X^{2})-E^{2}(X)}\sqrt{E(Y^{2})-E^{2}(Y)}},$ where E is the expectation operator, and cov is the covariance. $\mu_{X}=E(X)$,$\sigma_{X}^{2}=E(X^{2})-E^{2}(X),$ and similarly for the second variable, Y, and $cov(X,Y)=E(XY)-E(X)*E(Y)$.
+
<math>-1 \le \rho \le 1</math>.
**Sample correlation: replace the unknown expectations and standard deviations by sample mean and sample standard deviation: suppose ${X_{1},X_{2},…,X_{n}}$ and ${Y_{1},Y_{2},…,Y_{n}}$ are bivariate observations of the same process and $(\mu_{X}$,$\sigma_{X})$,$\mu_{Y},\sigma_{Y})$ are the mean and standard deviations for the X and Y measurements respectively. $\rho(x,y)=\frac{\sum x_{i} y_{i}-n\bar{x}\bar{y}}{(n-1)s_{x} s_{y}}$=$\frac{n \sum x_{i} y_{i}-\sum x_{i}\sum y_{i}} {{\sqrt{n\sum x_{i}^{2} -(\sum x_{i})^{2}}} {\sqrt{ n\sum y_{i}^{2}-y_{i})^{2}}}}$; $\rho(x,y)=\frac{\sum(x_{i}-\bar x)(y_{i}-\bar y)}{(n-1)s_{x} s_{y}}$ $=\frac{1}{n-1}$ $\sum$ $\frac{x_{i}-\bar x}{s_{x}}\frac{y_{i}-\bar y}{s_{y}}$, $\bar X$ and $\bar y$ are the sample mean for $X$ and $Y$, $s_{x}$ and $s_{y}$ are the sample standard deviation for $X$ and $Y$.  
 
  
====Hands-on Example====
+
The relationship is summarized by the means (<math>\mu_X, \mu_Y</math>), standard deviations (<math>\sigma_X, \sigma_Y</math>), and the correlation coefficient <math>\rho(X,Y)</math>.
Human weight and height (suppose we took only 6 of the over 25000 observations of human weight and height included in [[SOCR_Data_Dinov_020108_HeightsWeights| SOCR dataset]].
 
<center>
 
{| class="wikitable" style="text-align:center; width:95%" border="1"
 
|-
 
|Subject Index|| Height $(x_{i})$ in cm || Weight $(y_{i})$ in kg || $x_{i}-\bar x$ ||$y_{i}-\bar y$ || $(x_{i}-\bar x)^{2}$ || $(y_{i}-\bar y)^{2}$ ||$(x_{i}-\bar x)(y_{i}-\bar y)$
 
|-
 
|1||167||60|| 6|| 4.6|| 36|| 21.82|| 28.02
 
|-
 
|2|| 170|| 64|| 9|| 8.67 ||81|| 75.17|| 78.03
 
|-
 
|3|| 160|| 57|| -1|| 1.67|| 1|| 2.79|| -1.67
 
|-
 
|4|| 152|| 46|| -9|| -9.33|| 81|| 87.05 ||83.97
 
|-
 
|5|| 157|| 55|| -4|| -0.33|| 16|| 0.11|| 1.32
 
|-
 
|6|| 160|| 50|| -1|| -5.33|| 1|| 28.41|| 5.33
 
|-
 
|Total||966 ||332 ||0 ||0 ||216|| 215.33||195
 
|}
 
</center>
 
  
$\bar x\frac{966}{6}=161,\bar y=\frac{322}{6}= 55,s_{x}=\sqrt{\frac{216.5}{5}}=6.57, s_{y}=\sqrt{\frac {215.3}{5}}=6.56.$
+
Interpretation of <math>\rho</math>:
 +
* <math>\rho = 1</math>: Perfect positive linear correlation (all points lie exactly on an upward-sloping line).
 +
* <math>\rho = -1</math>: Perfect negative linear correlation (all points lie exactly on a downward-sloping line).
 +
* <math>\rho = 0</math>: No linear correlation (points form a random cloud; note: nonlinear relationships may still exist).
  
$\rho(x,y)=\frac{1}{n-1}$ $\sum$ $\frac{x_{i}-\bar x}{s_{x}}\frac{y_{1}-\bar y}{s_{y}}=0.904$
+
Mathematical Definition (Population):
 +
The population correlation is the covariance normalized by the product of the standard deviations:
 +
<math>\rho(X,Y) = \frac{\operatorname{cov}(X,Y)}{\sigma_{X}\sigma_{Y}} = \frac{E[(X-\mu_{X})(Y-\mu_{Y})]}{\sigma_{X}\sigma_{Y}}</math>.
  
====Slope inference====
+
Equivalently:
We can conduct inference based on the linear relationship between two quantitative variables by inference on the slope. The basic idea is that we conduct a linear regression of the dependent variable on the predictor suppose they have a linear relationship and we came up with the linear model of y=α+βx+ε, and β is referred to as the true slope of the linear relationship and α represents the intercept of the true linear relationship on y-axis and ε is the random variation. We have talked about the slope in the linear regression, which describes the change in dependent variable y concerned with change in x.
+
<math>\rho(X,Y) = \frac{E(XY)-E(X)E(Y)}{\sqrt{E(X^{2})-E^{2}(X)}\sqrt{E(Y^{2})-E^{2}(Y)}}</math>.
  
*Test of the significance of the slope β: (1) is there evidence of a real linear relationship which can be done by checking the fit of the residual plots and the initial scatterplots of y vs. x; (2) observations must be independent and the best evidence would be random sample; (3) the variation about the line must be constant, that is the variance of the residuals should be constant which can be checked by the plots of the residuals; (4) the response variable must have normal distribution centered on the line which can be checked with a histogram or normal probability plot.
+
==== Sample Correlation (Pearson’s <math>r</math>) ====
*Formula we use:$ t=\frac{b-\beta}{SE_{b}}$ , where b stands for the statistic value, $\beta$ is the parameter we are testing on, $SE_{b}$ is the measure of the variation. For the null hypothesis is the $\beta$=0 that is there is no relationship between y and x, so under the null hypothesis, we have the test statistic $t=\frac {b} {SE_{b}}$.
+
In practice, we estimate <math>\rho</math> using a sample of paired observations <math>\{(x_1, y_1), \dots, (x_n, y_n)\}</math>. The sample correlation replaces population moments with sample statistics:
  
====R Examples====
+
<math>r = \frac{1}{n-1} \sum_{i=1}^n \left( \frac{x_{i}-\bar{x}}{s_{x}} \right) \left( \frac{y_{i}-\bar{y}}{s_{y}} \right)</math>.
=====Body Fat and Age=====
 
Consider a research conducted on see if body fat is associated with age. The data included 18 subjects with the percentage of body fat and the age of the subjects.
 
  
<center>
+
Computationally, this is often expressed as:
{| class="wikitable" style="text-align:center;" border="1"
+
<math>r = \frac{n \sum x_{i} y_{i}-\sum x_{i}\sum y_{i}} {\sqrt{n\sum x_{i}^{2} -(\sum x_{i})^{2}} \sqrt{ n\sum y_{i}^{2}-(\sum y_{i})^{2}}}</math>.
|-
 
|Age|| Percentage of Body Fat
 
|-
 
|23||9.5
 
|-
 
|23||27.9
 
|-
 
|27||7.8
 
|-
 
|27|| 17.8
 
|-
 
|39 ||31.4
 
|-
 
|41|| 25.9
 
|-
 
|45 ||27.4
 
|-
 
|49|| 25.2
 
|-
 
|50 ||31.1
 
|-
 
|53 ||34.7
 
|-
 
|53 ||42
 
|-
 
|54 ||29.1
 
|-
 
|56 ||32.5
 
|-
 
|57 ||30.3
 
|-
 
|58|| 33
 
|-
 
|58|| 33.8
 
|-
 
|60|| 41.1
 
|-
 
|61|| 34.5
 
|}
 
</center>
 
  
The hypothesis tested: $H_{0}:\beta=0$ vs.$H_{a}:\beta\ne0;$ a t-test would be the test we are going to use here given that the data drawn is a random sample from the population.  
+
==== Inference on Correlation ====
 +
To assess whether an observed correlation reflects a true association in the population, we test:
 +
<math>H_0: \rho = 0 \quad \text{vs.} \quad H_a: \rho \ne 0.</math>
  
In R
+
* Test statistic:
###
+
<math>t = \frac{r\sqrt{n-2}}{\sqrt{1-r^2}},</math>
###
+
which follows a Student’s <math>t</math>-distribution with <math>n - 2</math> degrees of freedom.
## first check the linearity of the relationship using a scatterplot
 
x <- c(23,23,27,27,39,41,45,49,50,53,53,54,56,57,58,58,60,61)
 
y <- c(9.5,27.9,7.8,17.8,31.4,25.9,27.4,25.2,31.1,34.7,42,29.1,32.5,30.3,33,33.8,41.1,34.5)
 
plot(x,y,main='Scatterplot',xlab='Age',ylab='% fat')
 
cor(x,y)
 
  
[1] 0.7920862
+
Comparing Two Independent Correlations (Fisher’s Z-Transformation):
 +
Because the sampling distribution of <math>r</math> is skewed when <math>\rho \ne 0,</math> we use Fisher’s transformation to compare correlations from two independent samples (<math>r_1</math> and <math>r_2</math>):
  
[[Image:SMHS SLR Fig 1.png|500px]]
+
<math>z' = \frac{1}{2} \ln \left( \frac{1+r}{1-r} \right)\equiv atanh(r),</math>
  
The scatterplot shows that there is a linear relationship between x and y, and there is strong positive association of $r=0.7920862$ which further confirms the eye-bow test from the scatterplot about the linear relationship of age and percentage of body fat.  
+
The <math>atanh()</math> function ((arc) ''inverse hyperbolic tangent'') solves
 +
the problem that the correlation coefficients (<math>r</math>) are not well-behaved
 +
enough for standard testing. The correlation coefficient <math>-1\leq r\leq 1</math>,
 +
and as <math>r</math> gets closer to these boundaries, its distribution becomes heavily skewed.
 +
Hence, the standard error of <math>r</math> depends on the value of <math>r</math> itself, which violates the assumptions of many statistical tests, e.g., the Z-test or t-test.
  
Then we fit a simple linear regression of y on x and draw the scatterplot along with the fitted line:
+
The ''atanh()'' function maps the correlation range <math>[-1, 1]</math> out to
 +
<math>(-\infty, \infty)</math>. The Fisher z-transformation above is defined in terms of
 +
''atanh()'' to linearize the raw correlation values away from the boundaries,
 +
normalize the skewed distribution of <math>r</math> into a Normal (Gaussian) distribution,
 +
and stabilize its variance, i.e., the variance of the transformed z-scores becomes
 +
approximately constant, <math>Var(z) \approx \frac{1}{n-3}.</math>
  
fit <- lm(y~x)
+
The transformed value <math>z'</math> is approximately normally distributed with variance <math>\frac{1}{n - 3}</math>.
 
plot(x,y,main='Scatterplot',xlab='Age',ylab='% fat')
 
 
abline(fit)
 
  
[[Image:SMHS SLR Fig 2.png|500px]]
+
To test <math>H_0: \rho_1 = \rho_2</math>, compute:
 +
<math>Z = \frac{z'_1 - z'_2}{\sqrt{\frac{1}{n_1-3} + \frac{1}{n_2-3}}}.</math>
  
summary(fit)
+
Under <math>H_0</math>, <math>Z \sim N(0,1).</math>
  
Call:
+
=== Simple Linear Regression (SLR) ===
lm(formula = y ~ x)
+
==== Model Theory ====
+
Simple linear regression models the expected value of a dependent variable <math>Y</math> as a linear function of an independent variable <math>X</math>:
Residuals:
 
Min      1Q  Median      3Q      Max
 
-10.2166  -3.3214  -0.8424  1.9466  12.0753
 
 
Coefficients:
 
Estimate Std. Error t value Pr(>|t|)
 
(Intercept)  3.2209    5.0762  0.635    0.535
 
x        0.5480    0.1056  5.191 8.93e-05 \***
 
  
plot(fit$\$ $resid,main='Residual Plot')
+
<math>Y = \alpha + \beta X + \epsilon</math>,
abline(y=0)
 
  
[[Image:SMHS SLR Fig3.png|500px]]
+
where:
 +
* <math>\alpha</math> is the intercept (value of <math>Y</math> when <math>X = 0</math>),
 +
* <math>\beta</math> is the slope (change in <math>Y</math> per one-unit increase in <math>X</math>),
 +
* <math>\epsilon</math> is the random error term, assumed to have mean zero.
  
qqnorm(fit$\$ $resid)  # check the normality of the residuals
+
==== Least Squares Estimation ====
 +
The "best-fit" line is obtained by the least squares method, which minimizes the sum of squared residuals:
  
[[Image:SMHS SLR Fig4.png|500px]]
+
<math>SSE = \sum_{i=1}^n (y_i - \hat{y}_i)^2 = \sum_{i=1}^n \big(y_i - (a + b x_i)\big)^2</math>.
  
From the residual plot and the QQ plot of residuals we can see that meet the constant variance and normality requirement with no heavy tails and the regression model is reasonable. From the summary of the regression model we have the t-test on the slope has the t value is 5.191 and the p-value is 8.93 e-05. We can reject the null hypothesis of no linear relationship and conclude that is significant linear relationship between age and percentage of body fat at 5% level of significance.  
+
The sample estimates are:
 +
<math>b = \frac{\sum(x_i - \bar{x})(y_i - \bar{y})}{\sum(x_i - \bar{x})^2} = r \frac{s_y}{s_x}</math>,
 +
<math>a = \bar{y} - b\bar{x}</math>.
  
The confidence interval for the parameter tested is $b±t^{*} SE_{b}$, where b is the slope of the least square regression line, $t^{*}$ is the upper $\frac {1-C} {2}$ critical value from the t distribution with degrees of freedom n-2 and $SE_{b}$ is the standard error of the slope.
+
Key Properties of the Least Squares Line:
 +
# The line always passes through the centroid (<math>\bar{x}, \bar{y}</math>).
 +
# The sum of the residuals is zero: <math>\sum (y_i - \hat{y}_i) = 0</math>.
 +
# The estimators <math>a</math> and <math>b</math> are unbiased under standard assumptions.
  
The standard error of the slope is 0.1056, so we have the 95% CI of the slope is $(0.5480-0.1056*2.12,0.5480+0.1056*2.12)$, that is $(0.324,0.772)$. So, we are 95% confident that the slope will fall in the range between 0.324 and 0.772.  
+
==== Assumptions of SLR ====
 +
For valid statistical inference (confidence intervals, hypothesis tests), the following assumptions should hold:
 +
* Linearity: The true relationship between <math>X</math> and <math>Y</math> is linear.
 +
* Independence: Observations are independent (e.g., no repeated measures).
 +
* Normality: The residuals are approximately normally distributed.
 +
* Homoscedasticity: The variance of residuals is constant across all values of <math>X</math>.
  
=====Baseball Example=====
+
Diagnostic plots (residuals vs. fitted, Q–Q plot) are used to assess these assumptions.
we are studying on a random sample (size 16) of baseball teams and the data show the team’s batting average and the total number of runs scored for the season.
 
  
<center>
+
==== Inference on the Slope ====
{| class="wikitable" style="text-align:center; width:35%" border="1"
+
We commonly test whether <math>X</math> is a significant predictor of <math>Y</math>:
|-
+
<math>H_0: \beta = 0 \quad \text{vs.} \quad H_a: \beta \ne 0</math>.
|Batting average|| Number of runs scored
 
|-
 
|0.294|| 968
 
|-
 
|0.278|| 938
 
|-
 
|0.278 ||925
 
|-
 
|0.27|| 887
 
|-
 
|0.274 ||825
 
|-
 
|0.271|| 810
 
|-
 
|0.263|| 807
 
|-
 
|0.257 ||798
 
|-
 
|0.267 ||793
 
|-
 
|0.265 || 792
 
|-
 
|0.254|| 764
 
|-
 
|0.246|| 740
 
|-
 
|0.266|| 738
 
|-
 
|0.262||31
 
|-
 
|.251 ||708
 
|}
 
</center>
 
 
 
In R:
 
x <- c(0.294,0.278,0.278,0.270,0.274,0.271,0.263,0.257,0.267,0.265,0.256,0.254,0.246,0.266,0.262,0.251)
 
y <- c(968,938,925,887,825,810,807,798,793,792,764,752,740,738,731,708)
 
cor(x,y)
 
[1] 0.8654923
 
 
 
The correlation between x and y is 0.8655 which is pretty strong positive correlation. So it would be reasonable to make the assumption of a linear regression model of number of runs scored and the average batting.
 
 
 
fit <- lm(y~x)
 
summary(fit)
 
Call:
 
lm(formula = y ~ x)
 
 
Residuals:
 
*in      1Q  Median      3Q    Max
 
-74.427 -26.596  1.899  38.156  57.062
 
 
Coefficients:
 
*Estimate Std. Error t value Pr(>|t|) 
 
 
 
(Intercept)  -706.2      234.9  -3.006  0.00943 **
 
x            5709.2      883.1  6.465 1.49e-05 ***
 
 
 
---
 
Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
 
Residual standard error: 40.98 on 14 degrees of freedom
 
 
Multiple R-squared: 0.7491, Adjusted R-squared: 0.7312
 
 
F-statistic: 41.79 on 1 and 14 DF,  p-value: 1.486e-05
 
 
plot(x,y,main='Scatterplot',xlab='Batting average',ylab='Number of runs')
 
 
abline(fit)
 
 
 
 
 
[[Image:SMHS_SLR_Fig5.png|500px]]
 
 
 
 
 
par(mfrow=c(1,2))
 
 
 
plot(fit$\$ $resid,main='Residual Plot')
 
 
abline(y=0)
 
 
qqnorm(fit$\$ $resid)
 
 
 
 
 
[[Image:SMHS SLR Fig6.png|500px]]
 
 
 
The estimated value of the slope is 5709.2, standard error 833.1, t value = 6.465, and the p-value is 1.49 e-05, so we reject the null hypothesis and conclude that there is significant linear relationship between the average batting and the number of runs. We have the 95% CI of the slope is $(5709.2-833.1*2.145,5709.2+833.1*2.145)$, that is $(3922.2,7496.2)$. So, we are 95% confident that the slope will fall in the range between 3922.2 and 7496.2.
 
  
You can also use [http://www.socr.ucla.edu/htmls/ana/SimpleRegression_Analysis.html SOCR SLR Analysis Simple Regression] to copy-paste the data in the applet, estimate regression slope and intercept and compute the corresponding statistics and p-values.
+
* Standard error of the slope:
 +
<math>SE_b = \frac{s_{y|x}}{\sqrt{\sum (x_i - \bar{x})^2}}</math>,
 +
where <math>s_{y|x}</math> is the residual standard error.
  
Simple Linear Regression Results:
+
* Test statistic:
 +
<math>t = \frac{b}{SE_b}</math>, with <math>n - 2</math> degrees of freedom.
  
Mean of C1 = 46.33333
+
* Confidence interval for <math>\beta</math>:
Mean of C2 = 28.61111
+
<math>b \pm t^* \cdot SE_b</math>,
Regression Line:
+
where <math>t^*</math> is the critical value from the <math>t</math>-distribution.
C2 = 3.22086 + 0.5479910213243551  C1
 
Correlation(C1, C2) = .79209
 
R-Square = .62740
 
Intercept:
 
Parameter Estimate: 3.22086
 
Standard Error:    5.07616
 
T-Statistics:        .63451
 
P-Value:            .53472
 
Slope:
 
Parameter Estimate: .54799
 
Standard Error:    .10558
 
T-Statistics:        5.19053
 
P-Value:            .00009
 
  
[[Image:SMHS SLR Fig7.png|600px]]
+
=== Case Studies and R Implementation ===
 +
==== Example 1: Body Fat and Age ====
 +
Scenario: A study of 18 adults examining the relationship between age (<math>X</math>) and percent body fat (<math>Y</math>).
  
[[Image:SMHS SLR Fig8.png|600px]]
+
Data:
 
+
{| class="wikitable" style="text-align:center;"
[[Image:SMHS SLR Fig9.png|600px]]
 
 
 
 
 
====Statistical inference on correlation coefficient====
 
Test on $H_{O}:r=\rho$ vs. $H_{a}:r≠\rho$ is the correlation between X and Y. $t_o = \frac{r-\rho}{\sqrt{\frac{1-r^2}{N-2}}}$ with [[AP_Statistics_Curriculum_2007_StudentsT|T distribution]] with $df=N-2$.
 
 
 
Comparing two correlation coefficients: this Fisher’s transformation provides a mechanism to test for comparing two correlation coefficients using Normal distribution. Suppose we have 2 independent paired samples
 
${(X_{i},Y_{i})}_{i=1}^{n_{1}}$ and ${(U_{j},V_{j} )}_{j=1}^{n_{2}}$ and the $r_{1}=corr(X,Y)$ and $r_{2}=corr(U,V)$ and we are testing $H_{0}: r_{1}=r_{2}$  vs. $H_{a}:r_{1}≠r_{2}$ The Fisher’s transformation for the 2 correlations is defined by $\hat{r}=\frac{1}{2}log_{e}\|\frac{1+r}{1-r}\|$, transforming the two correlation coefficients separately yields $r_{11}=\frac{1}{2}log_{e}\|\frac {1+r_{1}}{1-r_{1}}\|$ and $r_{22}=\frac{1}{2}log_{e}\|\frac{1+r_{22}}{1-r_{22}}\|$. $Z_{0}$ $ =\frac {r_{11}-r_{22}} {\sqrt{\frac{1}{n_{1-3}}-\frac{1}{n_{2-3}}}}$
 
 
 
Note that the hypotheses for the single and double sample inference are $H_{0}:r=0$ vs. $H_{a}:r≠0$ and $H_{0}:r_{1}-r_{2}=0$ vs. $H_{a}:r_{1}-r_{2}≠0$ respectively. And an estimate of the standard deviation of the (Fisher transfored!) correlation is  $SD\hat{(r)}=\sqrt{\frac{1}{n-3}}$, thus $r\sim $ $N\bigg (0,\sqrt\frac{1} {n-3}\bigg )$.
 
 
 
=====Brain Volume Example=====
 
The brain volumes (responses) and age (predictors) for 2 cohorts of subjects (Group 1 and Group 2).
 
 
 
<center>
 
{|class="wikitable" style="text-align:center; width:90%" border="1"
 
|-
 
|Group1 ||Age1 ||Volume1||Group2||Age2 ||Volume2
 
|-
 
|1|| 58|| 0.269609 ||2|| 59 ||0.27905
 
|-
 
|1|| 55|| 0.277243 ||2|| 50 ||0.262916
 
|-
 
|1|| 61|| 0.236264|| 2|| 58|| 0.290697
 
|-
 
|1||  70|| 0.218015|| 2|| 58|| 0.269361
 
 
|-
 
|-
|1|| 38|| 0.287205|| 2|| 61|| 0.268247
+
! Age !! % Fat !! Age !! % Fat
 
|-
 
|-
|1|| 41 ||0.307387 ||2|| 57|| 0.294204
+
| 23 || 9.5 || 53 || 34.7
 
|-
 
|-
|1|| 40|| 0.271063|| 2|| 50|| 0.292699
+
| 23 || 27.9 || 53 || 42.0
 
|-
 
|-
|1|| 25 ||0.307688|| 2|| 38|| 0.273969
+
| 27 || 7.8 || 54 || 29.1
 
|-
 
|-
|1|| 70|| 0.237811|| 2|| 57|| 0.29049
+
| 27 || 17.8 || 56 || 32.5
 
|-
 
|-
|1|| 49|| 0.293371|| 2|| 64|| 0.286564
+
| 39 || 31.4 || 57 || 30.3
 
|-
 
|-
|1|| 56|| 0.252592|| 2|| 71|| 0.257386
+
| 41 || 25.9 || 58 || 33.0
 
|-
 
|-
|1|| 56|| 0.251349|| 2|| 34|| 0.314958
+
| 45 || 27.4 || 58 || 33.8
 
|-
 
|-
|1 ||40|| 0.29616 ||2|| 53|| 0.298022
+
| 49 || 25.2 || 60 || 41.1
 
|-
 
|-
|1|| 50|| 0.249596|| 2|| 53|| 0.269229
+
| 50 || 31.1 || 61 || 34.5
|-
 
|1|| 55|| 0.282721|| 2|| 25|| 0.270634
 
|-
 
|1 ||69|| 0.247565|| 2|| 61|| 0.266905
 
 
|}
 
|}
</center>
 
  
We have two independent groups and $Y=volume1$ (response) and $X=age1$ (predictor); $V=volume2$ and $U=age2$, where $n_{1}=27$, $n_{2}=27$. We compute the 2 correlation coefficients: $r_{1}=corr(X,Y)=-0.75338$ and $r_{2}=corr(U,V)=-0.49491.$ Using the Fisher’s transformation we obtain: $r_{11}=\frac{1}{2}log_{e}\|\frac {1+r_{1}}{1-r_{1}}\| = -0.980749 $ and $r_{22}=\frac{1}{2}log_{e}\|\frac{1+r_{2}}{1-r_{2}}\| = -0.5425423,$ $Z_{0}$ $ =\frac {r_{11}-r_{22}} {\sqrt {\frac{1}{n_{1}-3}-\frac{1}{n_{2}-3}}} = 11.517993.$ The corresponding 1-sided p-value =$0.064508$, double-sided p-value =$0.129016$.
+
R Analysis:
 +
<pre>
 +
# Data entry
 +
age <- c(23,23,27,27,39,41,45,49,50,53,53,54,56,57,58,58,60,61)
 +
fat <- c(9.5,27.9,7.8,17.8,31.4,25.9,27.4,25.2,31.1,34.7,42,29.1,32.5,30.3,33,33.8,41.1,34.5)
  
===Simple linear regression (SLR)===
+
# Correlation
Modeling of the linear relations between two variables using regression analysis.
+
cor(age, fat) # r ≈ 0.792
$Y$ is an observed variable and $X$ is specified by the researcher, e.g. $Y$ is hair growth after $X$ months, for individuals at certain does level of hair growth cream; $X$ and $Y$ are both observed variables.
 
*Estimating the best linear fit: simple linear regression model $Y=a+bX+\varepsilon $ can be estimated using least square, which fits a line minimizing the sums of $ \varepsilon_{l}=\hat y_{l} -y_{i}, \sum_{i=1}^{N} \hat\varepsilon_l^{2}=\sum_{i=1}^{N}(\hat y_{l}-y_{i} )^{2}$, where $ \hat y_{l} = a+bx_{i}$ are observed and predicted values of $Y$ for $x_{i}$.
 
  
*Solving for the minimization problem:
+
# Fit regression model
: $\hat{b} = \frac {\sum_{i=1}^{N}  (x_{i} - \bar{x})(y_{i} - \bar{y}) }  {\sum_{i=1}^{N} (x_{i} - \bar{x}) ^2} = \frac {\sum_{i=1}^{N} {(x_{i}y_{i})} - N \bar{x} \bar{y}}  {\sum_{i=1}^{N} (x_{i})^2 - N \bar{x}^2}  = \rho_{X,Y} \frac {s_y}{s_x},$
+
fit <- lm(fat ~ age)
: where [[AP_Statistics_Curriculum_2007_GLM_Corr | $\rho_{X,Y}$ is the correlation coefficient]].
+
summary(fit)
  
: $\hat a=\bar y-\hat b\bar x$.
+
# Diagnostic plots
 +
par(mfrow = c(2,2))
 +
plot(fit)
 +
</pre>
  
*Properties of the least square line: (1) the line goes through the point of ($\bar{X},\bar{Y}$); (2) the sum of the residuals is equal to zero; (3) the estimates are unbiased, that is their expected values are equal to the real slope and intercept values.
+
Interpretation:
 +
* The sample correlation is <math>r \approx 0.79</math>, indicating a strong positive linear relationship.
 +
* The estimated regression equation is:
 +
  <math>\widehat{\text{Body Fat}} = -6.38 + 0.55 \times \text{Age}</math>.
 +
* The slope is statistically significant (<math>p < 0.001</math>), so age is a useful predictor of body fat.
 +
* The 95% confidence interval for the slope is approximately (0.32, 0.77).
  
*Regression coefficients inference: when the error terms are normally distributed, then the estimate of the slope coefficient has a normal distribution ith mean equal to $b$ and standard error $SE(\hat b)$ = $s_{\hat b}=\sqrt\frac{1}{N-2}\frac{\sum_{i=1}^{N}\hat\varepsilon_{i}^{2}} {\sum_{i=1}^{N}(x_{i}-\bar x)^{2}}$ To carry out the confidence interval estimating of the slope and intercept of linear model. Given that b follows $\hat b$ follows a T distribution with $N-2$ degrees of freedom, we can calculate the confidence interval for b:$[\hat b-s_{\hat b}t(\frac{\alpha}{2},N-2),\hat b-s_{\hat b}t(\frac{\alpha}{2},N-2)]$ The corresponding test for the regression slope coefficient b is analogously computed $(H_{0}:b=b_{0}$  vs.$H_{a}:b≠b_{0})$ and the test statistic is $t_{0}=\frac{\hat b-b_{0}}s_{\hat b}\sim~T_{df}=N-2$
+
==== Example 2: Baseball Data (SLR and Prediction) ====
 +
Scenario: Predicting the number of runs scored by a baseball team based on its batting average.
  
====Earthquake Data Example====
+
R Code:
* Us the [[SOCR_Data_Dinov_021708_Earthquakes |SOCR Data Earthquakes]] to fit the best linear fit between the longitude and the latitude of the California earthquake since 1900. The SOCR Geomap of these earthquake
+
<pre>
*[http://socr.ucla.edu/docs/resources/SOCR_Data/SOCR_Earthquake5Data_GoogleMap.html SOCR Google Map Earthquakes] shows using the SLR fit to the earthquake data.
+
batting <- c(0.294,0.278,0.278,0.270,0.274,0.271,0.263,0.257,
 +
            0.267,0.265,0.256,0.254,0.246,0.266,0.262,0.251)
 +
runs <- c(968,938,925,887,825,810,807,798,793,792,764,752,740,738,731,708)
  
===Applications===
+
cor(batting, runs)  # r ≈ 0.866
* [http://wiki.stat.ucla.edu/socr/index.php/SOCR_EduMaterials_AnalysisActivities_SLR This article ] presents the SLR analysis activity in SOCR analysis. It starts with a general introduction to SLR model and then illustrate this method in details with various examples. The article help read results of SLR, make interpretation of the slope and intercept and observe and interpret various data and resulting plots including scatter plots, normal QQ plot and different diagnostic plots such as residual on fit plot.
+
fit_bb <- lm(runs ~ batting)
 +
summary(fit_bb)
 +
</pre>
  
* [http://europepmc.org/abstract/MED/3840866  This article ] titled Simple Linear Regression In Medical Research discussed the method of fitting a straight line to data by linear regression and focuses on examples from 36 original articles published in 1978 and 1979. It concluded that investigators need to become better acquainted with residual plots, which give insight into how well the fitted lie models the data, and with confidence bounds for regression lines. Statistical computing package enable investigators to use these techniques easily.  
+
Results:
 +
* Regression equation:
 +
  <math>\widehat{\text{Runs}} = -706.2 + 5709.2 \times \text{Batting Avg}</math>.
 +
* <math>R^2 = 0.749</math>, so about 75% of the variability in runs is explained by batting average.
 +
* Prediction for a team with batting average 0.280: 
 +
  <math>-706.2 + 5709.2 \times 0.280 \approx 892</math> runs.
  
* [http://ww2.coastal.edu/kingw/statistics/R-tutorials/simplelinear.html This article ]) presents the r tutorial for simple linear regression. It starts with the fundamental check on the data and comment on the existing patterns found and then fit the linear regression model with the height and weight. It also modified the regression with the Lowess smoothing and talked about the local weighted scatter plot smooth. This article is a comprehensive study on the SLR and correlation in R.
+
==== Example 3: Comparing Correlations Across Groups ====
 +
Scenario: Does the correlation between age and brain volume differ between two clinical groups?
  
* [http://www.tandfonline.com/doi/abs/10.1080/00401706.1975.10489279 This article]titled The Probability Plot Correlation Coefficient Test For Normality introduced the normal probability plot correlation coefficient as a test statistic in complete samples for the composite hypothesis of normality. The proposed test statistic is conceptually simple, and is readily extendable to testing non-normal distribution hypotheses. The paper included an empirical power study which shows that the normal probability plot correlation coefficient compared favorably with seven other normal test statistics.
+
* Group 1: <math>n_1 = 27,\ r_1 = -0.753</math> 
 +
* Group 2: <math>n_2 = 27,\ r_2 = -0.495</math>
  
===Software===
+
Fisher’s Z-transformation:
* [http://socr.ucla.edu/htmls/SOCR_Distributions.html SOCR Distributions]
+
<math>z'_1 = \frac{1}{2} \ln\left(\frac{1 - 0.753}{1 + 0.753}\right) \approx -0.981</math>  
* [http://socr.ucla.edu/htmls/exp/Bivariate_Normal_Experiment.html Bivariate Normal Experiment]
+
<math>z'_2 = \frac{1}{2} \ln\left(\frac{1 - 0.495}{1 + 0.495}\right) \approx -0.543</math>
* [http://socr.ucla.edu/Applets.dir/Normal_T_Chi2_F_Tables.htm Normal Chi-Squared F Tables]
 
  
===Problems===
+
Test statistic:
Example 1: Simple linear correlation and regression in R:
+
<math>Z = \frac{-0.981 + 0.543}{\sqrt{\frac{1}{24} + \frac{1}{24}}} = \frac{-0.438}{\sqrt{0.0833}} \approx -1.52</math>
> library(MASS)
 
> data(cats)
 
> str(cats)
 
  
'data.frame': 144 obs. of  3 variables:
+
Two-sided <math>p</math>-value ≈ 0.129.
$ Sex: Factor w/ 2 levels "F","M": 1 1 1 1 1 1 1 1 1 1 ...
 
$ Bwt: num  2 2 2 2.1 2.1 2.1 2.1 2.1 2.1 2.1 ...
 
$ Hwt: num  7 7.4 9.5 7.2 7.3 7.6 8.1 8.2 8.3 8.5 ...
 
  
> summary(cats)
+
Conclusion: There is no statistically significant difference between the two correlations (<math>\alpha = 0.05</math>).
  
Sex        Bwt            Hwt     
+
=== Review Questions ===
F:47  Min.  :2.000  Min.  : 6.30  
+
1. Correlation and Causation  
M:97  1st Qu.:2.300  1st Qu.: 8.95  
+
A positive correlation between variables <math>X</math> and <math>Y</math> implies that increasing <math>X</math> causes <math>Y</math> to increase.   
        Median :2.700  Median :10.10  
+
* (a) Always true  
        Mean  :2.724  Mean  :10.63  
+
* (b) Sometimes true  
        3rd Qu.:3.025  3rd Qu.:12.12 
+
* (c) Never true  
        Max.  :3.900  Max.  :20.50  
 
[[Image:SMHS SLR Fig10.png|300]]
 
  
A positive correlation between two variables X and Y means that if X increases, this will cause the value of Y to increase.
+
Answer: (c) Never true. Correlation measures association, not causation. Confounding, reverse causality, or coincidence may explain the observed relationship.
*(a) This is always true.
 
*(b) This is sometimes true.
 
*(c) This is never true.
 
  
The correlation between working out and body fat was found to be exactly -1.0. Which of the following would not be true about the corresponding scatterplot?
+
2. Visualizing Correlation 
*(a) The slope of the best line of fit should be -1.0.
+
If the correlation between working out and body fat is exactly <math>-1.0</math>, which statement is FALSE?
*(b) All the points would lie along a perfect straight line, with no deviation at all.
+
* (a) Points lie on a perfect straight line.
*(c) The best fitting line would have a downhill (negative) slope.
+
* (b) 100% of the variance is explained.
*(d) 100% of the variance in body fat can be predicted from workout.
+
* (c) The slope of the best-fit line is <math>-1.0</math>.
 +
* (d) The best-fit line has a negative slope.
  
Suppose that the correlation between working out and body fat was found to be exactly -1.0. Which of the following would NOT be true, about the corresponding scatterplot?
+
Answer: (c). While <math>r = -1</math> implies a perfect negative linear relationship, the numerical value of the slope depends on the scales of <math>X</math> and <math>Y</math>. The slope is not necessarily <math>-1</math>.
*(a) All points would lie along a straight line, with no deviation at all.
 
*(b) 100% of the variance in body fat can be predicted from the workout.
 
*(c) The slope of the linear model is -1.0.
 
*(d) The best fitting line would have a negative slope.
 
  
If the correlation coefficient is 0.80, then:
+
3. Least Squares Principle 
*(a) The explanatory variable is usually less than the response variable.
+
Which statement best describes the principle of "least squares"? 
*(b) The explanatory variable is usually more than the response variable.
+
* (a) Minimizes the sum of residuals.
*(c) None of the statements are correct.
+
* (b) Minimizes the sum of squared residuals.
*(d) Below-average values of the explanatory variable are more often associated with below-average values of the response variable.
+
* (c) Minimizes the distance between actual and predicted values.
*(e) Below-average values of the explanatory variable are more often associated with above-average values of the response variable.
 
  
Two different researchers wanted to study the relationship between math anxiety and taking exams. Researcher A measured anxiety with a scale that had a minimum score of 0 and a maximum score of 20, and a final exam that had a minimum score of 0 and a maximum score of 50. He tested 120 students. Researcher B measured anxiety with a scale that had a minimum of 0 and a maximum of 30, and a final exam that had a minimum score of 0 and a maximum score of 35. He tested 60 students. Researcher A found that the coefficient of correlation between a student's math anxiety and his or her score on the final was -0.60. Researcher B found the correlation between a student's math anxiety and his or her score on the final was -0.30.
+
Answer: (b). Least squares minimizes <math>\sum (y_i - \hat{y}_i)^2</math>.
*(a) The coefficient of correlation for researcher A is twice as strong as the coefficient of correlation for researcher B.
 
*(b) Based on the study by researcher A one can conclude that high math anxiety is the reason that a lot of the students do not do well in math.
 
*(c) Given that coefficient of correlation shows the association between standardized scores, one can conclude that for researcher A a greater precentage of the students who have above average anxiety are likely to have below average score on the final.
 
*(d) Given that the minimum and the maximum values for math and anxiety are so different for the two researchers one cannot compare the coefficient of correlation found by these two researchers.
 
  
In the early 1900's when Francis Galton and Karl Pearson measured 1078 pairs of fathers and their grown-up sons, they calculated that the mean height for fathers was 68 inches with deviation of 3 inches. For their sons, the mean height was 69 inches with deviation of 3 inches. (The actual deviations a bit smaller, but we will work with these values to keep the calculations simple.) The correlation coefficient was 0.50. Use the information to calculate the slope of the linear model that predicts the height of the son from the height of the fathers.
+
4. Prediction and Residuals 
*(a) 35.00
+
Given the model: <math>\text{Fat} = 6.83 + 0.97 \times \text{Protein}</math>.
*(b) 0.50
+
A burger has 20g protein and actually contains 20g fat.
*(c) The slope cannot be determined without the actual data
+
* Predicted fat = <math>6.83 + 0.97 \times 20 = 26.23</math>g 
*(d) 3/3 = 1.00
+
* Residual = <math>20 - 26.23 = -6.23</math>g 
  
Suppose that wildlife researchers monitor the local alligator population by taking aerial photographs on a regular schedule. They determine that the best fitting linear model to predict weight in pounds from the length of the gators inches is:
+
Interpretation: The model overestimates fat content by 6.23g for this burger.
Weight = -393 + 5.9*Length,with r2 = 0.836.
+
Which of the following statements is true?
 
*(a) A gator that is about 10 inches above average in length is about 59 pounds above the average weight of these gators.
 
*(b) The correlation between a gator's length and weight is 0.836.
 
*(c) The correlation between a gator's height and weight cannot be determined without the actual data.
 
*(d) The correlation between a gator's height and weight is about -0.914.
 
  
Which of the following is NOT a property of the LSR Line?
+
===References===
*(a) The sum of the distances between each point and the LSR Line is minimized.
 
*(b) The average x value and the average y value lies on the LSR Line
 
*(c) The sum of squared residuals is minimized
 
*(d) The sum of the residuals = 0
 
 
 
Suppose that the linear model that predicts fat content in grams from the protein of selected items from Burger Queen menu is: Fat = 6.83 + 0.97*Protein. We learn that there are actually 20 grams of fat in the Chucking burger that has 20 grams of protein. Which of the following statements is true?
 
*(a) The linear model underestimates the actual fat content and produces a residual of -6.23
 
*(b) The linear model overestimates the fat content and produces a residual of -6.23
 
*(c) The linear model underestimates the fat content and produces a residual of -6.23
 
*(d) The linear model overestimates the fat content and produces a residual of 6.2
 
 
 
Which statement describes the principle of "least squares" that we use in determining the best-fit line?
 
*(a) The best-fit line minimizes the distances between the observed values and the predicted values.
 
*(b) The best-fit line minimizes the sum of the squared residuals.
 
*(c) The best-fit line minimizes the sum of the residuals.
 
*(d) The best-fit line minimizes the sum of the distances between the actual values and the predicted values.
 
  
The scores of midterm and final exams for a random sample of Stats 10 students can be summarized as follows:
+
* [https://sda.statisticalcomputing.org/learning SDA App, see the Learning Modules]
Mean of midterm score = 36.92; SD of midterm score = 37.79 Mean of final score = 24.71; SD of final score= 25.21 r= 0.978
+
* [[Probability_and_statistics_EBook#Chapter_X:_Correlation_and_Regression | SOCR Probability and Statistics EBook, Correlation and Regression Chapter]]
Choose one answer.
+
* Altman DG. (1991). *Practical Statistics for Medical Research*.
*(a) 23.44
+
* Dunn, G. (1989). *Design and Analysis of Reliability Studies*.
*(b) 0.62
 
*(c) 25.21
 
*(d) 35
 
 
 
Which of the following is NOT a property of the Least Squares Regression Line?
 
*(a) The sum of the distances between each point and the LSR Line is minimized.
 
*(b) The sum of squared residuals is minimized
 
*(c) The average x value and the average y value lie on the LSR Line
 
*(d) The sum of the residuals = 0
 
 
 
Tom and Sue wanted to estimate the average self-esteem score. The true population average for self esteem score is 20. Tom estimates that average by taking a sample of size n and then constructing a confidence interval. What of the following is true?
 
I. The resulting interval will contain 20 II. The 95 percent confidence interval for n = 100 will generally be more narrow than the 95 percent confidence interval for n = 50. III. For n = 100, the 95 percent confidence interval will be wider than the 90 percent confidence interval.
 
*(a) II only
 
*(b) III only
 
*(c) I only
 
*(d) II and III
 
 
 
A simple random sample of 1000 persons is taken to estimate the percentage of Democrats in a large population. It turns out that 543 of the people in the sample are Democrats. Is the following statement true or false? Explain (51%, 57.5%) is approximately a 95% confidence interval for the sample percentage of democrats.
 
*(a) False, that is the approximate confidence interval for p. There is no confidence interval for the sample proportion.
 
*(b) True, we did the computations and those are approximately the numbers for the confidence interval for p.
 
*(c) True, that is the confidence interval for the sample mean.
 
*(d) False, the confidence interval for the sample proportion should be smaller than that.
 
 
 
Use the linear model to predict the height of a son whose father's height is 6 feet.
 
*(a) The son's height = 35 + 0.5(6) inches
 
*(b) The son's height = 35 + 0.5(72) inches
 
*(c) The "Regression Effect" states that the son will be a bit taller than his father
 
*(d) Cannot be determined without the data
 
 
 
A statistician wants to predict Z from Y. He finds that r-squared is 5%.Which one of the following conclusions is correct?
 
*(a) The coefficient of correlation between Y and Z is 0.05
 
*(b) Y explains 5% of the variance in Z
 
*(c) Y is a good predictor of Z
 
*(d) Z is a good predictor of Y
 
 
 
===References===
 
*[Probability_and_statistics_EBook#Chapter_X:_Correlation_and_Regression  SOCR COrrelation and Regression Chapter]
 
  
  
 
<hr>
 
<hr>
* SOCR Home page: http://www.socr.umich.edu
+
* SOCR Home page: https://socr.umich.edu
  
{{translate|pageName=http://wiki.socr.umich.edu/index.php?title=SMHS_SLR}}
+
{{translate|pageName=https://wiki.socr.umich.edu/index.php?title=SMHS_SLR}}

Latest revision as of 21:29, 21 February 2026

Scientific Methods for Health Sciences - Correlation and Simple Linear Regression (SLR)

Overview

In scientific research, we often analyze the relationship between two or more variables to understand underlying processes. While univariate analysis describes a single variable, bivariate analysis explores the association between two variables—typically an independent variable (\(X\)) and a dependent variable (\(Y\)).

This module focuses on two fundamental techniques:

  • Correlation: Quantifies the strength and direction of the linear association between two variables.
  • Simple Linear Regression (SLR): Models the relationship mathematically, allowing us to predict \(Y\) based on \(X\) by fitting a straight line to the data.

Common applications include studying the association between final exam scores and class participation, or physiological traits such as body weight and lung capacity.

Correlation

Theory and Definition

The correlation coefficient (denoted \(\rho\) for the population and \(r\) for the sample) measures the strength and direction of the linear relationship between two continuous variables. It is bounded by\[-1 \le \rho \le 1\].

The relationship is summarized by the means (\(\mu_X, \mu_Y\)), standard deviations (\(\sigma_X, \sigma_Y\)), and the correlation coefficient \(\rho(X,Y)\).

Interpretation of \(\rho\):

  • \(\rho = 1\): Perfect positive linear correlation (all points lie exactly on an upward-sloping line).
  • \(\rho = -1\): Perfect negative linear correlation (all points lie exactly on a downward-sloping line).
  • \(\rho = 0\): No linear correlation (points form a random cloud; note: nonlinear relationships may still exist).

Mathematical Definition (Population): The population correlation is the covariance normalized by the product of the standard deviations\[\rho(X,Y) = \frac{\operatorname{cov}(X,Y)}{\sigma_{X}\sigma_{Y}} = \frac{E[(X-\mu_{X})(Y-\mu_{Y})]}{\sigma_{X}\sigma_{Y}}\].

Equivalently\[\rho(X,Y) = \frac{E(XY)-E(X)E(Y)}{\sqrt{E(X^{2})-E^{2}(X)}\sqrt{E(Y^{2})-E^{2}(Y)}}\].

Sample Correlation (Pearson’s \(r\))

In practice, we estimate \(\rho\) using a sample of paired observations \(\{(x_1, y_1), \dots, (x_n, y_n)\}\). The sample correlation replaces population moments with sample statistics\[r = \frac{1}{n-1} \sum_{i=1}^n \left( \frac{x_{i}-\bar{x}}{s_{x}} \right) \left( \frac{y_{i}-\bar{y}}{s_{y}} \right)\].

Computationally, this is often expressed as\[r = \frac{n \sum x_{i} y_{i}-\sum x_{i}\sum y_{i}} {\sqrt{n\sum x_{i}^{2} -(\sum x_{i})^{2}} \sqrt{ n\sum y_{i}^{2}-(\sum y_{i})^{2}}}\].

Inference on Correlation

To assess whether an observed correlation reflects a true association in the population, we test\[H_0: \rho = 0 \quad \text{vs.} \quad H_a: \rho \ne 0.\]

  • Test statistic\[t = \frac{r\sqrt{n-2}}{\sqrt{1-r^2}},\]

which follows a Student’s \(t\)-distribution with \(n - 2\) degrees of freedom.

Comparing Two Independent Correlations (Fisher’s Z-Transformation): Because the sampling distribution of \(r\) is skewed when \(\rho \ne 0,\) we use Fisher’s transformation to compare correlations from two independent samples (\(r_1\) and \(r_2\))\[z' = \frac{1}{2} \ln \left( \frac{1+r}{1-r} \right)\equiv atanh(r),\]

The \(atanh()\) function ((arc) inverse hyperbolic tangent) solves the problem that the correlation coefficients (\(r\)) are not well-behaved enough for standard testing. The correlation coefficient \(-1\leq r\leq 1\), and as \(r\) gets closer to these boundaries, its distribution becomes heavily skewed. Hence, the standard error of \(r\) depends on the value of \(r\) itself, which violates the assumptions of many statistical tests, e.g., the Z-test or t-test.

The atanh() function maps the correlation range \([-1, 1]\) out to \((-\infty, \infty)\). The Fisher z-transformation above is defined in terms of atanh() to linearize the raw correlation values away from the boundaries, normalize the skewed distribution of \(r\) into a Normal (Gaussian) distribution, and stabilize its variance, i.e., the variance of the transformed z-scores becomes approximately constant, \(Var(z) \approx \frac{1}{n-3}.\)

The transformed value \(z'\) is approximately normally distributed with variance \(\frac{1}{n - 3}\).

To test \(H_0: \rho_1 = \rho_2\), compute\[Z = \frac{z'_1 - z'_2}{\sqrt{\frac{1}{n_1-3} + \frac{1}{n_2-3}}}.\]

Under \(H_0\), \(Z \sim N(0,1).\)

Simple Linear Regression (SLR)

Model Theory

Simple linear regression models the expected value of a dependent variable \(Y\) as a linear function of an independent variable \(X\)\[Y = \alpha + \beta X + \epsilon\],

where:

  • \(\alpha\) is the intercept (value of \(Y\) when \(X = 0\)),
  • \(\beta\) is the slope (change in \(Y\) per one-unit increase in \(X\)),
  • \(\epsilon\) is the random error term, assumed to have mean zero.

Least Squares Estimation

The "best-fit" line is obtained by the least squares method, which minimizes the sum of squared residuals\[SSE = \sum_{i=1}^n (y_i - \hat{y}_i)^2 = \sum_{i=1}^n \big(y_i - (a + b x_i)\big)^2\].

The sample estimates are\[b = \frac{\sum(x_i - \bar{x})(y_i - \bar{y})}{\sum(x_i - \bar{x})^2} = r \frac{s_y}{s_x}\], \(a = \bar{y} - b\bar{x}\).

Key Properties of the Least Squares Line:

  1. The line always passes through the centroid (\(\bar{x}, \bar{y}\)).
  2. The sum of the residuals is zero\[\sum (y_i - \hat{y}_i) = 0\].
  3. The estimators \(a\) and \(b\) are unbiased under standard assumptions.

Assumptions of SLR

For valid statistical inference (confidence intervals, hypothesis tests), the following assumptions should hold:

  • Linearity: The true relationship between \(X\) and \(Y\) is linear.
  • Independence: Observations are independent (e.g., no repeated measures).
  • Normality: The residuals are approximately normally distributed.
  • Homoscedasticity: The variance of residuals is constant across all values of \(X\).

Diagnostic plots (residuals vs. fitted, Q–Q plot) are used to assess these assumptions.

Inference on the Slope

We commonly test whether \(X\) is a significant predictor of \(Y\)\[H_0: \beta = 0 \quad \text{vs.} \quad H_a: \beta \ne 0\].

  • Standard error of the slope\[SE_b = \frac{s_{y|x}}{\sqrt{\sum (x_i - \bar{x})^2}}\],

where \(s_{y|x}\) is the residual standard error.

  • Test statistic\[t = \frac{b}{SE_b}\], with \(n - 2\) degrees of freedom.
  • Confidence interval for \(\beta\)\[b \pm t^* \cdot SE_b\],

where \(t^*\) is the critical value from the \(t\)-distribution.

Case Studies and R Implementation

Example 1: Body Fat and Age

Scenario: A study of 18 adults examining the relationship between age (\(X\)) and percent body fat (\(Y\)).

Data:

Age % Fat Age % Fat
23 9.5 53 34.7
23 27.9 53 42.0
27 7.8 54 29.1
27 17.8 56 32.5
39 31.4 57 30.3
41 25.9 58 33.0
45 27.4 58 33.8
49 25.2 60 41.1
50 31.1 61 34.5

R Analysis:

# Data entry
age <- c(23,23,27,27,39,41,45,49,50,53,53,54,56,57,58,58,60,61)
fat <- c(9.5,27.9,7.8,17.8,31.4,25.9,27.4,25.2,31.1,34.7,42,29.1,32.5,30.3,33,33.8,41.1,34.5)

# Correlation
cor(age, fat)  # r ≈ 0.792

# Fit regression model
fit <- lm(fat ~ age)
summary(fit)

# Diagnostic plots
par(mfrow = c(2,2))
plot(fit)

Interpretation:

  • The sample correlation is \(r \approx 0.79\), indicating a strong positive linear relationship.
  • The estimated regression equation is\[\widehat{\text{Body Fat}} = -6.38 + 0.55 \times \text{Age}\].
  • The slope is statistically significant (\(p < 0.001\)), so age is a useful predictor of body fat.
  • The 95% confidence interval for the slope is approximately (0.32, 0.77).

Example 2: Baseball Data (SLR and Prediction)

Scenario: Predicting the number of runs scored by a baseball team based on its batting average.

R Code:

batting <- c(0.294,0.278,0.278,0.270,0.274,0.271,0.263,0.257,
             0.267,0.265,0.256,0.254,0.246,0.266,0.262,0.251)
runs <- c(968,938,925,887,825,810,807,798,793,792,764,752,740,738,731,708)

cor(batting, runs)  # r ≈ 0.866
fit_bb <- lm(runs ~ batting)
summary(fit_bb)

Results:

  • Regression equation\[\widehat{\text{Runs}} = -706.2 + 5709.2 \times \text{Batting Avg}\].
  • \(R^2 = 0.749\), so about 75% of the variability in runs is explained by batting average.
  • Prediction for a team with batting average 0.280\[-706.2 + 5709.2 \times 0.280 \approx 892\] runs.

Example 3: Comparing Correlations Across Groups

Scenario: Does the correlation between age and brain volume differ between two clinical groups?

  • Group 1\[n_1 = 27,\ r_1 = -0.753\]
  • Group 2\[n_2 = 27,\ r_2 = -0.495\]

Fisher’s Z-transformation\[z'_1 = \frac{1}{2} \ln\left(\frac{1 - 0.753}{1 + 0.753}\right) \approx -0.981\] \(z'_2 = \frac{1}{2} \ln\left(\frac{1 - 0.495}{1 + 0.495}\right) \approx -0.543\)

Test statistic\[Z = \frac{-0.981 + 0.543}{\sqrt{\frac{1}{24} + \frac{1}{24}}} = \frac{-0.438}{\sqrt{0.0833}} \approx -1.52\]

Two-sided \(p\)-value ≈ 0.129.

Conclusion: There is no statistically significant difference between the two correlations (\(\alpha = 0.05\)).

Review Questions

1. Correlation and Causation A positive correlation between variables \(X\) and \(Y\) implies that increasing \(X\) causes \(Y\) to increase.

  • (a) Always true
  • (b) Sometimes true
  • (c) Never true

Answer: (c) Never true. Correlation measures association, not causation. Confounding, reverse causality, or coincidence may explain the observed relationship.

2. Visualizing Correlation If the correlation between working out and body fat is exactly \(-1.0\), which statement is FALSE?

  • (a) Points lie on a perfect straight line.
  • (b) 100% of the variance is explained.
  • (c) The slope of the best-fit line is \(-1.0\).
  • (d) The best-fit line has a negative slope.

Answer: (c). While \(r = -1\) implies a perfect negative linear relationship, the numerical value of the slope depends on the scales of \(X\) and \(Y\). The slope is not necessarily \(-1\).

3. Least Squares Principle Which statement best describes the principle of "least squares"?

  • (a) Minimizes the sum of residuals.
  • (b) Minimizes the sum of squared residuals.
  • (c) Minimizes the distance between actual and predicted values.

Answer: (b). Least squares minimizes \(\sum (y_i - \hat{y}_i)^2\).

4. Prediction and Residuals Given the model\[\text{Fat} = 6.83 + 0.97 \times \text{Protein}\]. A burger has 20g protein and actually contains 20g fat.

  • Predicted fat = \(6.83 + 0.97 \times 20 = 26.23\)g
  • Residual = \(20 - 26.23 = -6.23\)g

Interpretation: The model overestimates fat content by 6.23g for this burger.


References





Translate this page:

(default)
Uk flag.gif

Deutsch
De flag.gif

Español
Es flag.gif

Français
Fr flag.gif

Italiano
It flag.gif

Português
Pt flag.gif

日本語
Jp flag.gif

България
Bg flag.gif

الامارات العربية المتحدة
Ae flag.gif

Suomi
Fi flag.gif

इस भाषा में
In flag.gif

Norge
No flag.png

한국어
Kr flag.gif

中文
Cn flag.gif

繁体中文
Cn flag.gif

Русский
Ru flag.gif

Nederlands
Nl flag.gif

Ελληνικά
Gr flag.gif

Hrvatska
Hr flag.gif

Česká republika
Cz flag.gif

Danmark
Dk flag.gif

Polska
Pl flag.png

România
Ro flag.png

Sverige
Se flag.gif