r - 使用 gWidgets 选择文件

Question

下面是使用 gWidgets 包创建的 R 小部件的人工示例：

library(gWidgets)
options("guiToolkit"="RGtk2")

f <- function(file){
    dat <- read.table(file, header=TRUE)
return(dat[1,])
}

lst <- list() 
    lst$action <- list(beginning="f(",ending=")")
    lst$arguments$file <- list(type="gfilebrowse")

ggenericwidget(lst, container=gwindow("Example"))

使用 Windows 浏览和选择文件时会出现问题：文件路径中的反斜杠没有加倍。如何克服这个问题？我不知道如何用字符串中的双反斜杠替换反斜杠。

Answer 1

您可能想要gsub("/", "\\\\", x)但不确定是否需要。我没有准备好测试的 Windows 机器，但如果需要，我会感到惊讶。