如何通过函数设置目录？

Question

When I start my PC, my current directory is:

C:\Users\kieken\Documents

However, my working directory for R should be:

C:\Users\kieken\Dropbox\science\R programming

For this case only, my data is stored in the following folder:

C:\Users\kieken\Dropbox\science\R programming\specdata

I have to to write a function that uses only the last part of this path:

pollutantmean("specdata", "sulfate", 43:44)

How do I use a variable "directory" in my function definition so that when I assign "specdata" to the variable "directory", everything works fine?

Answer 1

You can use file.path :

path <- "C:\\Users\\kieken\\Dropbox\\science\\R programming"
directory <- "specdata"

mypath <- file.path(path, directory, fsep = "\\")
# [1] "C:\\Users\\kieken\\Dropbox\\science\\R programming\\specdata"

Then you can use

setwd(mypath)