R中使用系统命令参数化解压文件的转义字符问题

我之前也踩过类似的坑——直接写死路径时PowerShell命令跑的好好的，但换成变量拼接就因为引号和转义字符翻车。核心问题是R的字符串解析规则和Windows命令行（PowerShell）的规则不一样，直接拼接会导致路径里的空格、引号被错误拆解，让命令执行失败。下面是几种可靠的解决方案：

方案1：用R内置的shQuote()处理路径（首推） #

shQuote()是R专门为命令行参数设计的转义工具，它会自动给路径加上适配系统的引号，还能处理空格这类特殊字符，完美适配Windows的命令行规则。示例代码：

# 定义参数化路径
in_file <- "C:/My File.zip"
dest_path <- "C:/"

# 构建PowerShell命令
ps_command <- paste0(
  "powershell -command \"Expand-Archive -Path ", 
  shQuote(in_file, type = "cmd"),  # 给输入路径加转义引号
  " -DestinationPath ", 
  shQuote(dest_path, type = "cmd"),  # 给输出路径加转义引号
  " -Force\""
)

# 执行解压命令
system(ps_command)

这里type = "cmd"指定适配Windows命令行的转义逻辑，确保PowerShell能正确识别带空格的路径，不会把路径拆成多个无效参数。

方案2：用glue包简化字符串拼接（更直观） #

如果你已经安装了glue包，它的字符串插值功能能让你更清晰地构建命令，彻底避免手动拼接的转义麻烦：

library(glue)

in_file <- "C:/My File.zip"
dest_path <- "C:/"

# 用单引号包裹路径，避开双引号的转义冲突
ps_command <- glue('powershell -command "Expand-Archive -Path \'{in_file}\' -DestinationPath \'{dest_path}\' -Force"')

system(ps_command)

glue会自动替换变量，单引号在PowerShell中同样可以识别带空格的路径，这样就不用纠结双引号的多层转义了。

方案3：手动转义双引号（不推荐，容易出错） #

如果你不想用额外工具，也可以手动处理双引号的转义，但要注意R和PowerShell的双重转义规则：在R的字符串里，要表示一个传给PowerShell的双引号，需要写\\\"（R先解析成\"，PowerShell再解析成"）。示例：

in_file <- "C:/My File.zip"
dest_path <- "C:/"

ps_command <- paste0(
  "powershell -command \"Expand-Archive -Path \\\"", 
  in_file, 
  "\\\" -DestinationPath \\\"", 
  dest_path, 
  "\\\" -Force\""
)

system(ps_command)

这种方法很容易因为多写/少写转义符出错，尤其是路径里有更多特殊字符时，所以优先推荐前两种方案。

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