R语言如何自动计算数据集某列中含*1000/*1e9的单元格数值

核心逻辑是通过正则定位目标格式单元格，拆分计算后回填，其余内容保持不变：

• 正则匹配：用规则^[-+]?\\d*\\.?\\d+\\*10+$精准匹配仅包含「正负浮点数 + * + 1开头的整十/整千/整十亿数」格式的单元格，不会误触文本、百分比类的其他取值
• 拆分计算：对匹配成功的单元格，按*拆分为系数和乘数两个部分，转数值后执行乘法运算
• 原值保留：未匹配到的内容（Actual、chr、百分比等）直接保留原有取值

可运行示例代码 #

# 加载依赖包
library(dplyr)
library(stringr)

# 构造示例数据集
df <- tibble(
  raw_col = c("Actual", "chr", "5.25%", "-5.50*1000000000", "0.24%", "-4.00*1000", "4.5%")
)

# 执行处理
df <- df %>%
  mutate(processed_col = ifelse(
    str_detect(raw_col, "^[-+]?\\d*\\.?\\d+\\*10+$"),
    sapply(str_split(raw_col, "\\*"), function(x) as.numeric(x[1]) * as.numeric(x[2])),
    raw_col
  ))

补充说明 #

如果后续需要统一处理百分比格式，可额外加一层条件判断，对带%的取值做除以100的数值转换即可，当前逻辑不会改动这类非目标格式的内容。

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