*------- Effect of Sweetness of Reward on Running Speed ----------;
 
Title 'Sucrose Data: Speed to traverse a Runway';
data sucrose;
     label SUGAR = 'Sucrose Concentration (%)'
           SPEED = 'Speed in Runway (ft/sec)';
     input SUGAR @ ;
     do SUBJECT = 1 to 8;
        input SPEED @;
        output;
        end;
cards;
 8   1.4 2.0 3.2 1.4 2.3 4.0 5.0 4.7
16   3.2 6.8 5.0 2.5 6.1 4.8 4.6 4.2
32   6.2 3.1 3.2 4.0 4.5 6.4 4.5 4.1
64   5.8 6.6 6.5 5.9 5.9 3.0 5.9 5.6
;