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 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118
| /*****************************************/
/* Construction Etude fiche signalétique */
/*****************************************/
%macro compar(var,var2) ;/*var =secteur
var2 =enseigne*/
/* choix de l'étude
_modifier variable d'étude (1)*/
data tableETUDE (keep=numind cle vague poids agec5 pcsc8 statfc npf stat
revenu aglo5 uda8 /*rajouter var */&var. &var2./*(1)*/);
set donnees.foyer1_dfile (where=(vague=4));
run;
/*ajout de la variable popfr permettant la comparaison avec l'autre pop */
/*etude*/
data tableETUDE ;set tableETUDE ;
attrib popfr label = "popfr" format = 8. ;popfr =1 ;
run ;
/***********************************************/
/*création de la table contenant les résultats */
/***********************************************/
proc means data= tableETUDE nway noprint ;
var popfr / weight = poids ;
class agec5 pcsc8 statfc npf stat revenu aglo5 uda8 ;
/*rajout de variables possibles*/
output out = popstatfr (drop = _type_ _freq_) sum= ;
run;
/*ajout d'une variable num afin de faciliter la concaténation des 3 tables */
data popnumfr ;
set popstatfr ;
attrib num
label="numéro" ;
num=_N_ ;
run ;
/*création de la table contenant les résultats secteur*/
proc means data= tableETUDE nway noprint;
var &var. / weight = poids ;
class agec5 pcsc8 statfc npf stat revenu aglo5 uda8 ;
/*c'est à cet endroit qu'il faut rajouter des var*/
output out = popstat&var. (drop = _type_ _freq_) sum= ;
run ;
/*ajout d'une variable num afin de faciliter la concaténation des 3 tables */
data popnum&var. ;
set popstat&var. ;
attrib num
label="numéro" ;
num=_N_ ;
run ;
/*création de la table contenant les résultats pour l'enseigne*/
proc means data= tableETUDE nway noprint;
var &var2. / weight = poids ;
class agec5 pcsc8 statfc npf stat revenu aglo5 uda8 ;
/*c'est à cet endroit qu'il faut rajouter des var*/
output out = popstat&var2. (drop = _type_ _freq_) sum= ;
run ;
/*ajout d'une variable num afin de faciliter la concaténation des 3 tables */
data popnum&var2. ;
set popstat&var2. ;
attrib num
label="numéro" ;
num=_N_ ;
run ;
/*concaténation des résultats obtenus par les proc means*/
data poptot ;
merge popnum&var.
popnum&var2.
popnumfr ;
by num ;
run ;
/***********************************************/
/* construction des tableaux de comparaisons */
/***********************************************/
/*TABLEAU SOCIO-DEMO*/
proc tabulate data = poptot out= socio;
class agec5 pcsc8 statfc npf stat revenu aglo5 uda8 ;
/*c'est à cet endroit qu'il faut rajouter des var*/
var popfr &var. &var2.;
table (agec5 pcsc8 statfc npf stat revenu aglo5 uda8),( popfr &var. &var2.)*pctsum ;
run ;
%compar (var=m_p3_1,var2=m_p3_5) ;/**/
/*chemin de sortie vers le fichier Excel*/
Libname bureau 'C:\Documents and Settings\Donan\Bureau';
/***********************************************/
/* intégration des données sas sous Excel */
/***********************************************/
dm "winexecfile ""C:\Documents and Settings\Donan\Bureau\code1.xls"" ";
/*export tableau socio*/
Filename PSD dde 'excel|[code.xls]PSD!l11c6:l55000c8';
data PSD;
file PSD;
set socio ;
put popfr_PctSum_00000000 m_p3_1_PctSum_00000000 m_p3_5_PctSum_00000000 ;
run; |
Partager