## Set a temporal working directory:
wd <- tempdir()
wd0 <- setwd(wd)
## copy example daily sunshine homogenization results:
file.copy(exampleFiles('SS_1991-2000.rda'),'.')
## Now run the example:
fix.sunshine('SS',1991,2000)
## Return to user's working directory:
setwd(wd0)
## Input and output files can be found in the directory:
print(wd)
Run the code above in your browser using DataLab