#Import libraries and dataset:
#Create durations:
tided.CF <- CF %>%
mutate(
WordDuration = WordEnd - WordStart,
PhoneDuration = PhoneEnd - PhoneStart
)
# Keep only rows where annotators made decisions
TP <- tided.CF %>% filter(!is.na(Prominence))
TB <- tided.CF %>% filter(!is.na(Boundary))
#Scale predictors
TP <- TP %>%
mutate(across(c(Pitch_Prominence, Intensity_Prominence, WordDuration), scale))
TB <- TB %>%
mutate(across(c(Pitch_Boundary, Intensity_Boundary, Silence_Boundary, PhoneDuration), scale))
prom.model <- lmer(
Prominence ~ Pitch_Prominence + Intensity_Prominence + WordDuration +
(1 | Speaker) + (1 | Annotator),
data = TP
)
summary(prom.model)
Linear mixed model fit by REML ['lmerMod']
Formula: Prominence ~ Pitch_Prominence + Intensity_Prominence + WordDuration +
(1 | Speaker) + (1 | Annotator)
Data: TP
REML criterion at convergence: -490593.8
Scaled residuals:
Min 1Q Median 3Q Max
-1.78378 -0.86425 -0.00702 0.86096 1.81577
Random effects:
Groups Name Variance Std.Dev.
Speaker (Intercept) 1.664e-08 1.290e-04
Annotator (Intercept) 9.897e-10 3.146e-05
Residual 8.344e-06 2.889e-03
Number of obs: 55409, groups: Speaker, 32; Annotator, 5
Fixed effects:
Estimate Std. Error t value
(Intercept) 5.642e-01 3.672e-05 15363.91
Pitch_Prominence 1.741e-01 2.444e-05 7123.95
Intensity_Prominence 1.555e-01 2.514e-05 6184.03
WordDuration -2.055e-05 1.995e-05 -1.03
Correlation of Fixed Effects:
(Intr) Ptch_P Intn_P
Ptch_Prmnnc -0.191
Intnsty_Prm 0.070 -0.639
WordDuratin 0.056 -0.175 -0.465
bound.model <- lmer(
Prominence ~ Pitch_Prominence + Intensity_Prominence + WordDuration +
(1 | Speaker) + (1 | Annotator),
data = TB
)
summary(bound.model)
Linear mixed model fit by REML ['lmerMod']
Formula: Prominence ~ Pitch_Prominence + Intensity_Prominence + WordDuration +
(1 | Speaker) + (1 | Annotator)
Data: TB
REML criterion at convergence: -490601.8
Scaled residuals:
Min 1Q Median 3Q Max
-1.78378 -0.86425 -0.00702 0.86096 1.81577
Random effects:
Groups Name Variance Std.Dev.
Speaker (Intercept) 1.664e-08 1.290e-04
Annotator (Intercept) 9.897e-10 3.146e-05
Residual 8.344e-06 2.889e-03
Number of obs: 55409, groups: Speaker, 32; Annotator, 5
Fixed effects:
Estimate Std. Error t value
(Intercept) -1.323e-05 4.745e-05 -0.279
Pitch_Prominence 5.001e-01 7.020e-05 7123.949
Intensity_Prominence 4.999e-01 8.085e-05 6184.027
WordDuration -1.231e-04 1.195e-04 -1.030
Correlation of Fixed Effects:
(Intr) Ptch_P Intn_P
Ptch_Prmnnc -0.389
Intnsty_Prm 0.116 -0.639
WordDuratin -0.118 -0.175 -0.465