在R中处理含</>格式的字符串：实现指定表格格式转换

需求说明 #

你需要将一列包含类似<X></X>格式标签的合并字符串，拆分到对应标签命名的独立列中，完成表格格式转换。

实现代码 #

我们用tidyverse工具包来快速实现：

1. 先加载依赖包并模拟原始数据（可根据你的实际表格结构调整）：

library(tidyverse)

# 模拟原始表格数据
raw_table <- tibble(
  合并内容 = c(
    "<指标1>数值1</指标1><指标2>数值2</指标2><指标3>数值3</指标3>",
    "<指标1>数值4</指标1><指标2>数值5</指标2><指标3>数值6</指标3>",
    "<指标1>数值7</指标1><指标2>数值8</指标2><指标3>数值9</指标3>"
  )
)

2. 提取标签内容并拆分到对应列：

processed_table <- raw_table %>%
  mutate(
    指标1 = str_extract(合并内容, "(?<=<指标1>).*?(?=</指标1>)"),
    指标2 = str_extract(合并内容, "(?<=<指标2>).*?(?=</指标2>)"),
    指标3 = str_extract(合并内容, "(?<=<指标3>).*?(?=</指标3>)")
  ) %>%
  select(-合并内容) # 删除原始合并列

3. 查看转换后的结果：

print(processed_table)

运行后会得到拆分好的表格，每列对应一个标签下的内容。

灵活调整 #

如果你的标签名称不同，只需要修改正则表达式中的标签部分（比如把<指标1>换成你的实际标签名）即可适配不同的表格结构。

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