Simple Rcpp Example for Xu