我有两个数据帧,例如
df1 <- data.frame(Company = c('A','B','C','D','E','F'),
`X1980` = c(21,NA,53,57,11,26),
`X1981` = c(35,33,45,NA,NA,12))
df2 <- data.frame(Company = c('A','B','C','D','E','F'),
`X1980` = c(1,0,0,1,1,0),
`X1981` = c(1,1,1,0,1,0))
我想创建一个新的数据框(df3),将company列保持原样。 1980年和1981年的值应取决于df2中的值:如果值1,则从df1中插入值,否则插入“ NA”。结果数据框应表示以下内容:
result df3
Company 1980 1981
A 21 35
B NA 33
C NA 45
D 57 NA
E 11 NA
F NA NA
感谢您的帮助! 如果我有什么办法可以改善这个问题,那就告诉我。
答案 0 :(得分:2)
将0
中的df2
更改为NA
并相乘:
df2[df2 == 0] = NA
df2[-1] = df1[-1] * df2[-1]
df2
# Company X1980 X1981
# 1 A 21 35
# 2 B NA 33
# 3 C NA 45
# 4 D 57 NA
# 5 E 11 NA
# 6 F NA NA
之所以有效,是因为NA * x = NA
和1 * x = x
。如果df1
和df2
依赖于相同的列顺序,但是如果需要可以很容易地进行调整。