小编dav*_*ted的帖子

我希望获得R中文件的完全限定名称,给出任何标准符号.例如:

• file.ext
• 〜/ file.ext(这种情况可以处理path.expand)
• ../current_dir/file.ext
• 等等

通过完全限定的文件名,我的意思是,例如,(在类Unix系统上):

/home/user/some/path/file.ext

(已编辑 - 使用file.path并尝试Windows支持)粗略的实现可能是:

path.qualify <- function(path) {
  path <- path.expand(path)
  if(!grepl("^/|([A-Z|a-z]:)", path)) path <- file.path(getwd(),path)
  path
}

但是,我理想地喜欢可以处理相对路径的跨平台../,符号链接等.一个只有R的解决方案将是首选(而不是shell脚本或类似),但我找不到任何直接的方法来做到这一点,而不是"从头开始"编码.

有任何想法吗？

我目前正在循环中调用带有多个参数rp.slider的tkrplot库,例如:

rp.slider(rpplot, param1)
rp.slider(rpplot, param2)

等等

理想情况下,我想在循环中执行此操作,例如

for(i in 1:10) 
  rp.slider(rpplot, foo(paste(param,i,sep="")))

当foo将编码字符串变量名称(符号？).rp.slider使用将参数转换为字符串deparse(substitute(var)).有没有foo让我这样做的功能？我试过as.symbol,as.name和parse(等等)都没有成功.

任何帮助将非常感激!

澄清一下,deparse(substitute(x))返回[1] "x"- 我想要一种从字符串返回相同输出的方法,即哪些foo输出[1] "x"用于输入deparse(substitute(foo("x")))？可能吗？