tweaks to profiling example

lme4 · Jul 3, 2023 · 6962454 · 6962454
1 parent bba65fb
commit 6962454
Showing 1 changed file with 14 additions and 4 deletions.
diff --git a/misc/profile.Rmd b/misc/profile.Rmd
@@ -7,15 +7,25 @@ library(lme4)
 library(lattice)
 m0 <- lmer(Reaction ~ Days + (1|Subject), sleepstudy)
 pp <- profile(m0, "theta_")
-xyplot(pp) ## labels??
+xyplot(pp)
+xyplot(varianceProf(pp))
+xyplot(logProf(pp))
+
 pp_all <- profile(m0)
 xyplot(pp_all) ## labels??
 ```
 
-**buglet 1**: what happened to the labels?
-
 ```{r}
 pp1 <- profile(m0, "theta_", signames = FALSE)
 xyplot(pp1)
-(logProf(pp1))
+xyplot(logProf(pp1))
+```
+
+```{r}
+m1 <- lmer(Reaction ~ Days + (Days|Subject), sleepstudy)
+pp1 <- profile(m1, "theta_")
+xyplot(pp1)
+vp <- varianceProf(pp1)
+debug(varianceProf)
+xyplot(logProf(pp1))
 ```