[Pomp-commits] r283 - pkg/R

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

Author: kingaa
Date: 2010-07-06 14:44:01 +0200 (Tue, 06 Jul 2010)
New Revision: 283

Modified:
   pkg/R/pmcmc.R
Log:
- unname before 'coef<-' to avoid warning


Modified: pkg/R/pmcmc.R
===================================================================
--- pkg/R/pmcmc.R	2010-07-02 16:33:50 UTC (rev 282)
+++ pkg/R/pmcmc.R	2010-07-06 12:44:01 UTC (rev 283)
@@ -246,7 +246,7 @@
 
   }
 
-  coef(obj) <- theta
+  coef(obj) <- unname(theta)
 
   if (Nmcmc>0) {
     obj at Nmcmc <- as.integer(Nmcmc)