# NOT RUN {
df <- tibble::tribble(
~wind, ~temp,
-99, 45,
68, NA,
72, 25
)
dfs <- bind_shadow(df)
dfs
recode_shadow(dfs, temp = .where(wind == -99 ~ "bananas"))
recode_shadow(dfs,
temp = .where(wind == -99 ~ "bananas")) %>%
recode_shadow(wind = .where(wind == -99 ~ "apples"))
# }
Run the code above in your browser using DataLab