R程序直接根据代码中分配的名称打开文件

Question

我有一段代码，最初要求用户键入数据文件名并将其分配给变量nm，然后选择参考文件名。我想将其转换为将数据文件直接分配给变量nm的参数，并根据在参数中输入的名称自动选择参考文件。

到目前为止，我已经尝试过了，但是仍然感觉很手动。

library("openxlsx")
nm=readline("Enter  data file name:tdd_data4.xlsx") 
readline("Enter input file name: (Press Enter)")
input_file=read.xlsx(file.choose(tdd_rinput2.xlsx))

Answer 1

我认为您正在寻找类似的东西。但这要求用户键入整个文件路径。我在下面的解决方案中假设一个。

nm <- readline("Enter data file name: (press enter to continue)")
input_file <- read.csv(file.path("C:/Users/Desktop", nm))