[Yuima-commits] r755 - in pkg/yuima: . R
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Tue Aug 17 08:12:41 CEST 2021
Author: kyuta
Date: 2021-08-17 08:12:40 +0200 (Tue, 17 Aug 2021)
New Revision: 755
Modified:
pkg/yuima/DESCRIPTION
pkg/yuima/NEWS
pkg/yuima/R/sim.euler.R
Log:
fixed a bug in simulate when the jump intensity is not a parameter
Modified: pkg/yuima/DESCRIPTION
===================================================================
--- pkg/yuima/DESCRIPTION 2021-05-12 12:22:15 UTC (rev 754)
+++ pkg/yuima/DESCRIPTION 2021-08-17 06:12:40 UTC (rev 755)
@@ -1,7 +1,7 @@
Package: yuima
Type: Package
Title: The YUIMA Project Package for SDEs
-Version: 1.10.7
+Version: 1.10.8
Depends: R(>= 2.10.0), methods, zoo, stats4, utils, expm, cubature,
mvtnorm
Imports: Rcpp (>= 0.12.1), boot (>= 1.3-2), glassoFast, wavethresh,
Modified: pkg/yuima/NEWS
===================================================================
--- pkg/yuima/NEWS 2021-05-12 12:22:15 UTC (rev 754)
+++ pkg/yuima/NEWS 2021-08-17 06:12:40 UTC (rev 755)
@@ -74,4 +74,5 @@
2021/2/5: modified adaBayes.R and adaBayes.Rd
2021/2/26: modified qmle.R and qmle.Rd
2021/3/13: fixed a bug in qmle when joint = TRUE and the parameter space is one-dimensional
-2021/3/15: fixed a bug in qmle when yuima at model@parameter at measure is character(0) and yuima at model@measure.type is "CP"
\ No newline at end of file
+2021/3/15: fixed a bug in qmle when yuima at model@parameter at measure is character(0) and yuima at model@measure.type is "CP"
+2021/8/16: fixed a bug in simulate when the jump intensity is not a parameter
\ No newline at end of file
Modified: pkg/yuima/R/sim.euler.R
===================================================================
--- pkg/yuima/R/sim.euler.R 2021-05-12 12:22:15 UTC (rev 754)
+++ pkg/yuima/R/sim.euler.R 2021-08-17 06:12:40 UTC (rev 755)
@@ -270,8 +270,10 @@
# print(str(dummyList))
#print(str(idx.dummy))
lgth.meas<-length(yuima at model@parameter at measure)
- if(lgth.meas>1){
- for(i in c(2:lgth.meas)){
+ #if(lgth.meas>1){
+ if(lgth.meas>0){ # YK Aug 11, 2021
+ #for(i in c(2:lgth.meas)){
+ for(i in c(1:lgth.meas)){ # YK Aug 11, 2021
idx.dummy<-yuima at model@parameter at measure[i]
#print(i)
#print(yuima at model@parameter at measure[i])
More information about the Yuima-commits
mailing list