如何将参与者随机分配到 R 中的组?