# Title: R program for Sun et al. (2007 SJAF)
# Date: January 2006

# 0. Libraries and global setting 
# Load some libraries; Set up working directory

# 1. Import raw data in csv format
# 2. Descriptive statistics
# Generate Table 3 

# 3. Logit regression and figures
# 3.1 Logit regression
# 3.2 Marginal effect
# Generate Table 4

# 3.3 Figures: probability response curve
# Show and customize one graph on screen device
# Save three graphs on file device (Figure 1a, 1b, 1c)

# 4. Export results in tables