自动设置r中的路径目录

Question

我构建了一个自动程序，它只需要用户修改启动文件中的几个参数。

我问自己是否有可能根据自定义的"年份"自动实现文件路径自动化。和";month">

?

Launch.r
| Import.r   #(load librairies and call specific programs)
| Topic1.r
|.......
| Topic2.r
......

#-- > Launch file

# Parameters to be personalized by the user  
year <-  2021
month <- 01


# File directory
import <- c('c:/folderX/year/month/folder')
export <- c('c:/folderX/year/export/folder1')


.....

当我运行程序时，R排序

import    "c:/folderX/year/month/folder"
export    "c:/folderX/year/export/folder1"

我的目标是得到

import  "c:/folderX/2021/01/folder"
export  "c:/folderX/2021/export/folder1"

你有什么建议可以帮助我吗?

Answer 1

如果我正确理解问题，file.path可以接受变量作为路径的一部分，例如

year <-  2021
month <- 01
import <- file.path("c:/folderX", year, month, "folder")

应该给

#> [1] "c:/folderX/2021/1/folder"

Answer 2

您还可以使用glue包从模板生成字符串:

# Parameters to be personalized by the user  
library(glue)
year <-  2021
month <- 01

# File directory
import <- glue(
'c:/folderX/{year}/{month}/folder', 
month = sprintf('%02d', month), 
year = year
)
export <- glue(
'c:/folderX/{year}/{month}/folder1', 
month = sprintf('%02d', month), 
year = year
)
# glue can also take variables from environment:
export <- glue(
'c:/folderX/{year}/{month}/folder1'
)
# in this case just make sure that month variable is a string in correct format