[Rcpp-commits] r2014 - pkg/Rcpp/inst/include/Rcpp/stats/random

[noreply at r-forge.r-project.org]

Author: romain
Date: 2010-08-15 13:53:20 +0200 (Sun, 15 Aug 2010)
New Revision: 2014

Modified:
   pkg/Rcpp/inst/include/Rcpp/stats/random/rexp.h
Log:
default argument for rexp

Modified: pkg/Rcpp/inst/include/Rcpp/stats/random/rexp.h
===================================================================
--- pkg/Rcpp/inst/include/Rcpp/stats/random/rexp.h	2010-08-15 11:51:15 UTC (rev 2013)
+++ pkg/Rcpp/inst/include/Rcpp/stats/random/rexp.h	2010-08-15 11:53:20 UTC (rev 2014)
@@ -51,6 +51,9 @@
     	return NumericVector( n, ::exp_rand ) ;
     return NumericVector( n, stats::ExpGenerator( scale ) ) ;
 }
+inline NumericVector rexp( int n){
+	return NumericVector( n, ::exp_rand ) ;
+}
 
 }