将文件名转换为R中的全局变量

Question

我有一个函数可以导入用户指定的excel文件并将其转换为全局变量＆＃34; a＆＃34;：

library(tcltk)
library(readxl)

getXlsx <- function() {
  xlsheet <- tclvalue(tkgetOpenFile(
    filetypes = "{ {Excel Files} {.xlsx} } { {All Files} * }"))
  a <- read_excel(xlsheet)
  assign("a", a, envir = .GlobalEnv)
}

我需要一个可以添加到此函数的命令来创建另一个全局变量，其中包含导入文件的名称/路径。

谢谢。