read.csv显式路径字符串中的变量

问题：

    mainDir <- "C:/Users/"
    subDir <- "G"

    if (file.exists(subDir)) {
        userName <- "John"
    } else {
        userName <- "Mike"
    }

    sampleData <- read.csv("C:/Users/", userName, "/Google Drive/data/sampleData.csv")

如何将变量插入到read.csv函数中嵌套的显式目录路径中？尝试cat和sprintf没有起作用，可能是因为函数是嵌套的

R代码：

    mainDir <- "C:/Users/"
    subDir <- "G"

    if (file.exists(subDir)) {
        userName <- "John"
    } else {
        userName <- "Mike"
    }

    sampleData <- read.csv("C:/Users/", userName, "/Google Drive/data/sampleData.csv")

---

mainDir鉴于上述@Dan Y和@Edward Carney的建议：

pathStart <- "C:/Users/"

if (file.exists("C:/Users/John")) {
    pathMiddle <- "John"
} else {
    pathMiddle <- "Mike"
}

pathEnd <- "/Google Drive/data/sampleData.csv"

sampleData <- read.csv(paste0(pathStart, pathMiddle, pathEnd, sep=''))

pathStart您需要
paste（）
如
read.csv（paste0（“string1”，userName，“string2”））
粘贴（“C:/Users/”，userName，“/Google Drive/data/sampleData.csv”，sep=”）
确保
sep
为空字符串；因此，将两个单引号放在一起。