,可以通过以下步骤实现:
library(tidyverse)
data <- read_csv("data.csv")
tibble1 <- tibble(col1 = c(5, 12, 8, 15, 3))
tibble1 <- tibble1 %>% mutate(col1 = ifelse(col1 > 10, 0, col1))
tibble2 <- tibble(col2 = c(3, 7, 2, 6, 4))
tibble2 <- tibble2 %>% mutate(col2 = ifelse(col2 < 5, 1, col2))
print(tibble1)
print(tibble2)
这样,你就可以根据来自不同tibble的截止值更改tibble中不同列的值了。
请注意,以上代码示例中的col1和col2仅为示意,你需要根据实际情况替换为你的列名。另外,腾讯云的相关产品和产品介绍链接地址请参考腾讯云官方网站。
领取专属 10元无门槛券
手把手带您无忧上云