Update Bmisc.R