[Lme4-commits] r1734 - pkg/lme4/tests

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

Author: bbolker
Date: 2012-05-16 03:48:04 +0200 (Wed, 16 May 2012)
New Revision: 1734

Added:
   pkg/lme4/tests/polytomous.R
   pkg/lme4/tests/polytomous_test.RData
Log:

  add infinite-looping example from polytomous package



Added: pkg/lme4/tests/polytomous.R
===================================================================
--- pkg/lme4/tests/polytomous.R	                        (rev 0)
+++ pkg/lme4/tests/polytomous.R	2012-05-16 01:48:04 UTC (rev 1734)
@@ -0,0 +1,19 @@
+if (FALSE) {
+    ## library(polytomous)
+    data(think)
+    think.polytomous.lmer1 <-  polytomous(Lexeme ~ Agent + Patient + (1|Register),
+                                          data=think, heuristic="poisson.reformulation")
+    save("formula.poisson","data.poisson",file="polytomous_test.RData")
+}
+load("polytomous_test.RData")
+library(lme4)
+if (FALSE) {
+    ## infinite loop
+    glmer(formula.poisson,data=data.poisson,family=poisson,verbose=10)
+    ## Cholmod not positive definite -> infinite loop
+    glmer(formula.poisson,data=data.poisson,family=poisson,verbose=10,optimizer="bobyqa")
+    ## caught warning: maxfun < 10 * length(par)^2 is not recommended. -> infinite loop
+}
+
+
+

Added: pkg/lme4/tests/polytomous_test.RData
===================================================================
(Binary files differ)


Property changes on: pkg/lme4/tests/polytomous_test.RData
___________________________________________________________________
Added: svn:mime-type
   + application/octet-stream