c*******7
发帖数: 2506 | 1 原始数据的格式：
a b c d e
7 3 4 6 9
f g h i j
10 3 23 4 6
需要通过sas读入成下面的layout：
a 7
b 3
c 4
d 6
e 9
f 10
g 3
h 23
i 4
j 6 |
b*******g
发帖数: 513 | 2 proc transpose?anyway, i do not know.
【在 c*******7 的大作中提到】
: 原始数据的格式：
: a b c d e
: 7 3 4 6 9
: f g h i j
: 10 3 23 4 6
: 需要通过sas读入成下面的layout：
: a 7
: b 3
: c 4
: d 6
|
y****n
发帖数: 46 | 3 data newc(rename=(value=cvalue)) newn(rename=(value=nvalue)) ;
input value $ @@;
if ANYALPHA(value) ne 0 then output newc;
else output newn;
cards;
a b c d e
7 3 4 6 9
f g h i j
10 3 23 4 6
;
run;
data new;
merge newc newn;
run;
【在 c*******7 的大作中提到】
: 原始数据的格式：
: a b c d e
: 7 3 4 6 9
: f g h i j
: 10 3 23 4 6
: 需要通过sas读入成下面的layout：
: a 7
: b 3
: c 4
: d 6
|
p********a
发帖数: 5352 | 4 data test;
input v1 $ v2 $ v3 $ v4 $ v5 $;
datalines;
a b c d e
7 3 4 6 9
f g h i j
10 3 23 4 6
run;
data test1(keep=var1 var2);
retain n1 n2 n3 n4 n5 '';
set test;
array nn(5) n1-n5;
array vv(5) v1-v5;
if mod(_N_,2)=1 then do;
n1=v1;n2=v2;n3=v3;n4=v4;n5=v5;
end;
else if mod(_N_,2)=0 then do;
do i=1 to 5;
var1=nn(i);var2=vv(i); output;
end;
end;
run;
proc print;
run; |
D******n
发帖数: 2836 | 5 data new(drop =nvalue);
merge newc newn;
value = input(nvalue,best4.);
run;
【在 y****n 的大作中提到】
: data newc(rename=(value=cvalue)) newn(rename=(value=nvalue)) ;
: input value $ @@;
: if ANYALPHA(value) ne 0 then output newc;
: else output newn;
: cards;
: a b c d e
: 7 3 4 6 9
: f g h i j
: 10 3 23 4 6
: ;
|
D******n
发帖数: 2836 | 6 cat rawdata| sed -n '1~2p' |tr ' ' '\n' >1.txt
cat rawdata| sed -n '2~2p' |tr ' ' '\n' >2.txt
paste 1.txt 2.txt > output.txt
【在 c*******7 的大作中提到】
: 原始数据的格式：
: a b c d e
: 7 3 4 6 9
: f g h i j
: 10 3 23 4 6
: 需要通过sas读入成下面的layout：
: a 7
: b 3
: c 4
: d 6
|
