Resolved merge conflicts

steno-aarhus · May 27, 2024 · 75ca6df · 75ca6df
2 parents 6dc3841 + 57e21e4
commit 75ca6df
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/sessions/causal-mediation-analysis-estimation.qmd b/sessions/causal-mediation-analysis-estimation.qmd
@@ -614,9 +614,9 @@ A1Data <- A0Data <- ObsData
 # The rest of the data stays as is (for now)
 A1Data$A <- 1
 A0Data$A <- 0
-head(ObsData)
-head(A1Data)
-head(A0Data)
+A1Data$A <- 1
+A0Data$A <- 0
+exp(Q$coef[2])
 # Predict Y if A=1
 Y_A1 <- predict(Q, A1Data, type="response") 
 # Predict Y if A=0