search for: t_physician_id

Displaying 1 result from an estimated 1 matches for "t_physician_id".

2009 Jun 23
2
Long to wide format without time variable
...uot;Coder2","ICD3","Coder3","ICD4","Coder4","ICD5","Coder5") j<-0 for (i in 1:ct){ kkk <- ids[i] rpt<-data[data$id==kkk,] j<-max(j,nrow(rpt)) codes[i,1]<-kkk codes[i,2]<-rpt$ICDCode[1] codes[i,3]<-rpt$T_Physician_ID[1] #if (nrow(rpt)>=2){ codes[i,4]<-rpt$ICDCode[2] codes[i,5]<-rpt$T_Physician_ID[2] #if (nrow(rpt)>=3) { codes[i,6]<-rpt$ICDCode[3] codes[i,7]<-rpt$T_Physician_ID[3] #if (nrow(rpt)>=4) { codes[i,8]<-rpt$ICDCode[4] codes[i,9]<-rpt...