如何将含\n与K（代表1000）的R字符串向量转为数值向量？

可以通过分步清理字符串+数值转换实现需求，以下是基础R环境下的两种实现方法：

方法一：基础向量操作 #

# 原始向量
v <- c("2.2K\n", "3\n", "1K\n", "1", "45", "5\n")

# 1. 移除所有换行符
clean_str <- gsub("\n", "", v)

# 2. 提取纯数字部分并转为数值类型
numeric_vals <- as.numeric(gsub("K", "", clean_str))

# 3. 对含K的数值乘以1000（K代表1000）
multiplier <- ifelse(grepl("K", clean_str), 1000, 1)
final_v <- numeric_vals * multiplier

# 查看结果
final_v

运行结果：

[1] 2200    3 1000    1   45    5

方法二：正则替换+解析（更简洁） #

通过正则将xK替换为x*1000，再解析表达式完成计算：

v <- c("2.2K\n", "3\n", "1K\n", "1", "45", "5\n")

# 移除换行符→替换K为乘法表达式→逐元素计算
final_v <- sapply(gsub("\n", "", v), function(x) {
  eval(parse(text = gsub("K", "*1000", x)))
})

final_v

步骤说明 #

1. 移除换行符：gsub("\n", "", v) 会清除向量中所有字符串的换行符\n，得到无冗余符号的干净字符串。
2. 处理K标识：
   • 方法一中，先剥离K字符提取纯数字，再通过判断是否含K来决定是否乘以1000，逻辑直观；
   • 方法二中，直接将K替换为乘法表达式*1000，通过eval(parse(...))解析计算，代码更简洁。

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