targets <- data.frame(sample=c("C1","C2","T1","T2"),
condition=c("Control","Control","Treatment","Treatment"))
write.table(targets,file="targets.txt",sep="\t",row.names=FALSE,
quote="")
sample.list <- make.sample.list("targets.txt")
Run the code above in your browser using DataLab