options ps=54 ls=76;

data apprentice;
infile '../../data/apprentice.dat';
input county $ 1-20 distance 21-23 apprentices 28-31 pop 36-39 urban 43-47
   direction 55;
   logpop=log(pop);
run;

proc print;

proc genmod;
class direction;
model apprentices = / dist=poisson link=log;
run;

proc genmod;
class direction;
model apprentices = distance logpop urban direction / dist=poisson link=log;
run;