## Set a temporal working directory:
wd <- tempdir()
wd0 <- setwd(wd)
## Create origin and destination directories and copy example input files:
dir.create('dir1'); dir.create('dir2')
file.copy(exampleFiles('p064.xlsx'),'dir1')
file.copy(exampleFiles('p082.xlsx'),'dir1')
file.copy(exampleFiles('p084.xlsx'),'dir1')
## Now run the example:
xls2csv('dir1','dir2','TN',datcols=c(1:3,6))
## 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