r - 如何将两列 "count"矩阵转换为 R 中的二进制向量？

Question

这个问题在这里已经有了答案:





Reshaping data.frame from wide to long format

(9 个回答)



Repeat each row of data.frame the number of times specified in a column

(9 个回答)


3年前关闭。




如何将具有两列计数矩阵的数据帧转换为 R 中具有单个二进制向量的数据帧？例如，我有一个这样的数据框，其中 id 是主题的 id，s 和 f 是该主题的“成功”和“失败”的数量，x 是描述该主题某些特征的第三个变量.

id s f x
1  0 3 A
2  2 1 A
3  1 2 B

我希望将此数据框转换为:

id n x
1  f A
1  f A
1  f A
2  s A
2  s A
2  f A
3  s B
3  f B
3  f B

其中 n 列表示每次试验是成功 (s) 还是失败 (f)。

我确定我可以编写一个函数来做到这一点，但我想知道是否有预制解决方案。

Answer 1

  dd <- read.table(text="id s f x
    1  0 3 A
    2  2 1 A
    3  1 2 B",
    header=TRUE)

 with(dd,data.frame(
         id=rep(id,s+f),
         n=rep(rep(c("s","f"),nrow(dd)),c(rbind(s,f))),
         x=rep(x,s+f)))