AstraZeneca, a leading pharmaceutical company, has an exciting opportunity
for an R-developer within its Quantitative Clinical Pharmacology (QCP)
group. The position is a 6-12 month contract position which will integrate
R programming knowledge, capabilities and prowess towards pharmacometric
analy
Try this
dat=data.frame (ID=rep(1:27,each=10),IDV=rep(seq(1:10),times=27))
dat$DV <- with(dat, 50+15*IDV)
dat=dat[order(dat$ID,dat$IDV),]
for(i in 1:27){
dt1 = dat[dat$ID==i,]
pagei=as.integer(ceiling(i/9))
#open device for subjects 1-9
if(i==1) {tiff(file=paste("Outfile",pagei,".tiff
2 matches
Mail list logo