## ----eval = F-----------------------------------------------------------------
#  lm.beta(lm(y ~ x, data = dat))

## ----eval = F-----------------------------------------------------------------
#  lm(y ~ x, data = scale(dat))

## ----eval = F-----------------------------------------------------------------
#  lm.beta(lm(y ~ 0 + x, data = dat))

## ----eval = F-----------------------------------------------------------------
#  lm(y ~ 0 + x, data = scale(dat, center = F))

## ----eval = F-----------------------------------------------------------------
#  lm.beta(lm(y ~ 0 + x, data = dat), complete.standardization = T)

## ----eval = F-----------------------------------------------------------------
#  lm(y ~ 0 + x, data = scale(dat))