R语言循环函数直至两数据集长度相等的问题排查

• 在给不同数据集应用自定义函数distfn()时，发现观测数量较多的数据集里有部分观测未被纳入输出（对应场景：st_network_blend未包含所有点）。
• 我编写了Distloop函数尝试解决该问题，逻辑如下：
  • 先对原数据集调用distfn()
  • 通过setdiff()提取原数据集ID与输出结果ID的差异部分，命名为Diff
  • 若Diff长度为0，直接返回结果；否则过滤原数据集（仅保留Diff中的ID）、重新调用distfn()、将新结果与之前的结果合并，循环此过程直到所有ID都被包含
• 当前遇到的问题是：这个while循环无法正常运行，且因数据集过大无法提供可复现示例，可参考st_network_blend未包含所有点的相关问题场景。

内容的提问来源于stack exchange，提问作者C. Guff