招聘兼职临床SAS应用程序编写

shiyiming

SAS应用程序编写招聘

1. 专兼职SAS程序开发编写
2. 熟悉SAS (Statistic Analysis Software) 程序编写
3. 有一定的医药基础

简历投递邮箱: <!-- e --><a href="mailto:clintrialstat@yahoo.com">clintrialstat@yahoo.com</a><!-- e --> or <!-- e --><a href="mailto:support@clintrialstat.com">support@clintrialstat.com</a><!-- e -->

(1)邮件请附上作者最近SAS 程序作品;
(2) 讲解本例的SAS程序;


libname dev 'C:\SAS data';

proc sort data=dev.SAMPLE
out=SAMPLE;
by TRTMT;
where Group. ne .;
run;

/** Calculate Responders and percent **/
proc sql;
create table Resp as
select distinct TRTMT, Group., count( distinct Usubjid) as cases
from SAMPLE where Resp =1
group by TRTMT, Group.
order by TRTMT, Group.
;
create table All as
select distinct TRTMT, Group., count( distinct Usubjid)as npts
from SAMPLE
group by TRTMT, Group.
order by TRTMT, Group.
;
quit;

data Et;
length Rslt $ 100.;
mergeAll(in=A) Resp;
by TRTMTGroup.;
if A;
ifcases =. then cases=0;
Rslt =put( cases, 4.0) || '/' || compress(put( npts, 4.0)) || ' (' || compress( put(cases / npts *100, 4.1)) || ')';
run;

proc sort data=ET;
by Group TRTMT;
run;

proc transpose data=ET out=TET prefix=T_;
var Rslt;
by Group.;
id TRTMT;
run;

data _NULL_;
length ft$162.;
ft=%str(repeat(&quot;_&quot;, 160));
callsymput('f1', ft);
ft=%str(&quot;(c) N is the number of subjects who had baseline evaluation and atleast one post-baseline evaluation of the measurement that define thesubgroup.&quot;);
callsymput('f2', ft);
run;

Title1 &quot;Table 1&quot;;
Title2 &quot;Responders to Clinical Efficacy&quot;;
Title3 &quot;All Intent-to-Treat Subjects&quot;;
footnote1&quot;&amp;f1&quot;;
footnote2&quot;&amp;f2&quot;;
run;

proc report data=TET nowd spacing=0 headskipmissing split ='#';
column T_1T_2 T_3;
define T_1 / display width=15 center 'Placebo#__';
define T_2 / display width=15 center 'Study Dose 30 mg#__';
define T_3 / display width=15 center 'Study Dose 60 mg#__';
run;