[Yuima-commits] r571 - in pkg/yuima: . R

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

Author: iacus
Date: 2017-01-21 07:57:14 +0100 (Sat, 21 Jan 2017)
New Revision: 571

Modified:
   pkg/yuima/DESCRIPTION
   pkg/yuima/R/rng.R
Log:
fixed small bug in rNIG

Modified: pkg/yuima/DESCRIPTION
===================================================================
--- pkg/yuima/DESCRIPTION	2017-01-20 05:30:15 UTC (rev 570)
+++ pkg/yuima/DESCRIPTION	2017-01-21 06:57:14 UTC (rev 571)
@@ -1,7 +1,7 @@
 Package: yuima
 Type: Package
 Title: The YUIMA Project Package for SDEs
-Version: 1.4.8
+Version: 1.4.9
 Depends: R(>= 2.10.0), methods, zoo, stats4, utils, expm, cubature, mvtnorm
 Imports: Rcpp (>= 0.12.1)
 Author: YUIMA Project Team

Modified: pkg/yuima/R/rng.R
===================================================================
--- pkg/yuima/R/rng.R	2017-01-20 05:30:15 UTC (rev 570)
+++ pkg/yuima/R/rng.R	2017-01-21 06:57:14 UTC (rev 571)
@@ -436,7 +436,7 @@
   if(missing(Lambda))
    Lambda <- NA
 
-  if(is.na(Lambda)){
+  if(any(is.na(Lambda)==TRUE) & length(Lambda)==1){
     ## univariate case
     gamma <- sqrt(alpha^2 - beta^2)
     if(gamma <0){