data d1;
input global local;
diff = global - local;
******************************;
* global = global grouping condition scores range from 350 to 671  *
* local = local grouping condition, scores range from 360 to 679   *
* diff variable created by subtracting the global condition from   * the local condition 								 *
*******************;
cards;
366 390
373 387
507 519
471 492
398 408
455 460
494 508
434 445
548 568
350 360
426 446
393 412
416 420
671 679
400 422
;
Proc means;
var global local;
proc means n mean stddev stderr t prt;
var diff;
proc ttest;
paired global:local;
run;

data d2;
input attract 11;
******************************;
* attract = attractiveness ratings ranging from 1 to 9
*******************;
cards;
          8
          3
          7
          6
          7
          8
          7
          3
          5
          5
          7
          5
          6
          3
          7
          6
          8
          7
          8
          7
          7
          5
          5
          8
          7
          7
          8
          5
          6
          7
          7
          7
          4
          4
          8
          7
          9
          6
          7
          5
          6
          4
          6
          7
          6
          8
          7
          7
          8
          7
          6
          5
          4
          5
          7
          4
          3
          7
          6
          8
          7
          7
          5
          5
          6
          8
          7
          9
          9
          7
          7
          5
          7
          8
          7
          7
          6
          5
          5
          8
          7
          3
          4
          6
          6
          7
          7
          7
          7
          6
          6
          6
          6
          7
          8
          3
          5
          5
          7
          6
          5
          8
          6
          7
          8
          8
          5
          7
          7
          7
          7
          6
          7
          8
          8
;
**proc ttest data=d2 H0=5;
**var attract;
run;

data d3;
input group anxiety;
cards;
1 30
1 35
1 45
1 40
1 50
1 35
1 55
1 25
1 30
1 45
1 40
1 50
2 40
2 35
2 50
2 55
2 65
2 55
2 50
2 35
2 30
2 50
2 60
2 39
;

data d4;
input reward tstscor;
*reward 1 = no reward
*reward 2 = reward;
cards;
1 63
1 55
1 54
1 49
1 65
1 46
1 53
1 67
1 58
1 50
2 71
2 37
2 38
2 62
2 65
2 58
2 63
2 69
2 70
2 61
;