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

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

Author: iacus
Date: 2014-04-23 03:18:17 +0200 (Wed, 23 Apr 2014)
New Revision: 303

Modified:
   pkg/yuima/DESCRIPTION
   pkg/yuima/R/yuima.R
Log:
updated show method

Modified: pkg/yuima/DESCRIPTION
===================================================================
--- pkg/yuima/DESCRIPTION	2014-04-22 15:16:08 UTC (rev 302)
+++ pkg/yuima/DESCRIPTION	2014-04-23 01:18:17 UTC (rev 303)
@@ -1,8 +1,8 @@
 Package: yuima
 Type: Package
 Title: The YUIMA Project package for SDEs
-Version: 1.0.11
-Date: 2014-04-22
+Version: 1.0.12
+Date: 2014-04-23
 Depends: methods, zoo, stats4, utils, expm
 Suggests: cubature, mvtnorm
 Author: YUIMA Project Team

Modified: pkg/yuima/R/yuima.R
===================================================================
--- pkg/yuima/R/yuima.R	2014-04-22 15:16:08 UTC (rev 302)
+++ pkg/yuima/R/yuima.R	2014-04-23 01:18:17 UTC (rev 303)
@@ -322,6 +322,9 @@
          cat(sprintf("\nNumber of Wiener noises: %d", mod at noise.number))
         if(is.jumpdiff)
          cat(sprintf("\nNumber of Levy noises: %d", 1))
+         if(length(mod at parameter@all)>0){
+             cat(sprintf("\nParametric model with %d parameters",length(mod at parameter@all)))
+         }
     }
     
     if(length(object at data@original.data)>0){