使用str_count()统计字符串数：空单元格误返回1的R语言问题

问题分析 #

你当前的代码df_1$Number_count <- str_count(df_1$names,",")+1会把空单元格（包括空白字符串）的计数返回1，原因是空单元格的逗号统计数为0，加1后得到1，但实际空单元格应该返回0；而单值单元格的返回1是符合预期的，所以只需要针对空值/空白字符串做单独处理。

解决方案 #

首先构造你的示例数据框用于测试：

library(stringr)

# 构造示例数据
df_1 <- data.frame(
  S.No = 1:4,
  names = c("alex, dianna", "", "annya", "john, kallum, colin"),
  stringsAsFactors = FALSE
)

方案1：基础判断（处理空字符串和NA）

使用ifelse结合str_trim（去除前后空白）来区分空值和有效内容：

df_1$Number_count <- ifelse(
  # 判断是否为NA或去除空白后为空字符串
  is.na(df_1$names) | str_trim(df_1$names) == "",
  0,
  str_count(df_1$names, ",") + 1
)

方案2：分割后统计非空元素（更严谨）

通过分割字符串后统计非空元素的数量，能处理更复杂的情况（比如末尾带逗号的字符串）：

df_1$Number_count <- sapply(str_split(df_1$names, ",\\s*"), function(x) {
  # 去除每个分割元素的前后空白，统计非空元素数量
  sum(str_trim(x) != "")
})

处理结果 #

运行后的数据框如下：

S.No                names Number_count
1    1        alex, dianna            2
2    2                                0
3    3                annya            1
4    4 john, kallum, colin            3

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