Predicción con lme4 en nuevos niveles

Estoy tratando de ajustar un modelo de efectos mixtos y luego usar ese modelo para generar estimaciones en un nuevo conjunto de datos que puede tener diferentes niveles. Esperaba que las estimaciones en un nuevo conjunto de datos utilizarían el valor medio de los parámetros estimados, pero ese no parece ser el caso. Aquí hay un ejemplo mínimo de trabajo:

library(lme4)
d = data.frame(x = rep(1:10, times = 3),
               y = NA,
               grp = rep(1:3, each = 10))
d$y[d$grp == 1] = 1:10 + rnorm(10)
d$y[d$grp == 2] = 1:10 * 1.5 + rnorm(10)
d$y[d$grp == 3] = 1:10 * 0.5 + rnorm(10)
fit = lmer(y ~ (1+x)|grp, data = d)
newdata = data.frame(x = 1:10, grp = 4)
predict(fit, newdata = newdata, allow.new.levels = TRUE)

En este ejemplo, esencialmente estoy definiendo tres grupos con diferentes ecuaciones de regresión (pendientes de 1, 1.5 y 0.5). Sin embargo, cuando trato de predecir en un nuevo conjunto de datos con un nivel invisible, obtengo una estimación constante. Hubiera esperado que el valor esperado de la pendiente y la intercepción se utilizara para generar predicciones para estos nuevos datos. ¿Estoy esperando lo incorrecto? O, ¿qué estoy haciendo mal con mi código?