Create one zip file for each brucker sample path

nmr_zip_bruker_samples(path, workdir, overwrite = FALSE, ...)

Arguments

path

Character vector with sample directories

workdir

Directory to store zip files

overwrite

Should existing zip files be overwritten?

...

Passed to utils::zip

Value

A character vector of the same length as path, with the zip file names

Examples

save_zip_files_to <- tempfile(pattern = "zip_file_storage_")
where_your_samples_are <- tempfile(pattern = "where_your_samples_are")
# prepare sample:
zip::unzip(
  system.file("dataset-demo", "10.zip", package = "AlpsNMR"),
  exdir = where_your_samples_are
)

outpaths <- nmr_zip_bruker_samples(
    list.files(where_your_samples_are, full.names = TRUE),
    workdir = save_zip_files_to
)