菜鸟求助！

shiyiming

数据 s= 0 0 0 1 0 0 0 1 0 1，其中 0，1表示状态，相邻状态如果相同，算一个状态。如何求状态总个数。如 0 0 0，1，0 0 0，1 ，0，1分别算一个状态，那么总的状态数就为6。如何编程，请教各位大侠

shiyiming

[code:3hdb7040]data _temp_;
input s @@;
cards;
0 0 0 1 0 0 0 1 0 1
;run;
data _temp2_;
set _temp_;
if s ne lag(s) then  status+1 ;run;[/code:3hdb7040]
不知道合不合你的要求？

shiyiming

符合要求，谢谢，我刚刚开始学SAS，以后还要向你们学习

shiyiming

瞎写一个
[code:3nvee612]data temp;
        input s $ 1-19;
        x=input(compress(s),binary10.);
        x=bor(bxor(x,blshift(x,1)),1);
        x=count(put(x,binary10.),'1');
datalines;
0 0 0 1 0 0 0 1 0 1
1 0 0 1 0 0 0 0 0 0
0 1 0 0 1 0 0 1 0 1
1 0 0 1 1 0 1 1 0 1
0 1 0 0 0 1 0 0 0 0
1 0 0 1 0 0 0 1 0 1
;[/code:3nvee612]

shiyiming

to hopewell
这个程序对我有点难，可以解释下么，谢谢了

shiyiming

[code:5fnwt393]data ahuige;
   input s $ 1-10;
   x=20-length(tranwrd(s,'01',','))-length(tranwrd(s,'10',','))+1;
datalines;
0001000101
1001000000
0100100101
1001101101
0100010000
1001000101
;
run;[/code:5fnwt393]
楼上华丽丽的位操作啊位操作

shiyiming

<!-- s:D --><img src="{SMILIES_PATH}/icon_biggrin.gif" alt=":D" title="Very Happy" /><!-- s:D -->

shiyiming

Mark