data plants; input Type $ @; do Block = 1 to 3; input StemLength @; output; end; datalines; Clarion 32.7 32.3 31.5 Clinton 32.1 29.7 29.1 Knox 35.7 35.9 33.1 O'Neill 36.0 34.2 31.2 Compost 31.8 28.0 29.2 Wabash 38.2 37.8 31.9 Webster 32.5 31.1 29.7 ; ods graphics off; proc glm; class Block Type; model StemLength = Block Type; means Type / waller regwq; ods select mclines; quit; ods graphics on; proc glm; class Block Type; model StemLength = Block Type; means Type / waller regwq; ods select linesplot; quit;