libname save 'sasdata';

data save.veteran;
    infile 'data.veteran';
    input rx cellt futime status karno months age prior_rx;

    drop cellt;
    prior_rx = prior_rx/10;

    if (cellt=1) then celltype= 'squamous';
    if (cellt=2) then celltype= 'smallcell';
    if (cellt=3) then celltype= 'adeno';
    if (cellt=4) then celltype= 'large';