R script for analyzing in situ hybridization data from TMAs