R语言向量数据清洗：保留有效数值与字符的方法问询

你原代码gsub(!'[:digit:]', '', myexample)的问题在于：模式语法错误（非数字字符应该用[^[:digit:]]，不能用!），而且gsub是替换字符而非筛选元素，无法直接保留有效数值。正确做法是先排除NA，再用正则匹配纯数字字符串来筛选：

# 示例向量
myexample <- c("319939", "", "", "318273", NA, "317889", NA, "316060")

# 筛选纯数值字符串（排除NA和空字符串）
filtered_nums <- myexample[!is.na(myexample) & grepl("^\\d+$", myexample)]
# 如需转为数值类型，执行以下代码
filtered_nums <- as.numeric(filtered_nums)
filtered_nums

说明：^\\d+$是正则表达式，匹配仅由数字组成的完整字符串；!is.na(myexample)先排除NA值，再通过逻辑索引筛选符合条件的元素。

针对包含"-"和"na-na"的字符向量，直接用%in%标记需排除的元素，反向筛选即可保留有效名称：

# 示例向量
characterexample <- c("random-name", "-", "-", "na-na", "name-random")

# 筛选有效名称
filtered_chars <- characterexample[!characterexample %in% c("-", "na-na")]
filtered_chars

说明：%in%用于检查元素是否属于要排除的集合，!取反后保留不在集合内的有效元素。

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