求问如何判断大小的问题

请教个问题     如何判断数据集中   对于每个x的取值    当y取值为1,2,3的时候 z的值都是变大的    而对于当y相同的值，当x取1,2,3的时候，z的取值也是变大的   。如果成立的话   ，就输出一个%let x=1;把   否则输出x=0.

data a;
input x y z;
cards;
1 1 12
1 2 15
1 3 18
2 1 13
2 2 19
2 3 20
3 1 16
3 2 20
3 3 22
;
run;

看看下面的代码好用不？

1. data a;
   
2. input x y z;
   
3. cards;
   
4. 1 1 12
   
5. 1 2 15
   
6. 1 3 18
   
7. 2 1 13
   
8. 2 2 19
   
9. 2 3 20
   
10. 3 1 16
    
11. 3 2 20
    
12. 3 3 22
    
13. ;
    
14. run;
    
15. 
    
16. /* 对于每个x的取值，检查当y取值为1,2,3的时候，z的值都是变大的 */
    
17. proc sort data=a;
    
18.         by x y;
    
19. run;
    
20. 
    
21. data a;
    
22.         set a;
    
23.         by x;
    
24.         diff_1=z-lag(z);
    
25.         if first.x then diff_1=0;
    
26. run;
    
27. 
    
28. /* 对于每个y的取值，检查当x取值为1,2,3的时候，z的值都是变大的 */
    
29. proc sort data=a;
    
30.         by y x;
    
31. run;
    
32. 
    
33. data a;
    
34.         set a;
    
35.         by y;
    
36.         diff_2=z-lag(z);
    
37.         if first.x then diff_2=0;
    
38. run;
    
39. 
    
40. /* 输出结果 */
    
41. %let x=1;
    
42. 
    
43. data a;
    
44.         set a;
    
45.         if diff_1 < 0 or diff_2 <0 then call symputx('x',0);
    
46. run;
    
47. 
    
48. %put x=&x;

复制代码

看了一眼 没有搞懂什么意思。。。

fisher163 发表于 2014-10-7 05:30
看了一眼 没有搞懂什么意思。。。

对于每组x的取值，当y取123的时候，z是变大的。对于每组y的取值，当x取123的时候，z也是变大的