# get the reference library file
cdfpath <- file.path(find.package("TargetSearchData"), "gc-ms-data")
lib.file <- file.path(cdfpath, "library.txt")
# Import the reference library
refLibrary <- ImportLibrary(lib.file)
# save it to a file
writeLibText(refLibrary, file="libraryCopy.txt")
Run the code above in your browser using DataLab