随机重新分配有条件的组成员

Question

我有下表:

<表类="s-表"><头>名称分组<正文>a1b1c2d2e3f3

并且我想通过 (i) 确保名称​​不会被分配到同一个组，并且 (ii) 组成员的概率将保持不变，从而随机重新分配组成员相同。此外，我试图 (iii) 避免将同一组下的所有名称分配给同一新组。本质上我想实现这样的目标:

<表类="s-表"><头>姓名组新组<正文>一个12b13c21d23e31f32

我如何在 R 中执行此操作？ ？

Answer 1

使用 sample + setdiff 的基础 R 选项

transform(
  df,
  new.group = ave(group, group, FUN = function(x) sample(setdiff(group, x),length(x)))
)

给予

  name group new.group
1    a     1         2
2    b     1         3
3    c     2         1
4    d     2         3
5    e     3         1
6    f     3         2

数据

> dput(df)
structure(list(name = c("a", "b", "c", "d", "e", "f"), group = c(1L, 
1L, 2L, 2L, 3L, 3L)), class = "data.frame", row.names = c(NA,
-6L))