diff --git a/code/analysisWordLevelReadAloudBeta.R b/code/analysisWordLevelReadAloudBeta.R index f02d5e7..5a57da0 100644 --- a/code/analysisWordLevelReadAloudBeta.R +++ b/code/analysisWordLevelReadAloudBeta.R @@ -681,6 +681,32 @@ f_model23_z_scored_logistic <- glmer(misprod_outcome ~ hesitation_predictor * sc data=errorDat, family = "binomial") summary(f_model23_z_scored_logistic) + +interact_plot(model = f_model23_z_scored_logistic, + pred = scaaredSoc_z, + modx = hesitation_predictor, + interval = TRUE, + x.label = "SCAARED-Social score\n(z-scored)", + y.label = expression('Probability of misproduction (word-level)'), + legend.main = "Presence/absence of hesitation (word-level)", + main.title = "Social Anxiety Severity and Item-Level Hesitations and Misproductions") + + theme(plot.title = element_text(hjust = 0.5)) + +interact_plot(model = f_model23_z_scored_logistic, + pred = hesitation_predictor, + modx = scaaredSoc_z, + interval = TRUE, + x.label = "Presence/absence of hesitation (word-level)", + y.label = expression('Probability of misproduction (word-level)'), + legend.main = "SCAARED-Social score\n(z-scored)", + main.title = "Social Anxiety Severity and Item-Level Hesitations and Misproductions") + + theme(plot.title = element_text(hjust = 0.5)) + + + + + + # Errors as explained by disfluency and SA: misproduction from hesitation and scaared_z, control for word # hesitation_predictor1 0.09261 0.03686 2.512 0.012 * # scaaredSoc_z 0.01159 0.08326 0.139 0.889 diff --git a/results/figures/word-level/logistic/f_model23_logistic-a.png b/results/figures/word-level/logistic/f_model23_logistic-a.png new file mode 100644 index 0000000..d51c430 Binary files /dev/null and b/results/figures/word-level/logistic/f_model23_logistic-a.png differ diff --git a/results/figures/word-level/logistic/f_model23_logistic-b.png b/results/figures/word-level/logistic/f_model23_logistic-b.png new file mode 100644 index 0000000..5d016c1 Binary files /dev/null and b/results/figures/word-level/logistic/f_model23_logistic-b.png differ