/ * metodo applicato di p-spline * /
/ * 1 ° passaggio: carica e apri dati * /
% Web_drop_table (WORK.arwa);
FILENAME REFFILE 'D: /Rdata/arwanew.xlsx';
PROC IMPORT DATAFILE = REFFILE dbms = xlsx
out = work.arwa; getNames = yes;
correre;
PROC INDICE DATI = WORK.arwa;
correre;
% Web_open_table (WORK.arwa);
/ * primo metodo spline penalizzato * /
proc transreg data = WORK.arwa;
identità del modello (yi) = pbspline (xi); / * Criterio AICC * /
correre;
proc loess data = WORK.arwa;
modello yi = xi;
correre;
/ * secondo metodo spline penalizzato * /
proc tpspline data = WORK.arwa;
modello yi = (xi);
correre;
/ * risultati della trama * /
proc sgplot data = WORK.arwa;
pbspline x = xi y = yi;
loess x = xi y = yi / nomarker; / * utilizza l'opzione PRESEARCH * /
correre;
