libname ecns "C:\Users\anton.bekkerman\Desktop\Dropbox\Classes\ECNS561\Marbles 2012";

/* Devise t-tests in SAS */

/* One sided: Test if guess is greater than 20*/
proc ttest data=ecns.marbles h0=20 sides=u alpha=0.05;
var guess;
run;

/* Two sided: Test if guess is equal to the true value 66*/
proc ttest data=ecns.marbles h0=66 sides=2 alpha=0.10;
var guess;
run;

/* Test if biased group's guess is different from unbiased */
proc ttest data=ecns.marbles sides=2 alpha=0.10;
class bias;
var guess;
run;