working Rcpp version of fully Bayes FDRregression