First = c('a', 'b')
Combinations = c('First', 'Second', 'Third')
For(i in combinations){
  assign(paste('BaseTable$no', Count, '[BaseTable$', i, ' %in% ' i[j]  ']', sep = ''), j)
}