renamePrunedSubpopulations function

Prune away specified subpopulations in clades that are far away.