在dplyr
函数中使用casewhen
s mutate
时,我得到了NA。我喜欢casewhen
,因为如果我想将FALSE值设为原始值的默认值,则不必使用长ifelse
语句。这不是使用casewhen
的意义吗?此代码将导致NA。
mtcars %>%
as_tibble() %>%
mutate(vs = case_when(carb == 4 ~ +5))
当carb的值为4时,我想在vs列中加1。谢谢。
答案 0 :(得分:3)
您需要为所有不满足任何条件的其余条件定义TRUE
参数,并为其提供所需的值。
library(dplyr)
mtcars %>%
as_tibble() %>%
mutate(vs = case_when(carb == 4 ~ 5,
TRUE ~ vs))
# mpg cyl disp hp drat wt qsec vs am gear carb
# <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl>
# 1 21 6 160 110 3.9 2.62 16.5 5 1 4 4
# 2 21 6 160 110 3.9 2.88 17.0 5 1 4 4
# 3 22.8 4 108 93 3.85 2.32 18.6 1 1 4 1
# 4 21.4 6 258 110 3.08 3.22 19.4 1 0 3 1
# 5 18.7 8 360 175 3.15 3.44 17.0 0 0 3 2
# 6 18.1 6 225 105 2.76 3.46 20.2 1 0 3 1
# 7 14.3 8 360 245 3.21 3.57 15.8 5 0 3 4
# 8 24.4 4 147. 62 3.69 3.19 20 1 0 4 2
# 9 22.8 4 141. 95 3.92 3.15 22.9 1 0 4 2
#10 19.2 6 168. 123 3.92 3.44 18.3 5 0 4 4
# ... with 22 more rows