scripts/old/10_find_public_clones.R

pub <- find_clones(ds=ds)
write.table(t(dict[,c('patient','type','HLA.A')]),col.names=FALSE,
	    file=paste0(path,'viral_clones.csv'),sep=',')
write.table(pub,append=TRUE,file=paste0(path,'viral_clones.csv'),sep=',',col.names=FALSE)
ahopki14/tcrSeqR documentation built on May 16, 2019, 6:56 p.m.