基于其他变量观测值用R语言ifelse语句创建新列

你可以直接嵌套ifelse函数来实现需求，同时建议补充处理变量相等以及除零的特殊情况，避免报错或不符合预期的结果：

基础实现代码 #

# 替换df为你的实际数据框名称
df$variable5 <- ifelse(df$variable4 > df$variable3,
                       (df$variable4 / df$variable3) * -1,
                       ifelse(df$variable4 < df$variable3,
                              df$variable3 / df$variable4,
                              NA)) # 变量相等时的默认值，可按需修改（如0、1等）

代码说明 #

• 外层ifelse优先判断variable4 > variable3，满足条件时计算(variable4 / variable3) * -1赋值给variable5
• 不满足则进入内层ifelse，判断variable4 < variable3，满足时计算variable3 / variable4赋值
• 最后处理两者相等的场景，这里设为NA，你可以根据业务需求调整为其他数值

处理除零风险的增强版代码 #

如果variable3或variable4存在为0的可能，建议先过滤这类情况，避免出现除零报错：

df$variable5 <- ifelse(df$variable3 == 0 | df$variable4 == 0,
                       NA, # 为0时的默认值，可调整
                       ifelse(df$variable4 > df$variable3,
                              (df$variable4 / df$variable3) * -1,
                              ifelse(df$variable4 < df$variable3,
                                     df$variable3 / df$variable4,
                                     NA)))

内容的提问来源于stack exchange，提问作者marty