function - 将文件路径传递给 R 函数？

Question

我试图将文件路径传递给 R 中的函数，但我失败了 =/我希望这里有人可以帮助我。

>heat <- function(filepath) 
{ chicks <- read.table(file=filepath, dec=",", header=TRUE, sep="\t")
...
}

当我调用函数时，没有任何反应......

>heat("/home/.../file.txt")

...并且未找到“小鸡”

>chicks
Error: Object 'chicks' not found

将路径传递给函数的正确方法是什么？

Answer 1

您应该能够按原样传递文件路径(如果文件存在)。您还可以使用 list.files() [使用参数 full.names=TRUE] 在 R 中查询文件路径。但是，在这种情况下，我相信您看不到 chicks，因为它是函数的本地变量，因此您将无法在函数外部看到此变量。此外，如果您的最后一个表达式是赋值，我相信不会打印输出。尝试

> heat <- function(filepath) { 
+   read.table(file=filepath, dec=",", header=TRUE, sep="\t")
+ }
> heat("/home/.../file.txt")

或

> chicks <- heat("/home/.../file.txt")
> chicks

您应该会看到chicks。或者，如果您希望在分配时看到它被打印出来，请在语句两边添加括号:

> (chicks <- heat("/home/.../file.txt"))

如果你想在函数内分配给 chicks 但在函数完成后仍然看到它，

> heat <- function(filepath) { 
+   chicks <- read.table(file=filepath, dec=",", header=TRUE, sep="\t")
+   assign("chicks",chicks,globalenv())
+ }