Error in getwd("~/Desktop/PTEN、免疫细胞与HER2+BC/04WGCNA") : unused argument ("~/Desktop/PTEN、免疫细胞与HER2+BC/04WGCNA")

这个错误提示 "Error in getwd(\"~/Desktop/PTEN、免疫细胞与HER2+BC/04WGCNA\") : unused argument \"~/Desktop/PTEN、免疫细胞与HER2+BC/04WGCNA\"" 出现在 R 语言环境中，当你尝试使用 `getwd()` 函数获取工作目录路径时，函数接收到一个非预期的参数。

`getwd()` 是用于获取当前工作目录（Working Directory）的，但它并不接受字符串作为参数。你在函数调用里提供的 "~/Desktop/PTEN、免疫细胞与HER2+BC/04WGCNA" 看起来像是一个文件路径或者是包含了额外字符的路径名，但这不是该函数期望的输入形式。

正确的做法应该是直接调用 `getwd()` ，无需传递任何参数，系统会自动返回当前的工作目录。如果想获取特定路径下的信息，你应该使用 `file.path()` 或 `setwd()` 函数，前者用于构建完整路径，后者则用于改变工作目录。

例如，如果你想确认某个路径是否有效，可以这样操作：

path_to_check <- "/path/to/directory"
if (file.exists(path_to_check)) {
  print(paste("Path exists:", path_to_check))
} else {
  print("Path does not exist.")
}