extract Data from a Opus file (X-values)

OpusData.R

@@ -0,0 +1,13 @@
+#!/usr/bin/env Rscript
+#if (!require("remotes")) install.packages("remotes")
+#remotes::install_github("philipp-baumann/simplerspec")
+
+file_path <- "D:\\OpusData\\Spektrometer Anbindung\\Test Daten\\OPUS\\Rng02_Rng2630_01.0"
+
+data <- read_opus_univ(file_path, extract = "AB",
+                   atm_comp_minus4offset = FALSE)
+ 
+print(data[1])
+
+print(ls())
+