R JSON 文件

作者likuolei

在 R 语言中，JSON 文件（JavaScript Object Notation，JavaScript 对象表示法）是一种轻量级的数据交换格式，广泛用于存储和传输结构化数据，特别在 Web 数据交互和 API 数据处理中常见。R 提供了专门的包（如 jsonlite）来读写和解析 JSON 文件，支持处理包含中文的复杂数据结构。结合 Visual Studio Code（VSCode）环境，以下是针对 Linux 系统用户的详细中文讲解，假设你已将 VSCode 设置为中文界面并配置了 R 语言支持（参考之前的“R 语言基础”讲解）。内容简洁清晰，适合初学者，涵盖 JSON 文件的读写、解析、在 VSCode 中的操作及常见问题，特别注意中文编码问题。

R JSON 文件概述

  • 功能：JSON 文件以键值对形式存储层次化数据，适合嵌套结构（如列表、数据框）。R 通过 jsonlite 包读写 JSON 文件，适用于数据提取、转换和分析。
  • 主要包：
  • jsonlite：推荐，功能强大，支持数据框与 JSON 的双向转换，处理中文友好。
  • 其他：rjson（较老，功能有限，不推荐）。
  • VSCode 集成：通过 R 扩展（如 REditorSupport.r）支持 JSON 操作的语法高亮、补全和调试。
  • 前提：
  • R 已安装（运行 R --version，安装方法见“R 语言基础”）。
  • VSCode 配置了 R 扩展（ID：REditorSupport.r）和 languageserver 包（install.packages("languageserver")）。
  • 安装 jsonlite 包：
    R install.packages("jsonlite")
  • 项目目录已打开（参考“打开目录”讲解）。
  • 确保文件系统权限：chmod -R u+rw /path/to/project。
  • Linux 依赖（通常无需额外安装，jsonlite 依赖较少）：
    bash sudo apt-get install libcurl4-openssl-dev # Ubuntu/Debian，若需要 sudo dnf install libcurl-devel # Fedora，若需要

R JSON 文件操作

1. 读取 JSON 文件

  • 语法（jsonlite）：fromJSON(file)
  • file：JSON 文件路径。
  • 示例 JSON 文件（data.json）：
  [
    {"id": 1, "name": "张伟", "age": 25, "score": 85},
    {"id": 2, "name": "李娜", "age": 30, "score": 90}
  ]
  • 读取 JSON：
  library(jsonlite)
  df <- fromJSON("data.json")
  print(df)
  • 输出：
    id name age score 1 1 张伟 25 85 2 2 李娜 30 90
  • 说明：fromJSON() 自动将 JSON 数组转换为 R 数据框，嵌套结构转为列表。
  • 指定编码：jsonlite 默认处理 UTF-8，无需额外设置。

2. 写入 JSON 文件

  • 语法（jsonlite）：toJSON(x, pretty=TRUE)
  • x：要转换的数据框或列表。
  • pretty：是否格式化输出（默认 FALSE，TRUE 使 JSON 更易读）。
  • 示例：
  # 创建数据框
  df <- data.frame(
    id = 1:2,
    name = c("张伟", "李娜"),
    age = c(25, 30),
    score = c(85, 90)
  )
  # 写入 JSON
  write_json(df, "output.json", pretty=TRUE)
  • 生成文件（output.json）：
    json [ { "id": 1, "name": "张伟", "age": 25, "score": 85 }, { "id": 2, "name": "李娜", "age": 30, "score": 90 } ]
  • 检查文件：在 VSCode 中打开，或用 Linux 命令：cat output.json。

3. 处理嵌套 JSON

  • 示例 JSON（nested.json）：
  {
    "students": [
      {"name": "张伟", "info": {"age": 25, "score": 85}},
      {"name": "李娜", "info": {"age": 30, "score": 90}}
    ]
  }
  • 解析嵌套结构：
  json_data <- fromJSON("nested.json")
  df <- json_data$students
  print(df)
  • 输出：
    name info.age info.score 1 张伟 25 85 2 李娜 30 90
  • 展平嵌套：
  df_flat <- as.data.frame(json_data$students)
  print(df_flat)

4. 结合 dplyr 和 ggplot2

  • 示例：读取 JSON，处理并可视化。
  library(jsonlite)
  library(dplyr)
  library(ggplot2)

  # 读取 JSON
  df <- fromJSON("data.json")
  print(df)

  # 处理数据
  df_processed <- df %>% filter(score >= 90)
  print(df_processed)

  # 写入 JSON
  write_json(df_processed, "filtered.json", pretty=TRUE)

  # 可视化
  ggplot(df_processed, aes(x=name, y=score)) +
    geom_bar(stat="identity")
  • 输出： id name age score 1 1 张伟 25 85 2 2 李娜 30 90 id name age score 1 2 李娜 30 90
  • 生成 filtered.json：
    json [ { "id": 2, "name": "李娜", "age": 30, "score": 90 } ]

在 VSCode 中使用 JSON 文件

  1. 准备 JSON 文件：
  • 创建 data.json（右键“文件资源管理器” -> “新建文件”）：
    json [ {"id": 1, "name": "张伟", "age": 25, "score": 85}, {"id": 2, "name": "李娜", "age": 30, "score": 90} ]
  • 确保保存为 UTF-8（VSCode 状态栏右下角选择编码）。
  1. 创建 R 脚本：
  • 新建 json.R： library(jsonlite) library(dplyr) library(ggplot2) # 读取 JSON df <- fromJSON("data.json") print(df) # 处理数据 df_processed <- df %>% mutate(grade = ifelse(score >= 90, "优秀", "良好")) %>% filter(age < 30) print(df_processed) # 写入 JSON write_json(df_processed, "processed.json", pretty=TRUE) # 可视化 ggplot(df_processed, aes(x=name, y=score, fill=grade)) + geom_bar(stat="identity")
  1. 运行代码：
  • 选中代码，按 Ctrl+Enter，结果显示在“R 终端”。
  • 或运行整个文件：
    bash Rscript json.R
  • 输出： id name age score 1 1 张伟 25 85 2 2 李娜 30 90 id name age score grade 1 1 张伟 25 85 良好
  • 生成 processed.json：
    json [ { "id": 1, "name": "张伟", "age": 25, "score": 85, "grade": "良好" } ]
  • 图表显示在 VSCode 的“绘图”面板。
  1. 调试：
  • 设置断点（行号左侧点击），按 F5（需 R Debugger 扩展和 launch.json 配置，参考“运行和调试”）。
  • 检查数据框（如 df_processed）和 JSON 结构。

常见问题及解决方法

  • 中文乱码：
  • 问题：读取或写入 JSON 时中文显示乱码。
  • 解决：
    • 确保 JSON 文件为 UTF-8 编码（VSCode 保存时确认）。
    • jsonlite 默认支持 UTF-8，无需额外设置。
    • 检查系统编码：
      bash locale # 确保 LC_ALL 或 LANG 为 zh_CN.UTF-8
    • 在 VSCode 设置：
      json "terminal.integrated.env.linux": { "LANG": "zh_CN.UTF-8" }
    • 测试：
      R df <- data.frame(name = c("张伟", "李娜")) write_json(df, "test.json", pretty=TRUE) fromJSON("test.json")
  • 文件路径错误：
  • 问题：Error: cannot open the connection。
  • 解决：
    • 检查文件是否存在：file.exists("data.json")。
    • 使用完整路径：/home/user/project/data.json。
    • 设置工作目录：setwd("/path/to/project")。
  • VSCode 不显示结果：
  • 确保安装 R 扩展和 languageserver 包。
  • 使用 str(df) 或 print(df) 检查数据框。
  • 检查 R 路径（设置中 r.rterm.linux 设为 /usr/bin/R）。
  • JSON 解析错误：
  • 问题：Error: parse error: ...。
  • 解决：检查 JSON 语法（用 VSCode 的 JSON 扩展验证格式）。
  • 示例：
    R jsonlite::validate(readLines("data.json")) # 检查 JSON 有效性
  • Linux 依赖问题：
  • 问题：jsonlite 安装失败。
  • 解决：
    bash sudo apt-get install libcurl4-openssl-dev # Ubuntu/Debian sudo dnf install libcurl-devel # Fedora
  • 确保目录可写：chmod -R u+rw /path/to/project.

实用技巧

  • 快捷键：
  • 运行代码：Ctrl+Enter
  • 补全代码：Ctrl+Space（需 languageserver）。
  • 注释：Ctrl+/.
  • 推荐扩展：
  • R：核心支持。
  • languageserver：智能补全 JSON 操作。
  • Better Comments：高亮 JSON 相关注释。
    bash code --install-extension aaron-bond.better-comments
  • JSON：验证 JSON 文件格式。
    bash code --install-extension esbenp.prettier-vscode
  • AI 辅助：
  • 使用 GitHub Copilot 或 DeepSeek（参考之前讲解），输入 # 解析 R JSON 文件提取姓名，生成代码。
  • 高效操作：
  • 流式读取大 JSON 文件：
    R df <- stream_in(file("data.json"))
  • 处理嵌套 JSON：
    R flatten(fromJSON("nested.json")) # 展平嵌套结构
  • 批量处理 JSON 文件：
    R files <- list.files(pattern="\\.json$") dfs <- lapply(files, fromJSON)

示例：综合 JSON 操作脚本

  1. 准备 JSON 文件：
  • 创建 data.json：
    json [ {"id": 1, "name": "张伟", "age": 25, "score": 85}, {"id": 2, "name": "李娜", "age": 30, "score": 90} ]
  1. 新建 json.R：
   library(jsonlite)
   library(dplyr)
   library(ggplot2)

   # 读取 JSON
   df <- fromJSON("data.json")
   print(df)

   # 处理数据
   df_processed <- df %>%
     mutate(grade = ifelse(score >= 90, "优秀", "良好")) %>%
     filter(age < 30)
   print(df_processed)

   # 写入 JSON
   write_json(df_processed, "processed.json", pretty=TRUE)

   # 可视化
   ggplot(df_processed, aes(x=name, y=score, fill=grade)) +
     geom_bar(stat="identity")
  1. 运行：
  • 选中代码，按 Ctrl+Enter，查看“R 终端”输出： id name age score 1 1 张伟 25 85 2 2 李娜 30 90 id name age score grade 1 1 张伟 25 85 良好
  • 生成 processed.json：
    json [ { "id": 1, "name": "张伟", "age": 25, "score": 85, "grade": "良好" } ]
  • 图表显示在 VSCode 的“绘图”面板。
  • 或运行：
    bash Rscript json.R

如果需要深入讲解（如处理复杂嵌套 JSON、从 API 获取 JSON、与数据分析结合），或有其他问题，请告诉我你的 Linux 发行版、R 版本或具体需求！

类似文章

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注