/ * méthode appliquée de p-spline * /
/ * 1ère étape: charger et ouvrir les données * /
% web_drop_table (WORK.arwa);
REFFILE DE NOM DE FICHIER 'D: /Rdata/arwanew.xlsx';
PROC IMPORT DATAFILE = REFFILE dbms = xlsx
out = work.arwa; getnames = yes;
courir;
PROC CONTENTS DATA = WORK.arwa;
courir;
% web_open_table (WORK.arwa);
/ * première méthode spline pénalisée * /
proc transreg data = WORK.arwa;
identité du modèle (yi) = pbspline (xi); / * Critère AICC * /
courir;
proc loess data = WORK.arwa;
modèle yi = xi;
courir;
/ * deuxième méthode de spline pénalisée * /
proc tpspline data = WORK.arwa;
modèle yi = (xi);
courir;
/ * résultats du tracé * /
proc sgplot data = WORK.arwa;
pbspline x = xi y = yi;
loess x = xi y = yi / nomarkers; / * utilise l'option PRESEARCH * /
courir;
