Note:

Package hyperSpec and it’s friends provide a number of vignettes to help you get started.

kaisermap_path <- system.file("extdata/spc.Kaisermap", package = "hySpc.read.spc")
hySpc.read.spc::read_spc(paste0(kaisermap_path,"/ebroAVII.spc"), keys_log2data = TRUE)

labram_path <- system.file("extdata/spc.LabRam", package = "hySpc.read.spc")
hySpc.read.spc::read_spc(paste0(labram_path,"/LabRam-2.spc"))