如何将tibble中的JSON列解析转换为独立新列

首先安装并加载所需依赖包：

# 首次运行先安装包
install.packages(c("tidyverse", "jsonlite"))
# 加载包
library(tidyverse)
library(jsonlite)

核心处理代码仅需两行，假设你的原始tibble对象名为df：

result <- df %>%
  # 逐行解析JSON字符串为列表格式
  mutate(arrgs = purrr::map(arrgs, jsonlite::fromJSON)) %>%
  # 将列表的键值对平展为独立列，自动保留所有原始列
  tidyr::unnest_wider(arrgs)

如果你使用的tidyr版本≥1.3.0，可以用更简洁的内置unnest_json()函数，无需手动解析JSON：

result <- df %>%
  tidyr::unnest_json(arrgs)

运行后得到的result就是你需要的目标结构，原有ID、Email列全部保留，同时新增sg_template_id、sg_template_name两个列对应JSON中的取值。

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