%mktbibd(b=10, t=5, k=3, seed=104)

proc print data=incidence noobs;
run;

proc print data=factorial(obs=9) noobs;
run;

%mktbibd(b=14, t=7, k=4, options=neighbor, seed=104)

%mktbibd(b=14, t=7, k=4, options=serial, seed=361699)

%mktbibd(b=14, t=7, k=4, options=serial, seed=104)

%mktbibd(b=7, t=7, k=4, options=serial, seed=104)