## Just for exemplification purposes, we consider the complete genome-wide screen "KcViab"
## and its first 3 plates ("KcViabSmall"):
data(KcViab)
data(KcViabSmall)
screens <- list(KcViab, KcViabSmall)
out <- screenMatch(screens)
out$p.overlap
sapply(out$isInBoth, sum)
sapply(1:2, function(z) table(screens[[z]]$geneAnno$Plate[out$isInBoth[[z]]]))
Run the code above in your browser using DataLab