使用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机器，但如果需要的话，我会很惊讶。