Notación para modelado multinivel

La fórmula que uno debe especificar para entrenar un modelo multinivel (usando lmerdesde la lme4 Rbiblioteca) siempre me da. He leído innumerables libros de texto y tutoriales, pero nunca lo he entendido correctamente.

Así que aquí hay un ejemplo de este tutorial que me gustaría ver formulado en una ecuación. Estamos tratando de modelar la frecuencia de voz en función del género (las mujeres tienen una voz más aguda que los hombres en general) y la actitud de la persona (ya sea que haya respondido de manera educada o informal) en diferentes escenarios. Además, como puede ver en la subjectcolumna, cada persona fue sometida a mediciones varias veces.

> head(politeness, n=20)
   subject gender scenario attitude frequency
1       F1      F        1      pol     213.3
2       F1      F        1      inf     204.5
3       F1      F        2      pol     285.1
4       F1      F        2      inf     259.7
5       F1      F        3      pol     203.9
6       F1      F        3      inf     286.9
7       F1      F        4      pol     250.8
8       F1      F        4      inf     276.8
9       F1      F        5      pol     231.9
10      F1      F        5      inf     252.4
11      F1      F        6      pol     181.2
12      F1      F        6      inf     230.7
13      F1      F        7      inf     216.5
14      F1      F        7      pol     154.8
15      F3      F        1      pol     229.7
16      F3      F        1      inf     237.3
17      F3      F        2      pol     236.8
18      F3      F        2      inf     251.0
19      F3      F        3      pol     267.0
20      F3      F        3      inf     266.0

subject, gendery attitudeson factores (con informaly femaleconsiderados como niveles base para attitudey genderen las ecuaciones a continuación). Ahora, una idea es entrenar un modelo con diferentes intersecciones para cada uno subjecty scenario:

politeness.model=lmer(frequency ~ attitude + gender + 
 (1|subject) + (1|scenario), data=politeness)

Si mi comprensión de la notación es correcta, esto corresponde a:

$y_i=a^1_{j[i]}+a^2_{k[i]}+\beta\cdot$ attitude $_{\text{pol}_i} + \gamma\cdot$ gender $_{\text{male}_i}$

donde denota punto de datos, denota nivel de grupo para y denota nivel de grupo para punto de datos. y son indicadores binarios. $i$ $i^{th}$ $j[i]$ subject $k[i]$ scenario $i^{th}$ attitude $_\text{pol}$ gender $_\text{male}$

Para introducir pendientes aleatorias para la actitud, podemos escribir:

politeness.model = lmer(frequency ~ attitude + gender + 
 (1+attitude|subject) + (1+attitude|scenario), data=politeness)

Nuevamente, si mi comprensión es clara, esto corresponde a:

$y_i = a^1_{j[i]} + a^2_{k[i]} + (\beta^1_{j[i]} + \beta^2_{k[i]})\cdot$ attitude $_{\text{pol}_i} + \gamma\cdot$ gender $_{\text{male}_i}$

Ahora, ¿a qué ecuación Rcorresponde el siguiente comando?

politeness.null = lmer(frequency ~ gender +
 (1+attitude|subject) +  (1+attitude|scenario), data=politeness)

r multilevel-analysis lme4-nlme abhinavkulkarni
fuente

no muy sensato; se supone que la pendiente promedio de la población con respecto a la actitud es cero ...

Ben Bolker

@BenBolker: Oye, ¿puedes escribirlo en forma de ecuación? ¿Son correctas mis ecuaciones anteriores? En el último modelo, todavía veo attitudeestar condicionado subjecty scenario.

abhinavkulkarni

Respuestas:

Yo escribiría

~ attitude + gender + (1|subject) + (1|scenario)

como

y_{i} \sim β_{0} + β_{1} \cdot I (attitude = pol) + β_{2} I (gender = male) + b_{1, j [i]} + b_{2, k [i]} + ϵ_{i} b_{1} \sim N (0, σ_{1}^{2}) b_{2} \sim N (0, σ_{2}^{2}) ϵ \sim N (0, σ_{r}^{2})

$y_i \sim \beta_0 + \beta_1 \cdot I(\textrm{attitude}=\textrm{pol}) + \beta_2 I(\textrm{gender}=\textrm{male}) + b_{1,j[i]} + b_{2,k[i]} + \epsilon_i \\ b_1 \sim N(0,\sigma^2_1) \\ b_2 \sim N(0,\sigma^2_2) \\ \epsilon \sim N(0,\sigma^2_r)$

β

$\beta$

b

$b$

I

$I$

~ attitude + gender + (1+attitude|subject) + (1+attitude|scenario)

agrega variación entre sujetos en respuesta a attitudey scenario(podríamos escribir de manera equivalente la parte de efectos aleatorios como (attitude|subject) + (attitude|scenario), es decir, dejar la intersección implícita; esto es cuestión de gustos). Ahora

y_{i} \sim β_{0} + β_{1} \cdot I (attitude = pol) + β_{2} I (gender = male) + b_{1, j [i]} + b_{3, j [i]} I (attitude = pol) + b_{2, k [i]} + b_{4, k [i]} I (attitude = pol) + ϵ_{i} {b_{1}, b_{3}} \sim MVN (0, Σ_{1}) {b_{2}, b_{4}} \sim MVN (0, Σ_{2}) ϵ \sim N (0, σ_{r}^{2})

$y_i \sim \beta_0 + \beta_1 \cdot I(\textrm{attitude}=\textrm{pol}) + \beta_2 I(\textrm{gender}=\textrm{male}) + \\ b_{1,j[i]} + b_{3,j[i]} I(\textrm{attitude}=\textrm{pol}) + b_{2,k[i]} + b_{4,k[i]} I(\textrm{attitude}=\textrm{pol}) + \epsilon_i \\ \{b_1,b_3\} \sim \textrm{MVN}({\mathbf 0},\Sigma_1) \\ \{b_2,b_4\} \sim \textrm{MVN}({\mathbf 0},\Sigma_2) \\ \epsilon \sim N(0,\sigma^2_r)$

Σ_{1}

$\Sigma_1$

Σ_{2}

$\Sigma_2$

Σ_{1} = (\begin{array}{cc} σ_{1}^{2} & σ_{13} \\ σ_{13} & σ_{3}^{2} \end{array})

$\Sigma_1 = \left( \begin{array}{cc} \sigma^2_1 & \sigma_{13} \\ \sigma_{13} & \sigma^2_3 \end{array} \right)$

Σ_{2}

$\Sigma_2$

y_{i} \sim (β_{0} + b_{1, j [i]} + b_{2, k [i]}) + (β_{1} + b_{3, j [i]} + b_{4, k [i]}) \cdot I (attitude = pol) + β_{2} I (gender = male) + ϵ_{i}

$y_i \sim (\beta_0 + b_{1,j[i]} + b_{2,k[i]}) + \\ ( \beta_1 + b_{3,j[i]} + b_{4,k[i]}) \cdot I(\textrm{attitude}=\textrm{pol}) + \beta_2 I(\textrm{gender}=\textrm{male}) + \epsilon_i$

attitude $\beta_1=0$ attitude

Ben Bolker
fuente