% Panel data analysis of crime rate, Cornwell and Trumbull (1994)

data = xlsread('murder.csv');

id = data(:,1);
mrdrte = data(:,3);
exec = data(:,4);
unem = data(:,5);

n = length(mrdrte);
T = 3;
Y = mrdrte;
X = [ones(n,1) exec unem];

disp('Full-sample analysis')
disp('Pool OLS Estimation')
myols(Y,X);

X = [exec unem];
disp('Fixed-Effect Panel Data Estimation')
panelfe(Y,X,T);




