data dd;
input f e n d@@;
lgn=log(n);
cards;
1 1 240216 1 0 100 63 2 1 60 48 2 0 210 84
;
proc genmod data=dd order=data;
class f;
model d=ef/dist=poisson
link=log type1 type3;
run;
proc genmod data=dd;
class f;
make 'obstats' out=outdata;
model d=f/dist=poisson link=log offset=lgn
type1 type3 obstats;
run;
proc print data=outdata;
run;
data k; setoutdata;
set dd;
rate=exp(xbeta);run;proc print;
run;