Restructuring a sas datase

[dpine4]

How do I creatae a new sas dataset from one like the following:

HAVE:

x1	x2	x3	y1	y2	y3	y4
a	b	c	33.7	29.2	34.4	31.4

WANT:

x1	x2	x3	y
a	b	c	33.7
a	b	c	29.2
a	b	c	34.4
a	b	c	31.4

[novinosrin]

data have;
input (x1	x2	x3) ($)	y1	y2	y3	y4;
cards;
a	b	c	33.7	29.2	34.4	31.4
;

proc transpose data=have out=want(drop=_name_ rename=col1=y);
by x1-x3;
var y1-y4;
run;

 

[r_behata · Accepted solution]

data have;
input x1 $	x2	$ x3 $	y1	y2	y3	y4;
cards;
a b c 33.7 29.2 34.4 31.4
run;

data want;
	set have;

	array _y[*] _numeric_;

	do _n_= 1 to dim(_y);
		y=_y[_n_]; output;
	end;

	drop y1 - y4;
run;

[dpine4]

THANK YOU!