data hotdog ; input meat $ salt taste ; meatsalt = 2*(meat = 'chic') +salt ; cards ; beef 1 7.75 beef 1 8.25 beef 2 8.25 beef 2 8.75 chic 1 6.25 chic 1 6.75 chic 2 8.25 chic 2 7.75 ; proc print data = hotdog ; run ; * Analysis with one-way ANOVA and contrasts ; proc glm data = hotdog ; class meatsalt ; model taste = meatsalt ; contrast 'meat main effect' meatsalt 1 1 -1 -1 ; contrast 'salt main effect' meatsalt 1 -1 1 -1 ; contrast 'meat-salt interaction' meatsalt 1 -1 -1 1 ; run ; * Two-way ANOVA ; proc glm data = hotdog ; class meat salt ; model taste = meat salt meat*salt ; run ;