R语言如何检测dataframe中v2列仅包含字母A的行

问题场景 #

你有如下结构的R数据框：

df <- data.frame(v1 = 1:5, v2 = c('A, A, A', 'A', 'S', 'A, S', 'P, P, A'))

需要判断v2列的每一行是否仅包含字母A（允许A重复、允许逗号/空格分隔），输出对应的布尔值。

解决方案 #

1. Base R 实现

核心逻辑：先删除v2中所有逗号和空格，再判断剩余字符串是否完全由A组成：

# 生成布尔结果
result <- grepl("^A+$", gsub("[, ]", "", df$v2))

# 查看结果
print(result)
# 输出：[1]  TRUE  TRUE FALSE FALSE FALSE

2. Tidyverse 管道风格实现

适合在dplyr数据处理流程中直接生成新列：

library(dplyr)
library(stringr)

df <- df %>%
  mutate(only_A = str_remove_all(v2, "[, ]") %>% str_detect("^A+$"))

规则说明 #

• gsub("[, ]", "", df$v2) / str_remove_all(v2, "[, ]")：批量清除字符串中的逗号、空格，仅保留字母内容
• 正则^A+$：匹配从开头到结尾全部为A、且至少包含1个A的字符串，完美匹配「仅包含A、A可重复」的需求

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