count*
working mapcat*
tidyer mapcat* test