求助，多次整除并重新编号

jzl543098871 发表于 2020-7-13 15:35
提示这个
MPRINT(LASTONE):   ? ? ? ? ? ? ? ? run;
NOTE: 由调用宏“LASTONE”生成行。

我这边程序运行没有问题

jg.sas 发表于 2020-7-13 15:49
我这边程序运行没有问题

跑出来咋是33，我寻思应该是32啊，是我理解不对吗

jg.sas 发表于 2020-7-13 15:49
我这边程序运行没有问题

还有，请教下，假如单数出列改为双数出列，那么除了mod（_n_,2）=0还有其他地方要改吗？

%do %until(&obsno=2 or &obsno=3);这句是直到变量的值为2或3，循环停止对吗？

n是观测值数量吗？怎么就出来了啊，前面句子也没提，就直接用了

jzl543098871 发表于 2020-7-13 16:08
跑出来咋是33，我寻思应该是32啊，是我理解不对吗

mod（_n_,2）=0改为0应该就可以了

jzl543098871 发表于 2020-7-13 16:21
还有，请教下，假如单数出列改为双数出列，那么除了mod（_n_,2）=0还有其他地方要改吗？

%do %until( ...

判断最后的数据集个数是不是最后一轮了，如果是最后一轮就把那个数选出来

jzl543098871 发表于 2020-7-13 16:21
还有，请教下，假如单数出列改为双数出列，那么除了mod（_n_,2）=0还有其他地方要改吗？

%do %until( ...

_n_是SAS内置变量，就是obs序号

jg.sas 发表于 2020-7-13 16:27
判断最后的数据集个数是不是最后一轮了，如果是最后一轮就把那个数选出来

好的，谢谢指导，我寻思应该是修改最后if _N_=1，得出来的倒是1

不过我还没吃透，在研究下

1. MPRINT(LASTONE):   data test;
   
2. MPRINT(LASTONE):   do aa= 1 to 50;
   
3. MPRINT(LASTONE):   output;
   
4. MPRINT(LASTONE):   end;
   
5. MPRINT(LASTONE):   run;
   
6. 
   
7. NOTE: The data set WORK.TEST has 50 observations and 1 variables.
   
8. NOTE: DATA statement used (Total process time):
   
9.       real time           0.00 seconds
   
10.       cpu time            0.00 seconds
    
11.       
    
12. 
    
13. MPRINT(LASTONE):   data test;
    
14. MPRINT(LASTONE):   set test;
    
15. MPRINT(LASTONE):   if mod(_n_,2)=0 then output;
    
16. MPRINT(LASTONE):   run;
    
17. 
    
18. NOTE: There were 50 observations read from the data set WORK.TEST.
    
19. NOTE: The data set WORK.TEST has 25 observations and 1 variables.
    
20. NOTE: DATA statement used (Total process time):
    
21.       real time           0.00 seconds
    
22.       cpu time            0.00 seconds
    
23.       
    
24. 
    
25. MPRINT(LASTONE):   data _null_;
    
26. MPRINT(LASTONE):   set test nobs=count;
    
27. MPRINT(LASTONE):   call symput('obsno',left(put(count,8.)));
    
28. MPRINT(LASTONE):   stop;
    
29. MPRINT(LASTONE):   run;
    
30. NOTE: There were 1 observations read from the data set WORK.TEST.
    
31. NOTE: DATA statement used (Total process time):
    
32.       real time           0.00 seconds
    
33.       cpu time            0.00 seconds
    
34.       
    
35. 
    
36. MPRINT(LASTONE):   data test;
    
37. MPRINT(LASTONE):   set test;
    
38. MPRINT(LASTONE):   if mod(_n_,2)=0 then output;
    
39. MPRINT(LASTONE):   run;
    
40. 
    
41. NOTE: There were 25 observations read from the data set WORK.TEST.
    
42. NOTE: The data set WORK.TEST has 12 observations and 1 variables.
    
43. NOTE: DATA statement used (Total process time):
    
44.       real time           0.00 seconds
    
45.       cpu time            0.01 seconds
    
46.       
    
47. 
    
48. MPRINT(LASTONE):   data _null_;
    
49. MPRINT(LASTONE):   set test nobs=count;
    
50. MPRINT(LASTONE):   call symput('obsno',left(put(count,8.)));
    
51. MPRINT(LASTONE):   stop;
    
52. MPRINT(LASTONE):   run;
    
53. NOTE: There were 1 observations read from the data set WORK.TEST.
    
54. NOTE: DATA statement used (Total process time):
    
55.       real time           0.00 seconds
    
56.       cpu time            0.00 seconds
    
57.       
    
58.                                                            The SAS System
    
59. 
    
60. 
    
61. MPRINT(LASTONE):   data test;
    
62. MPRINT(LASTONE):   set test;
    
63. MPRINT(LASTONE):   if mod(_n_,2)=0 then output;
    
64. MPRINT(LASTONE):   run;
    
65. 
    
66. NOTE: There were 12 observations read from the data set WORK.TEST.
    
67. NOTE: The data set WORK.TEST has 6 observations and 1 variables.
    
68. NOTE: DATA statement used (Total process time):
    
69.       real time           0.00 seconds
    
70.       cpu time            0.00 seconds
    
71.       
    
72. 
    
73. MPRINT(LASTONE):   data _null_;
    
74. MPRINT(LASTONE):   set test nobs=count;
    
75. MPRINT(LASTONE):   call symput('obsno',left(put(count,8.)));
    
76. MPRINT(LASTONE):   stop;
    
77. MPRINT(LASTONE):   run;
    
78. NOTE: There were 1 observations read from the data set WORK.TEST.
    
79. NOTE: DATA statement used (Total process time):
    
80.       real time           0.00 seconds
    
81.       cpu time            0.00 seconds
    
82.       
    
83. 
    
84. MPRINT(LASTONE):   data test;
    
85. MPRINT(LASTONE):   set test;
    
86. MPRINT(LASTONE):   if mod(_n_,2)=0 then output;
    
87. MPRINT(LASTONE):   run;
    
88. 
    
89. NOTE: There were 6 observations read from the data set WORK.TEST.
    
90. NOTE: The data set WORK.TEST has 3 observations and 1 variables.
    
91. NOTE: DATA statement used (Total process time):
    
92.       real time           0.00 seconds
    
93.       cpu time            0.01 seconds
    
94.       
    
95. 
    
96. MPRINT(LASTONE):   data _null_;
    
97. MPRINT(LASTONE):   set test nobs=count;
    
98. MPRINT(LASTONE):   call symput('obsno',left(put(count,8.)));
    
99. MPRINT(LASTONE):   stop;
    
100. MPRINT(LASTONE):   run;
     
101. NOTE: There were 1 observations read from the data set WORK.TEST.
     
102. NOTE: DATA statement used (Total process time):
     
103.       real time           0.00 seconds
     
104.       cpu time            0.00 seconds
     
105.       
     
106. 
     
107. MPRINT(LASTONE):   data lastone;
     
108. MPRINT(LASTONE):   set test;
     
109. MPRINT(LASTONE):   if _n_=2;
     
110. MPRINT(LASTONE):   run;
     
111. 
     
112. NOTE: There were 3 observations read from the data set WORK.TEST.
     
113. NOTE: The data set WORK.LASTONE has 1 observations and 1 variables.
     
114. NOTE: DATA statement used (Total process time):
     
115.       real time           0.00 seconds
     
116.       cpu time            0.00 seconds

复制代码

jg.sas 发表于 2020-7-13 17:01

我去跑了下，这种就是没写循环一步一步来的，请问前面加%的和没%有什么区别呢

这种不带宏的应该也可以写成循环吧？