[Bugs-r-devel] SF.net SVN: bugs-r:[94] trunk/R2WinBUGS/R/bugs.sims.R

[<li...@us...>]

Revision: 94
          http://bugs-r.svn.sourceforge.net/bugs-r/?rev=94&view=rev
Author:   ligges
Date:     2008-11-15 20:41:20 +0000 (Sat, 15 Nov 2008)

Log Message:
-----------
bugfix: partly constant and partly stochastic matrices were incorrectly captured by some too careful error checking

Modified Paths:
--------------
    trunk/R2WinBUGS/R/bugs.sims.R

Modified: trunk/R2WinBUGS/R/bugs.sims.R
===================================================================
--- trunk/R2WinBUGS/R/bugs.sims.R	2008-10-26 19:26:30 UTC (rev 93)
+++ trunk/R2WinBUGS/R/bugs.sims.R	2008-11-15 20:41:20 UTC (rev 94)
@@ -48,8 +48,6 @@
       for (k in 1:dimension.short[j]) n.indexes.short[[j]][k] <- length (
         unique (unlist (lapply (indexes.long[long.short[[j]]], .subset, k))))
       length.short[j] <- prod(n.indexes.short[[j]])
-      if (length(long.short[[j]])!=length.short[j])
-        stop(paste("error in parameter", root.short[[j]], "in parameters.to.save"))
       indexes.short[[j]] <- as.list(numeric(length.short[j]))
       for (k in 1:length.short[j])
         indexes.short[[j]][[k]] <- indexes.long[[long.short[[j]][k]]]


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.