PROC IMPORT OUT= WORK.bmd
            DATAFILE= "Z:\764-F11\data\bmd.txt" 
            DBMS=TAB REPLACE;
     GETNAMES=YES;
     DATAROW=2; 
RUN;

PROC SORT DATA=bmd;
  BY Gender;
RUN;

ODS GRAPHICS ON;
PROC GAM DATA=bmd PLOTS=COMPONENT(CLM ADDITIVE);
  CLASS Gender;
  BY Gender;
  MODEL Spnbmd = LOESS(Age);
RUN;
ODS GRAPHICS OFF;

PROC IMPORT OUT= WORK.heart
            DATAFILE= "Z:\764-F11\data\heart.txt" 
            DBMS=TAB REPLACE;
     GETNAMES=YES;
     DATAROW=2; 
RUN;

ODS GRAPHICS ON;
PROC GAM DATA=heart DESC PLOTS=COMPONENT(CLM ADDITIVE);
  CLASS Famhist;
  MODEL Chd = PARAM(Famhist) LOESS(Sbp) SPLINE(Tobacco) / DIST=BIN METHOD=GCV;
RUN;
ODS GRAPHICS OFF;

ODS GRAPHICS ON;
PROC GAM DATA=heart DESC PLOTS=COMPONENT(CLM ADDITIVE);
  CLASS Famhist;
  MODEL Chd = PARAM(Famhist) LOESS(Sbp) LOESS(Tobacco) LOESS(Ldl) LOESS(Adiposity)
              LOESS(TypeA) LOESS(Obesity) LOESS(Alcohol) LOESS(Age) / METHOD=GCV DIST=BIN;
RUN;
ODS GRAPHICS OFF;