# Path where raw 'SPSS' files are
input <- system.file("extdata/timssadv", package = "ILSAmerge")
# Path where merged files will be saved
dir.create(file.path(tempdir(),"addSchools"))
output <- file.path(tempdir(),"addSchools")
# Merging 'TIMSS' Advanced 1995, as .rds file
ILSAmerge(inputdir = input, outputdir = output, filetype = "rds", quiet = FALSE)
# Check file names
list.files(output,pattern = ".rds")
# Add school data
addSchools(inputdir = output, outputdir = output)
# Check file names
list.files(output,pattern = ".rds")
Run the code above in your browser using DataLab