请问如何进行以下数据转换

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

将以下数据
A1  B1 C1
A2  B2 C2
A3  B3 C3
A4  B4 C4
转换为
A1  B1 C1
A1  B1 C2
A1  B1 C3
A1  B1 C4
A1  B2 C1
A1  B2 C2
A1  B2 C3
A1  B2 C4
A1  B3 C1
A1  B3 C2
A1  B3 C3
A1  B3 C4
.
.
.
.
.

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏1 回帖

关键词：数据转换 如何

ding ........................

??????????????????

不懂呢................

第二列没有遍历到B4，所以你这个例子没有任何代表性。

直到B3终止，是前三个循环，还是倒数第二个终止，有很多说法的，所以终止条件不明确

data ty;
input x1 $ x2 $ x3 $;
cards;
A1  B1 C1
A2  B2 C2
A3  B3 C3
A4  B4 C4
;
run;
data ty1;
set ty;
drop x3;
run;
data ty2;
set ty;
keep x3;
run;
data ty3;
set ty1;
do i=1 to n;
set ty2 point=i nobs=n;
output;
end;
run;
不知这个可以不

呵呵，刚才没看明白，抱歉，上面的不对

data ty;
input x1 $ x2 $ x3 $;
cards;
A1  B1 C1
A2  B2 C2
A3  B3 C3
A4  B4 C4
;
run;
data a;
set ty;
keep x1;
run;
data b;
set ty;
keep x2;
run;
data c;
set ty;
keep x3;
run;
data ty4;
set a;
do j=1 to m;
set b point=j nobs=m;
do i=1 to n;
set ty2 point=i nobs=n;
output;
end;
end;
run;
又写了个，不过感觉太麻烦了，还请高人写个简单的。

data crackman;
input a $ b $ c$ @;
call symput("A"||left(_n_),a);
call symput("B"||left(_n_),b);
call symput("C"||left(_n_),c);
cards;
A1  B1 C1
A2  B2 C2
A3  B3 C3
A4  B4 C4
;
run;
%macro crackman;
data crackman;
%do i=1 %to 4;
a="&&A&i.";
       %do j=1 %to 4;
          b="&&B&j.";
            %do k=1 %to 4;
            c="&&C&k.";
            output;
            %end;
          output;
       %end;
output;
%end;
run;
%mend crackman;
%crackman;

o ,shi biancheng a