[Rcpp-commits] r1934 - pkg/Rcpp/inst/include/Rcpp/stats

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

Author: dmbates
Date: 2010-08-06 04:20:16 +0200 (Fri, 06 Aug 2010)
New Revision: 1934

Modified:
   pkg/Rcpp/inst/include/Rcpp/stats/binom.h
Log:
Agreement of default values of declaration and definition of pbinom and qbinom


Modified: pkg/Rcpp/inst/include/Rcpp/stats/binom.h
===================================================================
--- pkg/Rcpp/inst/include/Rcpp/stats/binom.h	2010-08-05 23:03:18 UTC (rev 1933)
+++ pkg/Rcpp/inst/include/Rcpp/stats/binom.h	2010-08-06 02:20:16 UTC (rev 1934)
@@ -100,12 +100,12 @@
 }
 
 template <bool NA, typename T>
-inline impl::PBinom<NA,T> pbinom( const Rcpp::VectorBase<REALSXP,NA,T>& x, int size, double prob, bool lower = false, bool log = false ){
+inline impl::PBinom<NA,T> pbinom( const Rcpp::VectorBase<REALSXP,NA,T>& x, int size, double prob, bool lower = true, bool log = false ){
     return impl::PBinom<NA,T>( x, size, prob, lower, log ); 
 }
 
 template <bool NA, typename T>
-inline impl::QBinom<NA,T> qbinom( const Rcpp::VectorBase<REALSXP,NA,T>& x, int size, double prob, bool lower = false, bool log = false ){
+inline impl::QBinom<NA,T> qbinom( const Rcpp::VectorBase<REALSXP,NA,T>& x, int size, double prob, bool lower = true, bool log = false ){
     return impl::QBinom<NA,T>( x, size, prob, lower, log ); 
 }