如何解决R中重命名观测值用于筛选时的报错问题

为什么你的两种方法都不行？ #

• 第一种方法没变化：你的fruit列大概率是**因子（factor）**类型，str_replace函数默认不会对因子生效，必须先把因子转成字符向量。
• 第二种方法报错：replace函数的语法用错了，第二个参数需要的是逻辑判断条件（比如fruit == "strawberries"），而不是fruit = "strawberries"这种赋值写法。

正确的解决方法 #

下面提供几种可行的方案，按需选择：

方案1：修正str_replace的用法（先转字符再替换）

先把因子转成字符，再用str_replace替换：

library(dplyr)
library(stringr)

df1 <- df %>%
  mutate(fruit = as.character(fruit)) %>%
  mutate(fruit = str_replace(fruit, "strawberries", "strawberry"))

或者更简洁的写法：

df1 <- df %>%
  mutate(fruit = str_replace(as.character(fruit), "strawberries", "strawberry"))

方案2：修正replace的语法

同样先转字符，然后用正确的逻辑条件调用replace：

df1 <- df %>%
  mutate(fruit = as.character(fruit)) %>%
  mutate(fruit = replace(fruit, fruit == "strawberries", "strawberry"))

方案3：针对因子列的专业处理（推荐）

如果你的fruit列需要保持因子类型，用forcats包的fct_recode函数直接重编码因子水平，不用转字符：

library(dplyr)
library(forcats)

df1 <- df %>%
  mutate(fruit = fct_recode(fruit, "strawberry" = "strawberries"))

统计种植草莓的农户数量 #

替换完成后，统计农户数可以这么写：

strawberry_farmer_count <- df1 %>%
  filter(fruit == "strawberry") %>%
  distinct(farmer) %>%
  nrow()

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