options ls=80;

data a;
input x1 @@;
cards;
12 9 8 7 15 21 16 18 10
;
proc sort data=a;by x1;

data b; set a; x2=x1-10;

proc print data=b;
proc univariate data=b;
 var x2;


data c;
input method $ x @@;
cards;
a 51 a 42 a 45 a 48 a 52 a 44 a 58 a 41 a 52 a 44 a 45 a 52 a 61 a 60 a 41
b 40 b 47 b 36 b 39 b 37 b 46 b 43 b 55 b 53 b 56
;
proc npar1way data=c wilcoxon;
 class method;

data d;
input group $ x @@;
cards;
1 262 1 307 1 211 1 323 1 454 1 339 1 304 1 154 1 287 1 356
2 465 2 501 2 455 2 355 2 468 2 362
3 343 3 772 3 207 3 1048 3 838 3 687
;

proc npar1way data=d wilcoxon;
 class group;