Discussion :

[Peacer]

Bonjour à tous,

J'étudie les déplacements entre villes. J'ai une table constituée de 3 colonnes : commune de départ ; commune d'arrivée, nombre de personne.

Ce que me fournit le tableau c'est donc :
- les flux (nombre de personne) de la commune 'A' vers les commune 'B', 'C', 'D'....
- les flux (nombre de personne) de la commune 'B' vers les commune 'A', 'C', 'D'....
- etc...

Ce que j'aimerai savoir c'est la somme : des personnes qui vont de 'A' vers 'B' + des personnes qui vont de 'B' vers 'A'.

Merci à tous.

[tanaka59]

Hello

Je serais d'avis de faire un tableau de contingence à double entrées. Si le couple entre deux lettre existe tu mets un clef qui correspond aux deux villes. Tu fais ensuite ta sommation par rapport à la clef.

Après cela dépend du nombre de ville. Si tu as 50 colonnes d'accord , si tu as 50 000 colonnes non SAS est limité à 1000 colonnes (de mémoire) .

En somme tu cherches à projeter tous les cas.

[Peacer]

J'ai 770 villes.
J'avais pensé à quelque chose comme ça :

Départ Arrivée Flux
A B 15
A C 12
A D 4
B A 23
B C 8
... etc

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
DATA flux_au;
INPUT depart $ arrivee $ flux;
CARDS;
A B 15
A C 12
A D 4
B A 23
B C 8
B D 3
C A 21
C B 16
;
RUN;
 
data flux_au2(rename= (flux=flux2 depart=depart2 arrivee=arrivee2)) ; set flux_au; run;
 
proc sql;
create table flux_au3 as
select a.*, b.*
from flux_au as a, flux_au2 as b where a.depart=b.arrivee2 and a.arrivee=b.depart2; quit;
 
data flux_au3; set flux_au3; fluxtot=flux+flux2; run;

Le problème c'est qu'il faut absolument dans ce cas que Si A -> B existe alors B-> A aussi (mm si c'est 0) car les 'D' sont exclus de ma table finale. Alors que dans ma table je n'ai pas toujours les deux cas de figure.

[hossward]

Bonjour,
C'est une solution sans SQL :

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
27
 
data flux ;
INPUT Depart $ Arrivee $ flux;
CARDS;
A B 15
A C 12
A D 4
B A 23
B C 8
B D 3
C A 21
C B 16
;
RUN;
 
%let Communes=('A', 'B') ;	
data somme_flux (keep=Dep_Arr somme) ;
 set flux  end=Fin ; 
 retain Dep_Arr ;
 if Depart   in &Communes then choix1=1 ; 
 if Arrivee  in &Communes then choix2=1 ; 
 if choix1 and choix2  then do ; 
    somme+flux ; 
    Dep_Arr=cats(Depart , '==> ', Arrivee, ' + ', Arrivee, '==> ', Depart) ;
	                    end ;
 if fin then output ;
run ;

Cordialement
Ward

[Peacer]

Cela fonctionne.
Merci pour votre aide
Cordialement.
Peacer