added function to count the otu table for uparse because he demands a barcode label;  also trying out a lexical_cast_vec