data;
infile 'z:\stat706\tobacco.dat' dlm='09'X missover;
input county $ farm yield;
proc glm;
class county farm;
model yield=county farm(county);
random farm(county)/test;
run;