powered by
calculateCapillary
calculateCapillary(samplesTable, plotTable, sq = 0, run = "", debug = FALSE)