Дисперсионно-ковариационная матрица для случайных эффектов в lmer

Question

Я хочу извлечь матрицу дисперсии-ковариации lmer в r. Рассмотрим следующий пример: Как я могу получить связь между случайными эффектами?

"Lme4:: торт

библиотека (lme4) fm1<- lmer (угол ~ температура + (1 | рецепт) + (1 | копия), торт)

v <- VarCorr (fm1) as.matrix (Matrix:: bdiag (v)) '