SAS中文论坛

 找回密码
 立即注册

扫一扫,访问微社区

查看: 1444|回复: 1
打印 上一主题 下一主题

招聘兼职临床SAS统计分析师

[复制链接]

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
楼主
 楼主| 发表于 2009-8-18 07:57:19 | 只看该作者

招聘兼职临床SAS统计分析师

招聘兼职临床SAS统计分析师: 请和我联系速投简历 <!-- e --><a href="mailto:stat082007@yahoo.com">stat082007@yahoo.com</a><!-- e -->
回复 支持 反对

使用道具 举报

49

主题

76

帖子

1462

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
1462
沙发
 楼主| 发表于 2009-11-1 05:41:03 | 只看该作者

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

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;
    whereGroup. ne .;
run;

/** Calculate Responders and percent **/
proc sql;
create table Resp as
select distinct TRTMT, Group., count( distinct Usubjid) as cases
from SAMPLEwhere 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;
   byGroup.;
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 printto file=&quot;C:\SASProg\t1_responder.rtf&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#__';
  defineT_2   / display width=15  center 'Study Dose 30 mg#__';
  defineT_3   / display width=15  center 'Study Dose 60 mg#__';
run;

proc printto; run;
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|小黑屋|手机版|Archiver|SAS中文论坛  

GMT+8, 2026-2-6 06:18 , Processed in 0.095275 second(s), 20 queries .

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表