Error in if (status.alignment.clusters[cou] == 1) { : 
  missing value where TRUE/FALSE needed
Calls: sapply -> lapply -> FUN -> sapply -> lapply -> FUN
Execution halted