wenjingwang Update bayesKL_qr.R