lmer bug

HI,

It's working for me.? I am using R 2.15.


?ff1 <- Reaction ~ Days + (Days|Subject)

?? fm1 <- lmer(ff1, sleepstudy)
?? print (anova(fm1))

Analysis of Variance Table
???? Df Sum Sq Mean Sq F value
Days? 1? 29986?? 29986? 45.785

fun <- function () {

+?? ff1 <- Reaction ~ Days + (Days|Subject)
+?? fm1 <- lmer(ff1, sleepstudy)
+?? return (anova(fm1))
+ }

print(fun())

Analysis of Variance Table
???? Df Sum Sq Mean Sq F value
Days? 1? 29986?? 29986? 45.785
A.K.



----- Original Message -----
From: "Joehanes, Roby (NIH/NHLBI) [F]" <roby.joehanes at nih.gov>
To: "r-sig-mixed-models at r-project.org" <r-sig-mixed-models at r-project.org>
Cc: 
Sent: Thursday, August 16, 2012 4:28 PM
Subject: [R-sig-ME] lmer bug

Hi all:

This appears to be a bug affecting lmer that is in the Subversion up until the
current version (1788).

The following works:
?  ff1 <- Reaction ~ Days + (Days|Subject)
?  fm1 <- lmer(ff1, sleepstudy)
?  print (anova(fm1))

But the following does not:
fun <- function () {
?  ff1 <- Reaction ~ Days + (Days|Subject)
?  fm1 <- lmer(ff1, sleepstudy)
?  return (anova(fm1))
}
print(fun())

Error message:
Error in print(fun()) :
? error in evaluating the argument 'x' in selecting a method for function
'print': Error in eval(expr, envir, enclos) : object 'ff1' not found

This error, however, does not affect the lme4 package released in CRAN.

Thanks,
Roby