将R中的字符转换为数字将生成NAs

# 示例字符向量
char_vector <- c("123", "456", "abc", "789")

# 尝试转换为数值类型
num_vector <- as.numeric(char_vector)
print(num_vector)
# 输出: [1] 123 456   NA 789

# 去除包含NA的元素
num_vector_clean <- na.omit(num_vector)
print(num_vector_clean)
# 输出: [1] 123 456 789

# 去除非数字字符
char_vector_clean <- gsub("[^0-9]", "", char_vector)
print(char_vector_clean)
# 输出: [1] "123" "456" ""    "789"

# 再次尝试转换为数值类型
num_vector_clean <- as.numeric(char_vector_clean)
print(num_vector_clean)
# 输出: [1] 123 456 NA  789

# 去除包含NA的元素
num_vector_clean <- na.omit(num_vector_clean)
print(num_vector_clean)
# 输出: [1] 123 456 789