Example 8.14: generating standardized regression coefficients
[This article was first published on SAS and R, and kindly contributed to R-bloggers]. (You can report issue about the content on this page here)
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.
Standardized (or beta) coefficients from a linear regression model are the parameter estimates obtained when the predictors and outcomes have been standardized to have variance = 1. Alternatively, the regression model can be fit and then standardized post-hoc based on the appropriate standard deviations. The parameters are thus interpreted as change in the outcome, in standard deviations, per standard deviation change in the predictors. However they’re calculated, standardized coefficients facilitate an assessment of which variables have the greatest association with the outcome (or response) variable, though such an assessment ignores the confidence limits associated with each pairwise association.Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.
It’s straightforward to calculate these quantities in SAS and R. We’ll demonstrate with data from the HELP study, modeling PCS as a function of MCS and homelessness among female subjects.
SAS
In SAS, standardized coefficients are available as the stb option for the model statement in proc reg.
proc reg data="c:\book\help"; where female eq 1; model pcs = mcs homeless / stb; run; The REG Procedure Model: MODEL1 Dependent Variable: PCS Parameter Estimates Parameter Standard Variable DF Estimate Error t Value Pr > |t| Intercept 1 39.62619 2.49830 15.86
R
In R we demonstrate the use of the lm.beta() function in the QuantPsyc package (due to Thomas D. Fletcher of State Farm). The function is short and sweet, and takes a linear model object as argument:
>lm.beta function (MOD) { b <- summary(MOD)$coef[-1, 1] sx <- sd(MOD$model[-1]) sy <- sd(MOD$model[1]) beta <- b * sx/sy return(beta) }
Here we apply the function to data from the HELP study.
ds = read.csv("http://www.math.smith.edu/r/data/help.csv") female = subset(ds, female==1) lm1 = lm(pcs ~ mcs + homeless, data=female)
The results, in terms of unstandardized regression parameters are the same as in SAS:
> summary(lm1) Call: lm(formula = pcs ~ mcs + homeless, data = female) Residuals: Min 1Q Median 3Q Max -28.163 -5.821 -1.017 6.775 29.979 Coefficients: Estimate Std. Error t value Pr(>|t|) (Intercept) 39.62619 2.49830 15.861 < 2e-16 *** mcs 0.21945 0.07644 2.871 0.00496 ** homeless -2.56907 1.95079 -1.317 0.19075 --- Signif. codes: 0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1 Residual standard error: 9.761 on 104 degrees of freedom Multiple R-squared: 0.0862, Adjusted R-squared: 0.06862 F-statistic: 4.905 on 2 and 104 DF, p-value: 0.009212
To generate the standardized parameter estimates, we use the lm.beta() function.
library(QuantPsyc) lm.beta(lm1)
This generates the following output:
mcs homeless 0.2691888 -0.1234776
A change in 1 standard deviation of MCS has more than twice the impact on PCS than a 1 standard deviation change in the HOMELESS variable. This example points up another potential weakness of standardized regression coefficients, however, in that the homeless variable can take on values of 0 or 1, and a 1 standard deviation change is hard to interpret.
To leave a comment for the author, please follow the link and comment on their blog: SAS and R.
R-bloggers.com offers daily e-mail updates about R news and tutorials about learning R and many other topics. Click here if you're looking to post or find an R/data-science job.
Want to share your content on R-bloggers? click here if you have a blog, or here if you don't.