Report on Peer effect with additional fixed effect

Average peer effect

• Tipping

as.numeric(peer_effect_AvgTip_lag)

[1] -0.043406359  0.001346575

• Stealcnt with log transformation

as.numeric(peer_effect_stealcnt_lag)

[1] 0.0012020706 0.0008472465

• Stealcnt without log transformation

as.numeric(peer_effect_stealcnt_lag_1)

[1] -0.008281167  0.001224497

• Stealamt with log transformation

as.numeric(peer_effect_stealamt_lag)

[1] -0.0119974101  0.0006675294

• Stealamt without log transformation

as.numeric(peer_effect_stealamt_lag_1)

[1] -0.067192926  0.001113305

Strong VS Weak Connection

Tipping

• Strong

as.numeric(peer_effect_AvgTip_lag_strong)

[1] -0.039847678  0.001956597

• Weak

as.numeric(peer_effect_AvgTip_lag_weak)

[1] -0.04784127  0.00189180

StealCnt

• Strong

as.numeric(peer_effect_stealcnt_lag_strong)

[1] 0.007539790 0.001417652

• Weak

as.numeric(peer_effect_stealcnt_lag_weak)

[1] -0.005069274  0.001085357

StealAmount

• Strong

as.numeric(peer_effect_stealamt_lag_strong)

[1] -0.007050848  0.001069610

• Weak

as.numeric(peer_effect_stealamt_lag_weak)

[1] -0.0094524477  0.0008531569

Star vS Normal in Tipping(80% as threshold)

# Star / Normal
as.numeric(peer_effect_AvgTip_lag_star_in_tip[1:4])

[1] -0.0077983897 -0.0784684407  0.0005375277  0.0025705055

# Star / Normal
as.numeric(peer_effect_stealcnt_lag_star_in_tip[1:4])

[1] -0.003822401 -0.007994218  0.001141787  0.001309867

# Star/Normal
as.numeric(peer_effect_stealamt_lag_star_in_tip[1:4])

[1] -0.004200999 -0.024215162  0.001132038  0.001015434

Star vS Normal in Stealing Cnt(80% as threshold)

as.numeric(peer_effect_stealcnt_lag_star_in_stealcnt[1:4])

[1] -0.0093155284 -0.0129407739  0.0007267721  0.0017786485

• Steal cnt with log transform

as.numeric(peer_effect_stealcnt_lag_star_in_stealcnt[1:4])

[1] -0.0093155284 -0.0129407739  0.0007267721  0.0017786485

• Steal cnt without log transform

as.numeric(peer_effect_stealcnt_lag_star_in_stealcnt_1[1:4])

[1] -0.0121650486 -0.0233896474  0.0007099402  0.0030798608

• Steal amt with log transform

as.numeric(peer_effect_stealamt_lag_star_in_stealcnt[1:4])

[1] -0.0111099288 -0.0166014518  0.0007375598  0.0011520237

Tipping in different period

summary(peer_effect_AvgTip_lag_first60)$coefficients

                      Estimate  Std. Error   t value      Pr(>|t|)
avg_lag_peerAvgTip -0.06837106 0.002332302 -29.31484 8.342819e-189

summary(peer_effect_AvgTip_lag_60_120)$coefficients

                      Estimate Std. Error   t value     Pr(>|t|)
avg_lag_peerAvgTip -0.04581677  0.0029496 -15.53321 2.164938e-54

summary(peer_effect_AvgTip_lag_over120)$coefficients

                      Estimate Std. Error   t value     Pr(>|t|)
avg_lag_peerAvgTip -0.04451074 0.00339722 -13.10211 3.302643e-39

Stealcnt in different period

• Stealcnt with log transform

summary(peer_effect_stealcnt_lag_first60)$coefficients

                                       Estimate  Std. Error   t value   Pr(>|t|)
log(avg_lag_peerTotalStealCnt + 1) -0.002291907 0.001322891 -1.732499 0.08318514

• Steal cnt without log transform

as.numeric(peer_effect_stealcnt_lag_first60)

[1] -0.003028602  0.001324100

• Steal amt without log transform

as.numeric(peer_effect_stealcnt_lag_60_120)

[1] -0.014766973  0.002302411

• Steal amt with log transform

as.numeric(peer_effect_stealamt_lag_first60_1)

[1] -0.006673296  0.001243611

summary(peer_effect_stealcnt_lag_over120)$coefficients

                                      Estimate  Std. Error  t value     Pr(>|t|)
log(avg_lag_peerTotalStealCnt + 1) -0.02652842 0.002843739 -9.32871 1.080291e-20

Steal amount in different period

summary(peer_effect_stealamt_lag_first60)$coefficients

                                          Estimate  Std. Error  t value     Pr(>|t|)
log(avg_lag_peerTotalStealAmount + 1) -0.006320632 0.001006577 -6.27933 3.401995e-10

summary(peer_effect_stealamt_lag_60_120)$coefficients

                                         Estimate  Std. Error   t value    Pr(>|t|)
log(avg_lag_peerTotalStealAmount + 1) -0.01475579 0.001685421 -8.754957 2.05149e-18

summary(peer_effect_stealamt_lag_over120)$coefficients

                                         Estimate  Std. Error   t value    Pr(>|t|)
log(avg_lag_peerTotalStealAmount + 1) -0.04394085 0.002099852 -20.92569 3.81356e-97

Tip:Before guard /After guard

summary(peer_effect_AvgTip_lag_before_guard)$coefficients

                      Estimate  Std. Error   t value    Pr(>|t|)
avg_lag_peerAvgTip -0.05083771 0.003996653 -12.72007 4.66332e-37

summary(peer_effect_AvgTip_lag_after_guard)$coefficients

                      Estimate  Std. Error   t value      Pr(>|t|)
avg_lag_peerAvgTip -0.04662025 0.001512731 -30.81859 1.662687e-208

Stealcnt: before guard/after guard

summary(peer_effect_stealcnt_lag_before_guard)$coefficients

                                      Estimate  Std. Error   t value      Pr(>|t|)
log(avg_lag_peerTotalStealCnt + 1) -0.07974603 0.002367901 -33.67795 3.097063e-248

summary(peer_effect_stealcnt_lag_after_guard)$coefficients

                                       Estimate   Std. Error   t value  Pr(>|t|)
log(avg_lag_peerTotalStealCnt + 1) -0.002087119 0.0009282971 -2.248331 0.0245552

Stealamt: before guard/after guard

summary(peer_effect_stealamt_lag_before_guard)$coefficients

                                         Estimate  Std. Error   t value      Pr(>|t|)
log(avg_lag_peerTotalStealAmount + 1) -0.05102628 0.001853838 -27.52467 1.351233e-166

summary(peer_effect_stealamt_lag_after_guard)$coefficients

                                         Estimate   Std. Error   t value      Pr(>|t|)
log(avg_lag_peerTotalStealAmount + 1) -0.01731639 0.0007305709 -23.70255 3.537543e-124