按R中的转义符拆分（字符串到列表）

Question

我编写了以下代码：

path <- "C:/user/blabla"


gerpath <- function(path) {
    splittet <- strsplit(path, "/", fixed = TRUE)
    for(i in 1:length(splittet[[1]])) {
        if(i == 1) {
            result <- splittet[[1]][i]
        } else {
            result <- paste0(result, "//", splittet[[1]][i])  
        }

    }
    return(result)
}

gerpath(path)

德语中复制路径的问题是它使用"\"而不是"/"，并且被评估为转义字符。我想要一个能够执行以下操作的功能：

splittet <- strsplit(path, "\", fixed = TRUE)

有没有一种方法可以防止将该字符评估为转义字符？

谢谢：-）