Question

我尝试创建一个允许我快速导入文件的函数，但是我无法使用我想要的名称导入它。

代码如下：

g.import<- function(x) {
  x <<- read.csv(file.choose(), header=TRUE, sep=",")
  assign('x',x,envir=.GlobalEnv)
  return(head(x,3))
}
g.import(x=a)

我将获得名为x的导入文件，但我希望能够更改名称...

Answer 1

首先，<<-和assign()部分是多余的。如果要使用字符值调用，可以使用

g.import<- function(x) {
  z <- read.csv(file.choose(), header=TRUE, sep=",")
  assign(x,z,envir=.GlobalEnv)
  return(head(z,3))
}
g.import(x="a")

使用不带引号的符号进行呼叫，您可以使用

g.import<- function(x) {
  z <- read.csv(file.choose(), header=TRUE, sep=",")
  assign(deparse(substitute(x)),z,envir=.GlobalEnv)
  return(head(z,3))
}
g.import(x=a)

如何在R中创建导入函数中更改引用？

1 个答案: