如何为 R 中的一组列随机化 data.table 对象的列值?