Help with data

[pp2014]

I have the following data.   I want Therapy for each Patient based on days_btw_refill.   If the days_btw_refill is greater than 60 days then I want the Therapy to change from 1 to 2 and so on

data have;

  input id  days_btw_refill;

cards;

1  31

1  30

1  38

1  70

1  35

1  45

1  32

1  53

1  26

1  82

1  36

2  28

2  38

I want the following Output for Therapies

id    days_btw_refill      Therapy

1        31                   1

1        30                   1

1        38                   1

1        70                   2

1        35                   2

1        45                   2

1        32                   2

1        53                   2

1        26                   2

1        82                   3

1        36                   3

2        28                   1

2        38                   1

[ballardw · Accepted solution]

Assuming the data is actually sorted by ID.

data want;

   set have;

   by id; /* if grouped by id but not in sort order add NOTSORTED*/

   retain Therapy .;

   if first.id then therapy=1;

   if days_btw_refill>60 then therapy + 1;

run;

[Haikuo]

Same concept as 's solution,

data want;

     set have;

     by id;

     if first.id then

           therapy=1;

     therapy+days_btw_refill>60;

run;