Discussion :

[bab22]

Bonjour,

J'ai une table avec des villes et des tarifs. Je voudrais créer des listes qui m'indiquent quelles villes ont les mêmes tarifs.

Exemple de table

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
data   test;
format ville $1. tarif best12.;
input ville tarif;
cards;
A	1
B	2
C	1
D	2
E	2
run;

Je voudrais avoir en résultat :
liste1 = A, C
liste2 = B, D, E

Merci.

[edward carnby]

Bonjour,

A adapter en fonction du besoin ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
%macro test;
 
proc sql;
	create table test2 as select distinct tarif
	from test;
quit;
 
data _null_;
set test2;
call symputx('tarif'||left(_n_),tarif);
call symputx('nbtarif',_N_);
run;
 
%do i=1 %to &nbtarif;
proc sql;
	select distinct ville into :liste&i separated by ','
	from test where tarif=&&tarif&i;
quit;
%end;
 
%mend;
%test

[s_a_m]

Hello;
Je te propose une solution avec transpose. Mais tu peux le faire aussi avec une simple étape DATA + By (calcule par groupes).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
 
DATA   test;
format ville $1. tarif best12.;
input ville tarif;
cards;
A	1
B	2
C	1
D	2
E	2
;
run;
 
proc sort ; by tarif;
run;
 
proc transpose data= test out=temp(drop=_name_);
by tarif;
var ville;
run; 
 
data finale (drop= col:);
set temp;
list=catx( ',',of col:);
run;

[bab22]

Merci Edward, c'est parfait

[bab22]

Et merci Samir.