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
| /* -------------------------------------------------------------------
Code généré par une tâche SAS
Généré le : vendredi 31 août 2012 à 12:11:41
Par tâche : Nuage de points
Données d'entrée : WORK.INPUT
Serveur : EQSApp
------------------------------------------------------------------- */
data WORK.INPUT;
informat Produit $10.;
input Produit $ Nbdeproduits Secteur;
cards4;
Produit1 7 1
Produit2 8 1
Produit3 12 1
Produit4 30 1
Produit5 9 2
Produit6 18 2
Produit7 24 2
Produit8 14 3
Produit9 21 3
Produit10 30 3
;;;;
run;
/* -------------------------------------------------------------------
Trier la table WORK.INPUT
------------------------------------------------------------------- */
PROC SQL;
CREATE VIEW WORK.SORTTempTableSorted AS
SELECT T.Secteur,T.Produit, T.Nbdeproduits
FROM WORK.INPUT as T
;
QUIT;
SYMBOL1
INTERPOL=NONE
HEIGHT=10pt
VALUE=CIRCLE
LINE=1
WIDTH=2
CV = _STYLE_
;
Axis1
STYLE=1
WIDTH=1
MINOR=NONE
;
Axis2
STYLE=1
WIDTH=1
MINOR=NONE
;
TITLE;
TITLE1 "Nuage de points";
FOOTNOTE;
DATA WORK._HTMLDATA_;
SET WORK.SORTTempTableSorted;
length myhtml $1000;
myhtml='alt='|| quote(
'Secteur:' ||Secteur||'0D'x || 'Produit:' ||Produit||'0D'x || 'Nbdeproduits:' ||Nbdeproduits||'0D'x
);
PROC GPLOT DATA=WORK._HTMLDATA_
;
PLOT Nbdeproduits * Secteur /
VAXIS=AXIS1
HAXIS=AXIS2
FRAME html=myhtml
;
/* -------------------------------------------------------------------
Fin du code de la tâche.
------------------------------------------------------------------- */
RUN;
QUIT;
TITLE;
FOOTNOTE;
GOPTIONS RESET = SYMBOL; |
Partager