Geographic Variation of Restaurants
- Number of stores with same chain in same city
plot(store_location$count)

- location-chain pair with more than 1 store and non-negative tipping
nrow(filter(store_location,count>0,AvgTip>0))
[1] 996
Productivity and Stealing
General Stealing and productivity
- Dependent variable Avg steal count per day(store fixed effect)
summary(steal_productivity_regression_1)$coefficients[1:3,c(1,4)]
Estimate Pr(>|t|)
(Intercept) -9.071889e-03 6.366435e-01
TransactionsPerDay 4.001444e-06 3.974882e-01
TipPerDay 6.757291e-04 3.625628e-51
- Dependent variable Avg steal amount per day(store fixed effect)
summary(steal_productivity_regression_3)$coefficients[1:3,c(1,4)]
Estimate Pr(>|t|)
(Intercept) 0.068812743 8.847115e-01
TransactionsPerDay 0.001712238 1.513592e-48
TipPerDay -0.009457692 1.518755e-17
Stealing and productivity for each day
- Dependent variable: cheat indicator
summary(steal_productivity_regression_9)$coefficients[1:3,c(1,4)]
Estimate Pr(>|z|)
(Intercept) -4.3208061634 0.000000e+00
Total_Transactions 0.0003193025 9.011043e-06
TotTip -0.0003376683 6.778746e-01
- Dependent variable: cheat count each day
summary(steal_productivity_regression_5)$coefficients[1:3,c(1,4)]
Estimate Pr(>|t|)
(Intercept) 1.187554e-02 1.477380e-01
Total_Transactions 1.552577e-05 6.513477e-08
TotTip -6.618163e-05 3.539710e-02
- Dependent variable: cheat amount each day
summary(steal_productivity_regression_7)$coefficients[1:3,c(1,4)]
Estimate Pr(>|t|)
(Intercept) 0.308954726 3.663806e-24
Total_Transactions 0.000448780 5.929958e-15
TotTip -0.003040022 1.565202e-06
LS0tDQp0aXRsZTogIlJlcG9ydCBvbiBwcm9kdWN0aXZpdHkvdGlwcGluZyINCm91dHB1dDogaHRtbF9ub3RlYm9vaw0KLS0tDQoNCiMjIEdlb2dyYXBoaWMgVmFyaWF0aW9uIG9mIFJlc3RhdXJhbnRzDQoNCi0gTnVtYmVyIG9mIHN0b3JlcyB3aXRoIHNhbWUgY2hhaW4gaW4gc2FtZSBjaXR5DQoNCg0KDQoNCg0KYGBge3J9DQpwbG90KHN0b3JlX2xvY2F0aW9uJGNvdW50KQ0KYGBgDQoNCi0gbG9jYXRpb24tY2hhaW4gcGFpciB3aXRoIG1vcmUgdGhhbiAxIHN0b3JlIGFuZCBub24tbmVnYXRpdmUgdGlwcGluZw0KYGBge3J9DQpucm93KGZpbHRlcihzdG9yZV9sb2NhdGlvbixjb3VudD4wLEF2Z1RpcD4wKSkNCmBgYA0KDQoNCg0KIyMgUHJvZHVjdGl2aXR5IGFuZCBTdGVhbGluZw0KDQojIyMgR2VuZXJhbCBTdGVhbGluZyBhbmQgcHJvZHVjdGl2aXR5DQoNCi0gRGVwZW5kZW50IHZhcmlhYmxlIEF2ZyBzdGVhbCBjb3VudCBwZXIgZGF5KHN0b3JlIGZpeGVkIGVmZmVjdCkNCg0KYGBge3J9DQpzdW1tYXJ5KHN0ZWFsX3Byb2R1Y3Rpdml0eV9yZWdyZXNzaW9uXzEpJGNvZWZmaWNpZW50c1sxOjMsYygxLDQpXQ0KYGBgDQoNCg0KDQotICBEZXBlbmRlbnQgdmFyaWFibGUgQXZnIHN0ZWFsIGFtb3VudCBwZXIgZGF5KHN0b3JlIGZpeGVkIGVmZmVjdCkNCg0KYGBge3J9DQpzdW1tYXJ5KHN0ZWFsX3Byb2R1Y3Rpdml0eV9yZWdyZXNzaW9uXzMpJGNvZWZmaWNpZW50c1sxOjMsYygxLDQpXQ0KDQpgYGANCg0KIyMjIFN0ZWFsaW5nIGFuZCBwcm9kdWN0aXZpdHkgZm9yIGVhY2ggZGF5DQoNCg0KLSBEZXBlbmRlbnQgdmFyaWFibGU6IGNoZWF0IGluZGljYXRvcg0KDQpgYGB7cn0NCnN1bW1hcnkoc3RlYWxfcHJvZHVjdGl2aXR5X3JlZ3Jlc3Npb25fOSkkY29lZmZpY2llbnRzWzE6MyxjKDEsNCldDQpgYGANCg0KDQotIERlcGVuZGVudCB2YXJpYWJsZTogY2hlYXQgY291bnQgZWFjaCBkYXkNCmBgYHtyfQ0Kc3VtbWFyeShzdGVhbF9wcm9kdWN0aXZpdHlfcmVncmVzc2lvbl81KSRjb2VmZmljaWVudHNbMTozLGMoMSw0KV0NCg0KYGBgDQoNCi0gRGVwZW5kZW50IHZhcmlhYmxlOiBjaGVhdCBhbW91bnQgZWFjaCBkYXkNCmBgYHtyfQ0Kc3VtbWFyeShzdGVhbF9wcm9kdWN0aXZpdHlfcmVncmVzc2lvbl83KSRjb2VmZmljaWVudHNbMTozLGMoMSw0KV0NCmBgYA0KDQoNCg==