data步的简单循环问题，谢谢

data yy;
input x y;
cards;
1 0
2 0.4
3 1.1
4 1.3
5 1.4
6 1.1
7 0.9
8 1.1
9 0.4
10 0.8
;run;
元数据如上： 当y大于1时，买入；一旦买入后，持有至Y小于0.5或者大于1.5才卖出，
我想在set数据集的时候，再加一列c，作为判断，比如“Buy”或“sell”

请高手帮我解决，要求是在data步内的循环，如：
data xx;
do x=1 to 202;
set yy;
if Y>1 then do;c="buy";output;end;
.....

我想到的是结合goto语句，但是做恶劣半天都不行～

我也看不懂...

1. data yy;
   
2. input x y;
   
3. cards;
   
4. 1 0
   
5. 2 0.4
   
6. 3 1.1
   
7. 4 1.3
   
8. 5 1.4
   
9. 6 1.1
   
10. 7 0.9
    
11. 8 1.1
    
12. 9 0.4
    
13. 10 0.8
    
14. ;run;
    
15. 
    
16. 
    
17. data xx;
    
18. length c $4;
    
19. set yy;
    
20. retain s 0;
    
21. if s=0 then do;
    
22.   if y>1 then do;
    
23.   c="buy";
    
24.   s=1;
    
25.   end;
    
26.   else c="no";
    
27. end;
    
28. else do;
    
29.   if y<0.5 or y>1.5 then do;
    
30.   c="sell";
    
31.   s=0;
    
32.   end;
    
33.   else c="yes";
    
34. end;
    
35. drop s;
    
36. run;

复制代码

c="buy" means we buy now
c="sell" means we sell now
c="yes" means we have it
c="no" means we dont have it

向ls大牛学习，对循环语句和retain的用法有了更深的认识

zhangzachary 发表于 2011-9-13 23:52
c="buy" means we buy now
c="sell" means we sell now
c="yes" means we have it

你好，你的语句可以实现目前的功能，但是你所有的IF 和 Else If都处在一个数据行上，
我其实后面的判断条件还有好几个，如果写很多个IF Else的话不现实，而且If的条件有时还要用到上一行的状态

，我想实现的是：
根据第一行判断，if。。。then。。。,如果合适了跳至下一行，所有想用goto解决
如：

data xx;
set yy;
if Y>1 then do;
                      c="买";goto jj;output;
                 end;
jj: if (y>1.5 or y<0.5) then  do;
                     c="平仓";end;
         else c="持有";                    
.....
我的意思是，这样一行一行的判断下去，。。。但是对SAS的DATA步里面的Goto，循环还不是很清楚，请高手指点～～

sun5008 发表于 2011-9-14 08:49
你好，你的语句可以实现目前的功能，但是你所有的IF 和 Else If都处在一个数据行上，
我其实后面的判断 ...

其实程序可以优化的......
比如认为if else比较麻烦，可以用if then do然后return end；这样就可以分别对各种条件进行判别:

1. data xx;
   
2. length c $4;
   
3. set yy;
   
4. retain s 0;
   
5. if s=0 then do;
   
6.   if y>1 then do;
   
7.   c="buy";
   
8.   s=1;
   
9.   end;
   
10.   else c="no";
    
11.   return;
    
12. end;
    
13. if s=1 then do;
    
14.   if y<0.5 or y>1.5 then do;
    
15.   c="sell";
    
16.   s=0;
    
17.   end;
    
18.   else c="yes";
    
19.   return;
    
20. end;
    
21. drop s;
    
22. run;

复制代码

sun5008 发表于 2011-9-14 08:49
你好，你的语句可以实现目前的功能，但是你所有的IF 和 Else If都处在一个数据行上，
我其实后面的判断 ...

一般程序都尽量避免goto语句的，而且像这类的程序也不需要用goto... 当然这得需要大牛来帮忙，一般用得到goto的都不是一般人

要不提供下更多的细节吧，就这点要求的话楼上的代码很好啊

goto 不是 必须的

1. data yy;
   
2. input x y;
   
3. cards;
   
4. 1 0
   
5. 2 0.4
   
6. 3 1.1
   
7. 4 1.3
   
8. 5 1.6
   
9. 6 1.1
   
10. 7 0.9
    
11. 8 1.1
    
12. 9 0.4
    
13. 10 0.8
    
14. ;run;
    
15. 
    
16. data xx;
    
17. length c $4;
    
18. set yy;
    
19. *没买或者之前已经卖掉的股票，如果涨幅大于1，则买入;
    
20. if c = '' or c = 'sell' then
    
21.         do;
    
22.                 if y > 1 then c = 'buy';
    
23.         end;
    
24. *买入的股票，根据设定卖出;
    
25. else if c = 'buy' then
    
26.         do;
    
27.                 if y < 0.5 or y > 1.5 then c = 'sell';
    
28.         end;
    
29. run;

复制代码