RStudio文件保存失败：无效参数问题求助

问题现象 #

• 初始故障：无法生成图表，清理存储空间（从剩余数MB释放至3GB）后该问题解决
• 当前故障：自动保存功能报错，重启RStudio后手动保存文件时触发错误：

  Error Saving File Error Saving ~/Desktop/Stats/FileName.R: Invalid Argument

• 运行环境：macOS Catalina 10.15.7，RStudio 2022.07.1+554 "Spotted Wakerobin"
• 现状：代码执行正常，但无法完成自动/手动保存，只能通过复制粘贴到Google Docs临时留存代码

解决步骤 #

1. 检查文件路径与权限 #

• 确认目标文件夹~/Desktop/Stats存在，且当前用户拥有读写权限：
  • 打开终端执行命令：ls -ld ~/Desktop/Stats，查看输出中的权限字段是否包含当前用户的读写权限
  • 手动在该文件夹新建普通文本文件，验证系统层面是否允许写入
• 将文件名修改为纯英文+数字的形式，避免包含空格、中文、特殊标点等可能引发解析错误的字符

2. 重置RStudio配置 #

• 完全退出RStudio（包括后台运行的进程）
• 打开终端执行命令备份并重置配置：

  mv ~/.rstudio-desktop ~/.rstudio-desktop-backup
  

• 重新启动RStudio，尝试保存文件

3. 验证版本兼容性 #

• 当前RStudio 2022.07.1版本与macOS Catalina 10.15.7可能存在兼容性问题，可尝试降级至适配旧系统的版本（如2021.09.x系列）
• 检查R版本是否为最新稳定版，执行以下命令查看版本信息，若过时则更新：

  sessionInfo()
  

4. 应急保存方案 #

• 可通过R控制台命令直接将剪贴板中的代码写入文件：

  writeLines(readClipboard(), "/Users/name/Desktop/Stats/FileName.R")
  

• 尝试使用File -> Save As选择其他路径（如用户主目录）保存文件

用户项目代码 #

setwd("/Users/name/Desktop/Stats")
data <-read.table("RealEstateSales.txt", header=T)
attach(data)
data

Age <- 2002 - X7
Age

Df2 <- data.frame(Y,X1,X6,X9,Age) #Create D.f. omitting 
# irrelevant variables
Df2

#X9 is coded 1-11 for architecture style
#X6 is coded 1/0. 1 for having a pool, 0 for not having a 
#pool
#Y is sales price, X1 is square footage 
plot(X1, Y)
table(X6) 
table(X9)
plot(Age,Y)

library(caTools)
set.seed(1234567890) 
inx <- sample.split(seq_len(nrow(Df2)), 400)
traind <- Df2[inx, ]  
nrow(traind) 
testd <- Df2[!inx, ]
nrow(testd)

table(X6)

table(X9)
hist(X9)

plot(X1, Y)
f1 <- factor(X6)
plot(X1, Y, pch = 20, col =  c("red", "blue")[f1])

f2 <- factor(X9)
plot(X1, Y, pch = 20, col = c("red", "blue", "black", 
       "green", "purple", "orange", "cyan", "maroon", 
       "cyan1","brown1","chocolate4")[f2])

interaction.plot(X1, Age, Y, lwd = 3)

plot(Age, Y)
plot(Age, Y, pch = 20, col =  c("red", "blue")[f1])

plot(Age, Y, pch = 20, col = c("red", "blue", "black", 
          "green", "purple","orange", "cyan", "maroon", 
          "cyan1","brown1","chocolate4")[f2])

boxplot(Y ~ X6) 
tapply(Y, X6, mean) 
t.test(Y ~ X6)

boxplot(Y ~ X9)
tapply(Y, X9, mean)

summary(aov(Y ~ X9))

tapply(Df2$Y, list(Df2$X6,Df2$X9), mean)
plot(X9,Y,pch = 20, col =  c("red", "blue")[f1])

Dfsub1 <- subset(Df2, select= c('Y', 'X1', 'Age')) 
cor(Dfsub1)

a <- table(X9,X6) 
fisher.test(a) 
chisq.test(a,simulate.p.value = TRUE)

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