data lotions ;
input value  ;
datalines ;
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1  
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
-1 
0 
0 
0 
0 
0
;
run ;

proc univariate data = lotions ;
var value ;
run ;

                                                     Tests for Location: Mu0=0
 
                                          Test           -Statistic-    -----p Value------

                                          Student's t    t  0.628187    Pr > |t|    0.5331
                                          Sign           M         2    Pr >= |M|   0.6358
                                          Signed Rank    S        41    Pr >= |S|   0.5339