Read in the data:
── Attaching packages ─────────────────────────────────────── tidyverse 1.3.2 ──
✔ ggplot2 3.4.0 ✔ purrr 0.3.4
✔ tibble 3.1.7 ✔ dplyr 1.1.0
✔ tidyr 1.2.0 ✔ stringr 1.4.0
✔ readr 2.1.4 ✔ forcats 0.5.1
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag() masks stats::lag()
Loading required package: stats4
Loading required package: splines
df <- read.csv('r-34 data downloader/output_data_.csv')
# df <- df |> filter(is.na(reward) == FALSE)
#head(df)
Calculate Missing Values:
df |>
filter(mooclet_id %in% c(583,584,585,586,587,588,590)) |>
group_by(mooclet_id) |>
summarise(total_arm_assignments = length(reward),
total_missing_value = sum(is.na(reward)),
missing_ratio = sum(is.na(reward))/length(reward))
# A tibble: 7 × 4
mooclet_id total_arm_assignments total_missing_value missing_ratio
<int> <int> <int> <dbl>
1 583 199 131 0.658
2 584 199 131 0.658
3 585 196 130 0.663
4 586 417 25 0.0600
5 587 421 13 0.0309
6 588 686 13 0.0190
7 590 417 13 0.0312
Model 1: Modular bandits data are fitting on LM since the reward is multi-class,
could use multi-nomial logistic model, too
B1 model: fitted
df |>
filter(mooclet_id == 583) |>
lm(formula = reward ~ as.factor(arm) +
context_is_weekday*as.factor(arm) +
context_is_preferred_time*as.factor(arm) +
context_time_of_day_period*as.factor(arm) +
context_active_last_48*as.factor(arm) +
context_study_period*as.factor(arm) +
context_k10_response_sum_class*as.factor(arm)) |>
summary()
Call:
lm(formula = reward ~ as.factor(arm) + context_is_weekday * as.factor(arm) +
context_is_preferred_time * as.factor(arm) + context_time_of_day_period *
as.factor(arm) + context_active_last_48 * as.factor(arm) +
context_study_period * as.factor(arm) + context_k10_response_sum_class *
as.factor(arm), data = filter(df, mooclet_id == 583))
Residuals:
Min 1Q Median 3Q Max
-0.4541 -0.1133 0.0000 0.1053 0.4452
Coefficients:
Estimate
(Intercept) -0.63468
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link 1.96845
context_is_weekday 0.11186
context_is_preferred_time 0.08177
context_time_of_day_period 0.33719
context_active_last_48 0.15579
context_study_period 0.88630
context_k10_response_sum_class 0.16661
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_weekday -0.03125
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_preferred_time 0.14450
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_time_of_day_period -0.48609
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_active_last_48 -0.89801
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_study_period -1.19999
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_k10_response_sum_class -0.24162
Std. Error
(Intercept) 0.42094
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link 0.63143
context_is_weekday 0.09402
context_is_preferred_time 0.10066
context_time_of_day_period 0.16699
context_active_last_48 0.24603
context_study_period 0.28670
context_k10_response_sum_class 0.30163
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_weekday 0.13450
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_preferred_time 0.14312
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_time_of_day_period 0.20945
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_active_last_48 0.35302
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_study_period 0.42071
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_k10_response_sum_class 0.40890
t value
(Intercept) -1.508
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link 3.117
context_is_weekday 1.190
context_is_preferred_time 0.812
context_time_of_day_period 2.019
context_active_last_48 0.633
context_study_period 3.091
context_k10_response_sum_class 0.552
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_weekday -0.232
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_preferred_time 1.010
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_time_of_day_period -2.321
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_active_last_48 -2.544
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_study_period -2.852
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_k10_response_sum_class -0.591
Pr(>|t|)
(Intercept) 0.13767
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link 0.00297
context_is_weekday 0.23955
context_is_preferred_time 0.42030
context_time_of_day_period 0.04863
context_active_last_48 0.52938
context_study_period 0.00320
context_k10_response_sum_class 0.58306
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_weekday 0.81717
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_preferred_time 0.31731
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_time_of_day_period 0.02425
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_active_last_48 0.01398
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_study_period 0.00621
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_k10_response_sum_class 0.55714
(Intercept)
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link **
context_is_weekday
context_is_preferred_time
context_time_of_day_period *
context_active_last_48
context_study_period **
context_k10_response_sum_class
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_weekday
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_is_preferred_time
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_time_of_day_period *
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_active_last_48 *
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_study_period **
as.factor(arm)B1 Modular Link Clinical TrialZzgot_no_link:context_k10_response_sum_class
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Residual standard error: 0.233 on 52 degrees of freedom
(133 observations deleted due to missingness)
Multiple R-squared: 0.5172, Adjusted R-squared: 0.3965
F-statistic: 4.285 on 13 and 52 DF, p-value: 7.789e-05
B2 model: fitted:
df |>
filter(mooclet_id == 584) |>
lm(formula = reward ~ as.factor(arm) +
context_is_weekday*as.factor(arm) +
context_is_preferred_time*as.factor(arm) +
context_time_of_day_period*as.factor(arm) +
context_active_last_48*as.factor(arm) +
context_study_period*as.factor(arm) +
context_k10_response_sum_class*as.factor(arm)) |>
summary()
Call:
lm(formula = reward ~ as.factor(arm) + context_is_weekday * as.factor(arm) +
context_is_preferred_time * as.factor(arm) + context_time_of_day_period *
as.factor(arm) + context_active_last_48 * as.factor(arm) +
context_study_period * as.factor(arm) + context_k10_response_sum_class *
as.factor(arm), data = filter(df, mooclet_id == 584))
Residuals:
Min 1Q Median 3Q Max
-0.56179 -0.14485 0.00714 0.12817 0.55633
Coefficients:
Estimate
(Intercept) 1.079034
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale -1.556769
context_is_weekday 0.084746
context_is_preferred_time 0.332556
context_time_of_day_period -0.038031
context_active_last_48 -0.841356
context_study_period -0.072506
context_k10_response_sum_class -0.018019
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday -0.009965
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time -0.231391
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period 0.219152
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 0.982851
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period 0.470108
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class 0.496987
Std. Error
(Intercept) 0.491360
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale 0.683624
context_is_weekday 0.124473
context_is_preferred_time 0.125231
context_time_of_day_period 0.162262
context_active_last_48 0.280045
context_study_period 0.340012
context_k10_response_sum_class 0.363790
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday 0.156661
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time 0.159117
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period 0.222662
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 0.388419
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period 0.433215
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class 0.442496
t value
(Intercept) 2.196
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale -2.277
context_is_weekday 0.681
context_is_preferred_time 2.656
context_time_of_day_period -0.234
context_active_last_48 -3.004
context_study_period -0.213
context_k10_response_sum_class -0.050
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday -0.064
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time -1.454
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period 0.984
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 2.530
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period 1.085
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class 1.123
Pr(>|t|)
(Intercept) 0.03257
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale 0.02691
context_is_weekday 0.49900
context_is_preferred_time 0.01049
context_time_of_day_period 0.81561
context_active_last_48 0.00409
context_study_period 0.83197
context_k10_response_sum_class 0.96068
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday 0.94952
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time 0.15190
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period 0.32956
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 0.01446
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period 0.28286
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class 0.26654
(Intercept) *
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale *
context_is_weekday
context_is_preferred_time *
context_time_of_day_period
context_active_last_48 **
context_study_period
context_k10_response_sum_class
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 *
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Residual standard error: 0.2569 on 52 degrees of freedom
(133 observations deleted due to missingness)
Multiple R-squared: 0.4134, Adjusted R-squared: 0.2668
F-statistic: 2.819 on 13 and 52 DF, p-value: 0.004017
a <- lm(data = df |> filter(mooclet_id == 584), formula = reward ~ as.factor(arm) +
context_is_weekday*as.factor(arm) +
context_is_preferred_time*as.factor(arm) +
context_time_of_day_period*as.factor(arm) +
context_active_last_48*as.factor(arm) +
context_study_period*as.factor(arm) +
context_k10_response_sum_class*as.factor(arm))
summary(a)
Call:
lm(formula = reward ~ as.factor(arm) + context_is_weekday * as.factor(arm) +
context_is_preferred_time * as.factor(arm) + context_time_of_day_period *
as.factor(arm) + context_active_last_48 * as.factor(arm) +
context_study_period * as.factor(arm) + context_k10_response_sum_class *
as.factor(arm), data = filter(df, mooclet_id == 584))
Residuals:
Min 1Q Median 3Q Max
-0.56179 -0.14485 0.00714 0.12817 0.55633
Coefficients:
Estimate
(Intercept) 1.079034
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale -1.556769
context_is_weekday 0.084746
context_is_preferred_time 0.332556
context_time_of_day_period -0.038031
context_active_last_48 -0.841356
context_study_period -0.072506
context_k10_response_sum_class -0.018019
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday -0.009965
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time -0.231391
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period 0.219152
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 0.982851
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period 0.470108
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class 0.496987
Std. Error
(Intercept) 0.491360
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale 0.683624
context_is_weekday 0.124473
context_is_preferred_time 0.125231
context_time_of_day_period 0.162262
context_active_last_48 0.280045
context_study_period 0.340012
context_k10_response_sum_class 0.363790
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday 0.156661
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time 0.159117
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period 0.222662
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 0.388419
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period 0.433215
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class 0.442496
t value
(Intercept) 2.196
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale -2.277
context_is_weekday 0.681
context_is_preferred_time 2.656
context_time_of_day_period -0.234
context_active_last_48 -3.004
context_study_period -0.213
context_k10_response_sum_class -0.050
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday -0.064
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time -1.454
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period 0.984
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 2.530
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period 1.085
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class 1.123
Pr(>|t|)
(Intercept) 0.03257
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale 0.02691
context_is_weekday 0.49900
context_is_preferred_time 0.01049
context_time_of_day_period 0.81561
context_active_last_48 0.00409
context_study_period 0.83197
context_k10_response_sum_class 0.96068
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday 0.94952
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time 0.15190
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period 0.32956
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 0.01446
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period 0.28286
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class 0.26654
(Intercept) *
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale *
context_is_weekday
context_is_preferred_time *
context_time_of_day_period
context_active_last_48 **
context_study_period
context_k10_response_sum_class
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_weekday
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_is_preferred_time
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_time_of_day_period
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_active_last_48 *
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_study_period
as.factor(arm)B2 Modular Rationale Clinical TrialZzmodular_rationale:context_k10_response_sum_class
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Residual standard error: 0.2569 on 52 degrees of freedom
(133 observations deleted due to missingness)
Multiple R-squared: 0.4134, Adjusted R-squared: 0.2668
F-statistic: 2.819 on 13 and 52 DF, p-value: 0.004017
For B3:
df |>
filter(mooclet_id == 585) |>
lm(formula = reward ~ as.factor(arm) +
context_is_weekday*as.factor(arm) +
context_is_preferred_time*as.factor(arm) +
context_time_of_day_period*as.factor(arm) +
context_active_last_48*as.factor(arm) +
context_study_period*as.factor(arm) +
context_k10_response_sum_class*as.factor(arm)) |>
summary()
Call:
lm(formula = reward ~ as.factor(arm) + context_is_weekday * as.factor(arm) +
context_is_preferred_time * as.factor(arm) + context_time_of_day_period *
as.factor(arm) + context_active_last_48 * as.factor(arm) +
context_study_period * as.factor(arm) + context_k10_response_sum_class *
as.factor(arm), data = filter(df, mooclet_id == 585))
Residuals:
Min 1Q Median 3Q Max
-0.52197 -0.14740 0.00000 0.09599 0.56073
Coefficients: (3 not defined because of singularities)
Estimate
(Intercept) 0.35140
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question 0.17022
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt -0.32409
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories -0.79627
context_is_weekday 0.22809
context_is_preferred_time 0.34831
context_time_of_day_period -0.05638
context_active_last_48 -0.30513
context_study_period -0.32622
context_k10_response_sum_class 0.47902
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_weekday -0.24750
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_weekday -0.04491
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_weekday -0.47809
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_preferred_time -0.33175
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_preferred_time -0.11869
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_preferred_time -0.09831
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_time_of_day_period 0.35416
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_time_of_day_period -0.24141
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_time_of_day_period -0.69362
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_study_period 0.54076
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_study_period 0.60390
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_study_period 1.07622
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_k10_response_sum_class -0.48733
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_k10_response_sum_class -0.03968
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_k10_response_sum_class 0.27098
Std. Error
(Intercept) 0.71578
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question 0.80900
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt 0.98723
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories 1.14170
context_is_weekday 0.22240
context_is_preferred_time 0.16826
context_time_of_day_period 0.22676
context_active_last_48 0.21181
context_study_period 0.44768
context_k10_response_sum_class 0.45963
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_weekday 0.25055
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_weekday 0.28130
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_weekday 0.56541
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_preferred_time 0.20737
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_preferred_time 0.23857
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_preferred_time 0.79770
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_time_of_day_period 0.29394
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_time_of_day_period 0.37684
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_time_of_day_period 0.45103
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_study_period 0.56340
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_study_period 0.69009
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_study_period 1.12447
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_k10_response_sum_class 0.56797
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_k10_response_sum_class 0.72193
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_k10_response_sum_class 1.31579
t value
(Intercept) 0.491
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question 0.210
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt -0.328
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories -0.697
context_is_weekday 1.026
context_is_preferred_time 2.070
context_time_of_day_period -0.249
context_active_last_48 -1.441
context_study_period -0.729
context_k10_response_sum_class 1.042
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_weekday -0.988
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_weekday -0.160
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_weekday -0.846
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_preferred_time -1.600
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_preferred_time -0.497
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_preferred_time -0.123
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_time_of_day_period 1.205
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_time_of_day_period -0.641
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_time_of_day_period -1.538
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_study_period 0.960
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_study_period 0.875
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_study_period 0.957
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_k10_response_sum_class -0.858
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_k10_response_sum_class -0.055
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_k10_response_sum_class 0.206
Pr(>|t|)
(Intercept) 0.6261
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question 0.8344
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt 0.7444
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories 0.4895
context_is_weekday 0.3111
context_is_preferred_time 0.0448
context_time_of_day_period 0.8049
context_active_last_48 0.1573
context_study_period 0.4703
context_k10_response_sum_class 0.3034
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_weekday 0.3290
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_weekday 0.8739
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_weekday 0.4027
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_preferred_time 0.1173
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_preferred_time 0.6215
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_preferred_time 0.9025
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_time_of_day_period 0.2352
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_time_of_day_period 0.5253
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_time_of_day_period 0.1318
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_active_last_48 NA
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_study_period 0.3428
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_study_period 0.3866
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_study_period 0.3441
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_k10_response_sum_class 0.3959
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_k10_response_sum_class 0.9564
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_k10_response_sum_class 0.8379
(Intercept)
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories
context_is_weekday
context_is_preferred_time *
context_time_of_day_period
context_active_last_48
context_study_period
context_k10_response_sum_class
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_weekday
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_weekday
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_weekday
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_is_preferred_time
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_is_preferred_time
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_is_preferred_time
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_time_of_day_period
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_time_of_day_period
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_time_of_day_period
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_active_last_48
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_active_last_48
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_active_last_48
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_study_period
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_study_period
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_study_period
as.factor(arm)B3 Modular Interaction Clinical TrialZzreflection_question:context_k10_response_sum_class
as.factor(arm)B3 Modular Interaction Clinical TrialZzshort_prompt:context_k10_response_sum_class
as.factor(arm)B3 Modular Interaction Clinical TrialZzstories:context_k10_response_sum_class
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
Residual standard error: 0.2757 on 41 degrees of freedom
(130 observations deleted due to missingness)
Multiple R-squared: 0.4673, Adjusted R-squared: 0.1555
F-statistic: 1.499 on 24 and 41 DF, p-value: 0.1247
For C1:
df |>
filter(mooclet_id == 586) |>
glm(formula = as.factor(reward) ~ as.factor(arm)+
context_is_weekday*as.factor(arm) +
context_is_preferred_time*as.factor(arm) +
context_time_of_day_period*as.factor(arm) +
context_active_last_48*as.factor(arm) +
context_study_period*as.factor(arm) +
context_k10_response_sum_class*as.factor(arm), family = binomial) |>
summary()
Call:
glm(formula = as.factor(reward) ~ as.factor(arm) + context_is_weekday *
as.factor(arm) + context_is_preferred_time * as.factor(arm) +
context_time_of_day_period * as.factor(arm) + context_active_last_48 *
as.factor(arm) + context_study_period * as.factor(arm) +
context_k10_response_sum_class * as.factor(arm), family = binomial,
data = filter(df, mooclet_id == 586))
Deviance Residuals:
Min 1Q Median 3Q Max
-2.6535 -0.6354 -0.3669 -0.1746 2.5986
Coefficients:
Estimate
(Intercept) 0.68075
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss 0.27713
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale -19.63849
context_is_weekday 0.91986
context_is_preferred_time 1.14344
context_time_of_day_period 0.26322
context_active_last_48 0.28144
context_study_period -3.08570
context_k10_response_sum_class -1.84408
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_weekday -1.09191
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_weekday -0.42951
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_preferred_time -0.30932
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_preferred_time 0.81445
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_time_of_day_period -0.07604
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_time_of_day_period 0.31953
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_active_last_48 1.22988
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_active_last_48 16.49833
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_study_period 0.81578
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_study_period 4.95473
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_k10_response_sum_class -1.20683
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_k10_response_sum_class 0.26414
Std. Error
(Intercept) 2.71539
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss 3.05896
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale 982.41302
context_is_weekday 1.90298
context_is_preferred_time 1.10184
context_time_of_day_period 2.00406
context_active_last_48 1.26410
context_study_period 1.59354
context_k10_response_sum_class 1.48871
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_weekday 2.04943
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_weekday 2.32112
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_preferred_time 1.20229
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_preferred_time 1.77531
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_time_of_day_period 2.16838
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_time_of_day_period 2.43101
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_active_last_48 1.49068
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_active_last_48 982.40473
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_study_period 1.71273
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_study_period 2.73437
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_k10_response_sum_class 1.69747
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_k10_response_sum_class 2.35519
z value
(Intercept) 0.251
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss 0.091
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale -0.020
context_is_weekday 0.483
context_is_preferred_time 1.038
context_time_of_day_period 0.131
context_active_last_48 0.223
context_study_period -1.936
context_k10_response_sum_class -1.239
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_weekday -0.533
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_weekday -0.185
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_preferred_time -0.257
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_preferred_time 0.459
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_time_of_day_period -0.035
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_time_of_day_period 0.131
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_active_last_48 0.825
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_active_last_48 0.017
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_study_period 0.476
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_study_period 1.812
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_k10_response_sum_class -0.711
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_k10_response_sum_class 0.112
Pr(>|z|)
(Intercept) 0.8020
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss 0.9278
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale 0.9841
context_is_weekday 0.6288
context_is_preferred_time 0.2994
context_time_of_day_period 0.8955
context_active_last_48 0.8238
context_study_period 0.0528
context_k10_response_sum_class 0.2155
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_weekday 0.5942
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_weekday 0.8532
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_preferred_time 0.7970
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_preferred_time 0.6464
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_time_of_day_period 0.9720
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_time_of_day_period 0.8954
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_active_last_48 0.4093
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_active_last_48 0.9866
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_study_period 0.6339
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_study_period 0.0700
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_k10_response_sum_class 0.4771
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_k10_response_sum_class 0.9107
(Intercept)
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale
context_is_weekday
context_is_preferred_time
context_time_of_day_period
context_active_last_48
context_study_period .
context_k10_response_sum_class
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_weekday
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_weekday
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_is_preferred_time
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_is_preferred_time
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_time_of_day_period
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_time_of_day_period
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_active_last_48
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_active_last_48
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_study_period
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_study_period .
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzis_loss:context_k10_response_sum_class
as.factor(arm)C1 Long Prompt Rationale Clinical TrialZzno_rationale:context_k10_response_sum_class
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 368.53 on 378 degrees of freedom
Residual deviance: 286.09 on 358 degrees of freedom
(38 observations deleted due to missingness)
AIC: 328.09
Number of Fisher Scoring iterations: 16
For C2:
df |>
filter(mooclet_id == 587) |>
glm(formula = as.factor(reward) ~ as.factor(arm)+
context_is_weekday*as.factor(arm) +
context_is_preferred_time*as.factor(arm) +
context_time_of_day_period*as.factor(arm) +
context_active_last_48*as.factor(arm) +
context_study_period*as.factor(arm) +
context_k10_response_sum_class*as.factor(arm), family = binomial) |>
summary()
Call:
glm(formula = as.factor(reward) ~ as.factor(arm) + context_is_weekday *
as.factor(arm) + context_is_preferred_time * as.factor(arm) +
context_time_of_day_period * as.factor(arm) + context_active_last_48 *
as.factor(arm) + context_study_period * as.factor(arm) +
context_k10_response_sum_class * as.factor(arm), family = binomial,
data = filter(df, mooclet_id == 587))
Deviance Residuals:
Min 1Q Median 3Q Max
-1.9086 -0.8278 -0.3291 0.8442 2.2916
Coefficients:
Estimate
(Intercept) -0.68013
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration -21.58159
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation -1.42256
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective -17.84291
context_is_weekday -0.20124
context_is_preferred_time 0.03496
context_time_of_day_period 0.20340
context_active_last_48 1.58919
context_study_period -2.52073
context_k10_response_sum_class 0.48229
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_weekday -1.46917
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_weekday 0.09550
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_weekday -2.67741
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_preferred_time 0.85340
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_preferred_time 0.08611
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_preferred_time -0.08200
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_time_of_day_period 4.07307
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_time_of_day_period -0.03852
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_time_of_day_period 3.06124
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_active_last_48 17.02721
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_active_last_48 -0.29164
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_active_last_48 17.76673
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_study_period 0.40405
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_study_period -0.04762
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_study_period 0.27296
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_k10_response_sum_class 3.97669
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_k10_response_sum_class 2.51026
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_k10_response_sum_class 1.07889
Std. Error
(Intercept) 1.52451
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration 1767.52893
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation 2.16928
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective 1007.50772
context_is_weekday 0.73683
context_is_preferred_time 0.51590
context_time_of_day_period 1.57473
context_active_last_48 0.69557
context_study_period 0.85480
context_k10_response_sum_class 1.14388
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_weekday 2.00184
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_weekday 0.98987
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_weekday 1.30148
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_preferred_time 1.01236
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_preferred_time 0.75659
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_preferred_time 0.72758
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_time_of_day_period 5.21349
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_time_of_day_period 2.10718
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_time_of_day_period 2.98937
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_active_last_48 1767.52571
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_active_last_48 0.96752
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_active_last_48 1007.50595
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_study_period 1.58269
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_study_period 1.31675
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_study_period 1.20635
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_k10_response_sum_class 3.05905
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_k10_response_sum_class 1.66523
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_k10_response_sum_class 1.57456
z value
(Intercept) -0.446
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration -0.012
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation -0.656
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective -0.018
context_is_weekday -0.273
context_is_preferred_time 0.068
context_time_of_day_period 0.129
context_active_last_48 2.285
context_study_period -2.949
context_k10_response_sum_class 0.422
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_weekday -0.734
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_weekday 0.096
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_weekday -2.057
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_preferred_time 0.843
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_preferred_time 0.114
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_preferred_time -0.113
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_time_of_day_period 0.781
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_time_of_day_period -0.018
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_time_of_day_period 1.024
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_active_last_48 0.010
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_active_last_48 -0.301
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_active_last_48 0.018
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_study_period 0.255
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_study_period -0.036
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_study_period 0.226
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_k10_response_sum_class 1.300
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_k10_response_sum_class 1.507
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_k10_response_sum_class 0.685
Pr(>|z|)
(Intercept) 0.65550
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration 0.99026
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation 0.51197
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective 0.98587
context_is_weekday 0.78476
context_is_preferred_time 0.94598
context_time_of_day_period 0.89723
context_active_last_48 0.02233
context_study_period 0.00319
context_k10_response_sum_class 0.67329
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_weekday 0.46300
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_weekday 0.92315
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_weekday 0.03967
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_preferred_time 0.39924
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_preferred_time 0.90939
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_preferred_time 0.91027
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_time_of_day_period 0.43465
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_time_of_day_period 0.98542
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_time_of_day_period 0.30582
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_active_last_48 0.99231
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_active_last_48 0.76309
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_active_last_48 0.98593
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_study_period 0.79850
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_study_period 0.97115
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_study_period 0.82099
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_k10_response_sum_class 0.19361
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_k10_response_sum_class 0.13170
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_k10_response_sum_class 0.49322
(Intercept)
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective
context_is_weekday
context_is_preferred_time
context_time_of_day_period
context_active_last_48 *
context_study_period **
context_k10_response_sum_class
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_weekday
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_weekday
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_weekday *
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_is_preferred_time
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_is_preferred_time
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_is_preferred_time
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_time_of_day_period
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_time_of_day_period
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_time_of_day_period
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_active_last_48
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_active_last_48
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_active_last_48
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_study_period
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_study_period
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_study_period
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzinspiration:context_k10_response_sum_class
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzno_motivation:context_k10_response_sum_class
as.factor(arm)C2 Long Prompt Motivation Clinical TrialZzperspective:context_k10_response_sum_class
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 521.57 on 393 degrees of freedom
Residual deviance: 386.18 on 366 degrees of freedom
(27 observations deleted due to missingness)
AIC: 442.18
Number of Fisher Scoring iterations: 17
For C3:
df |>
filter(mooclet_id == 588) |>
glm(formula = as.factor(reward) ~ as.factor(arm)+
context_is_weekday*as.factor(arm) +
context_is_preferred_time*as.factor(arm) +
context_time_of_day_period*as.factor(arm) +
context_active_last_48*as.factor(arm) +
context_study_period*as.factor(arm) +
context_k10_response_sum_class*as.factor(arm), family = binomial) |>
summary()
Call:
glm(formula = as.factor(reward) ~ as.factor(arm) + context_is_weekday *
as.factor(arm) + context_is_preferred_time * as.factor(arm) +
context_time_of_day_period * as.factor(arm) + context_active_last_48 *
as.factor(arm) + context_study_period * as.factor(arm) +
context_k10_response_sum_class * as.factor(arm), family = binomial,
data = filter(df, mooclet_id == 588))
Deviance Residuals:
Min 1Q Median 3Q Max
-2.7279 -0.3558 0.3833 0.5774 2.7825
Coefficients:
Estimate
(Intercept) -0.9112
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder -15.0058
context_is_weekday 1.0831
context_is_preferred_time -0.4926
context_time_of_day_period -0.6484
context_active_last_48 2.8205
context_study_period -3.3663
context_k10_response_sum_class 0.9200
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_weekday 5.3855
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_preferred_time -0.2376
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_time_of_day_period -22.3011
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_active_last_48 13.6751
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_study_period -0.4834
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_k10_response_sum_class 2.0869
Std. Error
(Intercept) 0.8627
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder 596.4462
context_is_weekday 0.4871
context_is_preferred_time 0.2834
context_time_of_day_period 1.2503
context_active_last_48 0.4276
context_study_period 0.4704
context_k10_response_sum_class 0.6321
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_weekday 1199.7728
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_preferred_time 0.9135
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_time_of_day_period 3599.3177
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_active_last_48 596.4422
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_study_period 1.7805
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_k10_response_sum_class 1.6797
z value
(Intercept) -1.056
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder -0.025
context_is_weekday 2.223
context_is_preferred_time -1.739
context_time_of_day_period -0.519
context_active_last_48 6.596
context_study_period -7.156
context_k10_response_sum_class 1.456
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_weekday 0.004
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_preferred_time -0.260
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_time_of_day_period -0.006
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_active_last_48 0.023
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_study_period -0.271
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_k10_response_sum_class 1.242
Pr(>|z|)
(Intercept) 0.2909
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder 0.9799
context_is_weekday 0.0262
context_is_preferred_time 0.0821
context_time_of_day_period 0.6041
context_active_last_48 4.23e-11
context_study_period 8.32e-13
context_k10_response_sum_class 0.1455
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_weekday 0.9964
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_preferred_time 0.7948
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_time_of_day_period 0.9951
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_active_last_48 0.9817
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_study_period 0.7860
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_k10_response_sum_class 0.2141
(Intercept)
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder
context_is_weekday *
context_is_preferred_time .
context_time_of_day_period
context_active_last_48 ***
context_study_period ***
context_k10_response_sum_class
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_weekday
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_is_preferred_time
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_time_of_day_period
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_active_last_48
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_study_period
as.factor(arm)C3 Long Prompt Reminder Clinical TrialZzno_reminder:context_k10_response_sum_class
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 908.26 on 660 degrees of freedom
Residual deviance: 518.08 on 647 degrees of freedom
(25 observations deleted due to missingness)
AIC: 546.08
Number of Fisher Scoring iterations: 15
For C4:
df |>
filter(mooclet_id == 590) |>
glm(formula = as.factor(reward) ~ as.factor(arm)+
context_is_weekday*as.factor(arm) +
context_is_preferred_time*as.factor(arm) +
context_time_of_day_period*as.factor(arm) +
context_active_last_48*as.factor(arm) +
context_study_period*as.factor(arm) +
context_k10_response_sum_class*as.factor(arm), family = binomial) |>
summary()
Call:
glm(formula = as.factor(reward) ~ as.factor(arm) + context_is_weekday *
as.factor(arm) + context_is_preferred_time * as.factor(arm) +
context_time_of_day_period * as.factor(arm) + context_active_last_48 *
as.factor(arm) + context_study_period * as.factor(arm) +
context_k10_response_sum_class * as.factor(arm), family = binomial,
data = filter(df, mooclet_id == 590))
Deviance Residuals:
Min 1Q Median 3Q Max
-2.1125 -0.8268 -0.2766 0.8994 2.4658
Coefficients:
Estimate
(Intercept) -2.0429
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment -1.0150
context_is_weekday -0.2160
context_is_preferred_time -1.0064
context_time_of_day_period 0.2269
context_active_last_48 2.5004
context_study_period -2.8243
context_k10_response_sum_class 1.3962
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_weekday 0.5577
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_preferred_time -1.2093
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_time_of_day_period 0.6710
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_active_last_48 0.6088
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_study_period 0.8579
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_k10_response_sum_class -0.2276
Std. Error
(Intercept) 1.2348
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment 1.8082
context_is_weekday 0.5783
context_is_preferred_time 0.5340
context_time_of_day_period 0.5855
context_active_last_48 0.7707
context_study_period 0.6310
context_k10_response_sum_class 0.8539
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_weekday 0.8399
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_preferred_time 0.8730
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_time_of_day_period 0.8498
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_active_last_48 1.0942
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_study_period 0.9649
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_k10_response_sum_class 1.2318
z value
(Intercept) -1.654
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment -0.561
context_is_weekday -0.374
context_is_preferred_time -1.885
context_time_of_day_period 0.388
context_active_last_48 3.244
context_study_period -4.476
context_k10_response_sum_class 1.635
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_weekday 0.664
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_preferred_time -1.385
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_time_of_day_period 0.790
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_active_last_48 0.556
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_study_period 0.889
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_k10_response_sum_class -0.185
Pr(>|z|)
(Intercept) 0.09805
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment 0.57456
context_is_weekday 0.70875
context_is_preferred_time 0.05948
context_time_of_day_period 0.69836
context_active_last_48 0.00118
context_study_period 7.61e-06
context_k10_response_sum_class 0.10204
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_weekday 0.50666
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_preferred_time 0.16597
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_time_of_day_period 0.42974
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_active_last_48 0.57792
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_study_period 0.37396
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_k10_response_sum_class 0.85341
(Intercept) .
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment
context_is_weekday
context_is_preferred_time .
context_time_of_day_period
context_active_last_48 **
context_study_period ***
context_k10_response_sum_class
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_weekday
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_is_preferred_time
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_time_of_day_period
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_active_last_48
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_study_period
as.factor(arm)C4 Long Prompt Reflection Commitment Clinical TrialZzno_commitment:context_k10_response_sum_class
---
Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
(Dispersion parameter for binomial family taken to be 1)
Null deviance: 516.70 on 390 degrees of freedom
Residual deviance: 380.63 on 377 degrees of freedom
(26 observations deleted due to missingness)
AIC: 408.63
Number of Fisher Scoring iterations: 6