Updated Peer Effect with more instruments and managers fixed effect(more restaurants

Tipping

Average effect(with managers)

summary(peer_iv_effect_AvgTip_lag_withmanager_update)$coefficients

                        Estimate  Std. Error  t value    Pr(>|t|)
`avg_peerAvgTip(fit)` 0.04297414 0.008375019 5.131229 2.87874e-07

Familiar VS Unfamilar(with managers)

summary(peer_iv_AvgTip_top_common_2weeks_withmanagers_update)$coefficients

                            Estimate  Std. Error  t value     Pr(>|t|)
`toptargetAvgTip(fit)`    0.10047639 0.013286348 7.562378 3.959089e-14
`commontargetAvgTip(fit)` 0.01916492 0.009259994 2.069647 3.848548e-02

Stealcnt

Average effect(with managers)

summary(peer_iv_effect_stealcnt_lag_withmanager_update)$coefficients

                                           Estimate  Std. Error  t value
`log(avg_peerTotalStealCnt + 1)(fit)`    0.18114716 0.028098657 6.446826
`log(avg_peerTotalStealAmount + 1)(fit)` 0.01442894 0.003284215 4.393421
                                             Pr(>|t|)
`log(avg_peerTotalStealCnt + 1)(fit)`    1.142327e-10
`log(avg_peerTotalStealAmount + 1)(fit)` 1.115845e-05

Familiar VS Unfamilar(with managers)

summary(peer_iv_stealcnt_top_common_2weeks_withmanagers_update)$coefficients

                                              Estimate Std. Error  t value     Pr(>|t|)
`log(toptargetTotalStealCount + 1)(fit)`    0.05993644 0.02105117 2.847178 4.410907e-03
`log(commontargetTotalStealCount + 1)(fit)` 0.24418313 0.03308070 7.381438 1.566405e-13

StealAmt

Average effect(with managers)

summary(peer_iv_effect_stealamt_lag_withmanager_update)$coefficients

                                           Estimate Std. Error   t value     Pr(>|t|)
`log(avg_peerTotalStealAmount + 1)(fit)` -0.7801247  0.1295316 -6.022658 1.715944e-09
`log(avg_peerTotalStealCnt + 1)(fit)`     1.1161743  1.1082298  1.007169 3.138538e-01

Familiar VS Unfamilar(with managers)

summary(peer_iv_stealamt_top_common_2weeks_withmanagers_update)$coefficients

                                               Estimate Std. Error   t value     Pr(>|t|)
`log(toptargetTotalStealAmount + 1)(fit)`    -0.4659127  0.1254021 -3.715351 2.029269e-04
`log(commontargetTotalStealAmount + 1)(fit)` -1.1065380  0.1556338 -7.109884 1.161731e-12