Date: Wed, 14 Apr 2004 15:18:49 -0500
Reply-To: "Bittner, Stephen" <Stephen.Bittner@CAREMARK.COM>
Sender: "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From: "Bittner, Stephen" <Stephen.Bittner@CAREMARK.COM>
Subject: Re: Need Help - Calculating Baseline Value
Content-Type: text/plain; charset="iso-8859-1"
Here is my suggestion;
Steve Bittner
data bp;
input site pat dia sys vitdt date8. vittm drgdt date8. drgtm;
format vitdt drgdt date8. ;
cards;
1 1 84 119 30jul03 0710 30jul03 0851
1 1 85 120 30jul03 0711 30jul03 0851
1 1 87 121 30jul03 0712 30jul03 0851
1 1 84 118 30jul03 0810 30jul03 0851
1 1 85 120 30jul03 0811 30jul03 0851
1 1 87 134 30jul03 0812 30jul03 0851
1 1 84 118 30jul03 0910 30jul03 0851
1 1 85 120 30jul03 0911 30jul03 0851
1 1 87 121 30jul03 0912 30jul03 0851
1 1 84 119 30jul03 0710 30jul03 0851
1 1 85 120 30jul03 0711 30jul03 0851
1 1 87 121 30jul03 0712 30jul03 0851
1 1 84 118 30jul03 0810 30jul03 0851
1 1 85 120 30jul03 0811 30jul03 0851
1 1 87 134 30jul03 0812 30jul03 0851
1 1 84 118 30jul03 0910 30jul03 0851
1 1 85 120 30jul03 0911 30jul03 0851
1 1 87 121 30jul03 0912 30jul03 0851
1 1 84 119 30jul03 0710 30jul03 0851
1 1 95 120 30jul03 0711 30jul03 0851
1 1 87 121 30jul03 0712 30jul03 0851
1 1 84 118 30jul03 0810 30jul03 0851
1 1 95 120 30jul03 0811 30jul03 0851
1 1 87 134 30jul03 0812 30jul03 0851
1 1 84 118 30jul03 0910 30jul03 0851
1 1 85 120 30jul03 0911 30jul03 0851
1 1 107 121 30jul03 0912 30jul03 0851
;
run;
data bp2;
set bp;
x1=lag1(dia);
x2=lag2(dia);
x3=lag3(dia);
x4=lag4(dia);
x5=lag5(dia);
if max(x1,x2,x3)-min(x1,x2,x3) <= 10 then do;
check="<=10";
diff=max(x1,x2,x3)-min(x1,x2,x3);
dia_out=mean(x1,x2,x3);
end;
if max(x1,x2,x3)-min(x1,x2,x3) > 10 then do;
check=">10";
diff=max(x1,x2,x3)-min(x1,x2,x3);
dia_out=mean(x1,x2,x3,x4,x5);
end;
run;
-----Original Message-----
From: Mohan Menon [mailto:mohmenin@YAHOO.COM]
Sent: Wednesday, April 14, 2004 11:07 AM
To: SAS-L@LISTSERV.UGA.EDU
Subject: Need Help - Calculating Baseline Value
Hi Everyone
Could someone please help me out in calculating
the baseline value for bp. Here is how the data looks
site pat dia sys vitdt vittm drgdt drgtm
1 1 84 119 30jul03 0710 30jul03 0851
1 1 85 120 30jul03 0711 30jul03 0851
1 1 87 121 30jul03 0712 30jul03 0851
1 1 84 118 30jul03 0810 30jul03 0851
1 1 85 120 30jul03 0811 30jul03 0851
1 1 87 134 30jul03 0812 30jul03 0851
1 1 84 118 30jul03 0910 30jul03 0851
1 1 85 120 30jul03 0911 30jul03 0851
1 1 87 121 30jul03 0912 30jul03 0851
Baseline seated diastolic BP is the average of 3
consecutive seated diastolic bp value prior to or
equal to the drgdt and time, obtained atleast one
minute apart. If any of those 3 consecutive readings
are not within 10 mmhg of each other, then two
additional readings should be obtained to calculate
the average.
Thanks in advance for your help.
Mohan Menon
__________________________________
Do you Yahoo!?
Yahoo! Tax Center - File online by April 15th
http://taxes.yahoo.com/filing.html
| 
