R:当两个事件(列)都为true时，参考其中一个事件来决定值
R:当两个事件(列)都为true时，参考其中一个事件来决定值
提问于 2018-06-05 06:26:28
我想操作R中的两列，这样当两个事件都为真时，引用其中一列来决定值。例如：
a<- c(0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0)
b<- c(0,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0)当a和b都为真时，在a9和a10中，参考b来决定下面几行中另一个列c的值。然后，如果b在某一行为FALSE (这里是第17行)，请再次检查a和b是否都为真。因此，期望的输出如下所示：
c<- c(0,0,0,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0)
data <- cbind(a,b,c)
data
a b c
[1,] 0 0 0
[2,] 0 1 0
[3,] 0 1 0
[4,] 0 0 0
[5,] 0 0 0
[6,] 1 0 0
[7,] 1 0 0
[8,] 1 0 0
[9,] 1 1 1
[10,] 1 1 1
[11,] 0 1 1
[12,] 0 1 1
[13,] 0 1 1
[14,] 0 1 1
[15,] 0 1 1
[16,] 0 1 1
[17,] 0 0 0
[18,] 0 0 0由于数据以许多行的形式出现，我更喜欢使用像ifelse()这样的矢量化方法来处理这个问题。
非常感谢所有能帮助我的人。
回答 1
Stack Overflow用户
回答已采纳
发布于 2018-06-05 06:41:57
我不能百分之百肯定我理解这个问题，但这里有一个重现输出的tidyverse解决方案：
a<- c(0,0,0,0,0,1,1,1,1,1,0,0,0,0,0,0,0,0)
b<- c(0,1,1,0,0,0,0,0,1,1,1,1,1,1,1,1,0,0)
df <- data.frame(a,b)
library(tidyverse)
df %>% mutate(c=case_when(
a == 1 & b == 1 ~ 1,
a == 0 & b == 0 ~ 0,
TRUE ~ NA_real_
)) %>% fill(c)
# a b c
# 1 0 0 0
# 2 0 1 0
# 3 0 1 0
# 4 0 0 0
# 5 0 0 0
# 6 1 0 0
# 7 1 0 0
# 8 1 0 0
# 9 1 1 1
# 10 1 1 1
# 11 0 1 1
# 12 0 1 1
# 13 0 1 1
# 14 0 1 1
# 15 0 1 1
# 16 0 1 1
# 17 0 0 0
# 18 0 0 0页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/50689601
复制相关文章
相似问题