標準回帰係数の求め方

方法は、2種類あって、

[その1]
回帰分析をする前に、変数自体を標準化する方法。
df2 <- scale( df )
とすれば、OKです。

[その2]
出てきた結果に、標準偏差をかける方法
sapply(df, sd)

本当は、目的変数の不偏標準偏差で割る必要があるのですが、
各変数同士横比較をするだけなら、共通して割ることになるので、分母は省略することができます。