TRFLP binning in R