Error in aggregate2(assay_, by = by, ..., nthread = nthread, progress = progress, : length(x_split) == nthread is not TRUE likely because number of subsets is less than nthread