R语言write.table写入CSV报错：Permission denied权限拒绝问题求解

以下是针对权限拒绝问题的具体解决步骤：

• 检查目标路径的权限与存在性
  首先确认输出路径是否存在，运行以下代码验证：

  # 检查路径是否存在
  print(dir.exists(dirname(input_fileName)))
  # 如果不存在则递归创建路径
  if (!dir.exists(dirname(input_fileName))) {
    dir.create(dirname(input_fileName), recursive = TRUE)
  }
  

  同时手动检查文件夹的系统权限：

  • Windows：右键目标文件夹 → 属性 → 安全，确保当前用户拥有「写入」权限
  • Linux/macOS：在终端运行ls -l 目标文件夹路径，查看权限位是否包含当前用户的写入权限（w）

• 确认文件未被其他程序占用
  如果目标CSV文件已存在，检查是否被Excel、记事本、WPS等程序打开——这类程序会锁定文件，导致R无法写入。关闭所有占用该文件的程序后重新运行脚本。

• 更换到用户有权限的写入路径
  避免写入系统保护目录（如Windows的C:\Program Files、Linux的/root），换成用户个人目录：

  # Windows用户写入文档目录
  input_fileName <- file.path(Sys.getenv("USERPROFILE"), "Documents", paste0("input_1", now_1, ".csv"))
  # Linux/macOS用户写入主目录
  input_fileName <- file.path(Sys.getenv("HOME"), paste0("input_1", now_1, ".csv"))
  

• 验证输出路径的合法性
  打印完整路径确认是否包含特殊字符、空格或过长路径：

  print(input_fileName)
  

  若路径有问题，调整文件名或路径结构（比如去掉特殊符号）。

• 尝试用write.csv替代（可选）
  虽然write.table更灵活，但write.csv是专门针对CSV的封装函数，试试是否能绕过权限问题：

  write.csv(dataframe_1, file = input_fileName, row.names = FALSE, col.names = FALSE, quote = FALSE)
  

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