Pratique de Sas Windows ...9.3 Volume 2 - Ined

On reprend donc notre programme là où nous l’avions laissé :
ods graphics/ height=26cm width=15cm;*refline 22.7;
proc sgscatter data=graphique tmplout="d:\notes\test\sgscattersymbol.sas";
plot classval0 * ppct /group=variable columns=1 rows=10 uniscale=x join grid
markerattrs=(symbol=square) ;
format variable $intitule.;
run;
Mais en capturant le code GTL caché derrière le code de la sgscatter, je récupère du code GTL sans devoir en
écrire et découvre l’instruction unique SeriesPlot
proc template;
define statgraph sgscatter;
begingraph / designwidth=640 designheight=640;
EntryTitle "Probabilités estimées en % " /;
layout gridded;
layout lattice / pad=(top=5) rowgutter=10 columngutter=10 columns=1
columnDataRange=unionall;
layout overlay / xaxisopts=( griddisplay=on) yaxisopts=( griddisplay=on);
SeriesPlot X=ppct Y=classval0 /
primary=true display=(markers) CONNECTORDER=XAXIS
Group=variable Markerattrs=(Symbol=SQUARE) NAME="PLOT";
endlayout;
endlayout;
DiscreteLegend "PLOT" / order=rowmajor title="variable";
endlayout;
endgraph;
end;
run;
Mais c’est l’impasse avec une seule instruction de tracé plot en sg ou seriesplot en gtl, car nous ne
disposons pas des moyens suffisants pour arriver à nos fins.
Comme nous devrons probablement sacrifier la légende avec des noms de variables dans une publication (de
format A4), nous devons d’abord insérer cette information en entrecoupant la liste des modalités par ces noms
placés au bon endroit : d’où la création de la variable nord (pour ne pas le perdre ) dans la table graphique.
data graphsan;
length var mod $ 37;
set graphique; by notsorted variable;
var=put(variable,$intitule.);
mod=classval0;
if first.variable then output;
output;
run;
data grapsan;
set graphsan; by notsorted variable;
if first.variable then do;
mod=upcase( var);
ppct=.;
vp='';
nord=.;
end;
else var='';
if vp='- ' then vp="Ns ";
run;
…
:::::: ::::::
Nous disposons maintenant d’une variable mod complète et d’un vp avec la modalité "Ns" pour non-significatif.
Le format $intitule. précédent a été remanié pour raccourcir les intitulés trop longs pour ce type de graphique.
163 INED Service Informatique Wielki