我想创建一个新的数据列D,其中:
语法是什么?
答案 0 :(得分:12)
您不必使用ifelse
df <- data.frame(a=1:6,
b=rep("reproducible",6),
c=rep("example",6), stringsAsFactors=F)
df$d <- df$a
df$d[df$a==5] <- 0
df$d[df$a==6] <- df$b[df$a==6]
df
# > df
# a b c d
# 1 1 reproducible example 1
# 2 2 reproducible example 2
# 3 3 reproducible example 3
# 4 4 reproducible example 4
# 5 5 reproducible example 0
# 6 6 reproducible example reproducible
但如果你真的想要,你可以。
within(df, df$d <- ifelse(a<5, a,
ifelse(a==5, 0,
ifelse(a==6,b,NA))) ) #same result
答案 1 :(得分:0)
如果你的意思是A的总和大于5.然后你可以为D创建一个向量然后使用rbind()
将它变成一个列d <- c()
if(sum(A)<5){
d = A
}else if(sum(A) ==5){
d = 0
}else if(sum(A) == 6){
d = B
}
D <- rbind(d)
我实际上不知道这是否有效,因为你还没有涵盖所有案件,而且我也不确切地知道你的意思是什么?#34;等于&#34; 5。