******************************
* Program: tomato.sas :
* Author: Joshua M. Tebbs :
* Date: 30 October 2005 :
* Example 7.9 (notes) :
******************************
 
* PROC TTEST is a simple way to perform two-sample t tests
* (pooled or unpooled);
 
options ps=60 ls=80 pageno=1 formdlim='_' nodate;
 
data tomato;
input fert $ yield @@;
cards;
a 26.7 a 17.9 a 21.1 a 15.5 a 18.8
b 28.6 b 25.7 b 29.5 b 19.1 b 19.7 b 24.3
;
 
proc print data=tomato;
title 'yield data from two fertilizers';
run;
 
proc ttest data=tomato;
class fert;
var yield;
title 'hypothesis test for difference in mean yield';
run;