Update lm.R