ajustando exemplos rcpp