r script for reading plates off a bioanalyser to QTL output