lm_sampler function

Sample a Linear Model