A convenience function that returns the theta parameters for a
a valid merMod object
a vector of the covariance, theta, parameters from a
(fm1 <- lmer(Reaction ~ Days + (Days | Subject), sleepstudy)) thetaExtract(fm1) #(a numeric vector of the covariance parameters)
Loading required package: arm Loading required package: MASS Loading required package: Matrix Loading required package: lme4 arm (Version 1.10-1, built: 2018-4-12) Working directory is /work/tmp Loading required package: dplyr Attaching package: 'dplyr' The following object is masked from 'package:MASS': select The following objects are masked from 'package:stats': filter, lag The following objects are masked from 'package:base': intersect, setdiff, setequal, union Linear mixed model fit by REML ['lmerMod'] Formula: Reaction ~ Days + (Days | Subject) Data: sleepstudy REML criterion at convergence: 1743.628 Random effects: Groups Name Std.Dev. Corr Subject (Intercept) 24.740 Days 5.922 0.07 Residual 25.592 Number of obs: 180, groups: Subject, 18 Fixed Effects: (Intercept) Days 251.41 10.47  0.96673279 0.01516906 0.23090960
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.