From 571ccd56ca4bc960da7d70b1a957bae23fb8d2d7 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 19:08:45 +0100 Subject: [PATCH 01/18] add first new key for time-resolved spectra --- R/create_dataset.R | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index 57ade248..e99903bc 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -43,6 +43,7 @@ create_dataset <- function(header_data) { "b11-c4-t0-a(0|64)" = c(read_class = "data", block_type_name = "sc_ref"), "b11-c8-t0-a(0|64)" = c(read_class = "data", block_type_name = "ig_ref"), "b11-c12-t0-a(0|64)" = c(read_class = "data", block_type_name = "ph_ref"), + # block code 15 ----------------------------------------------------------------------------- # spectrum report blocs # channel code 15: save (apparent) absorbance @@ -59,6 +60,9 @@ create_dataset <- function(header_data) { "b15-c88-t0-a(0|64)" = c(read_class = "data", block_type_name = "match"), "b15-c216-t0-a(0|64)" = c(read_class = "data", block_type_name = "match_2_chn"), + # block code 16 ----------------------------------------------------------------------------- + # "b16-c28-t80-a0" = c(read_class, block_type_name) + # block code 23 ----------------------------------------------------------------------------- # data parameters (metadata) for spectrum types of sample "b23-c4-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "sc_sample_data_param"), From 811030572705f304d22e7ad8c7ebe69d6fb7aced Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 19:45:16 +0100 Subject: [PATCH 02/18] tentatively add new block 11 key for time-resolved spectra --- R/create_dataset.R | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index e99903bc..f93e7bff 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -44,6 +44,9 @@ create_dataset <- function(header_data) { "b11-c8-t0-a(0|64)" = c(read_class = "data", block_type_name = "ig_ref"), "b11-c12-t0-a(0|64)" = c(read_class = "data", block_type_name = "ph_ref"), + # new key for time-resolved spectra + "b11-c136-t0-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved11"), + # block code 15 ----------------------------------------------------------------------------- # spectrum report blocs # channel code 15: save (apparent) absorbance @@ -61,7 +64,8 @@ create_dataset <- function(header_data) { "b15-c216-t0-a(0|64)" = c(read_class = "data", block_type_name = "match_2_chn"), # block code 16 ----------------------------------------------------------------------------- - # "b16-c28-t80-a0" = c(read_class, block_type_name) + # new key for time-resolved spectra + "b16-c28-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved16"), # block code 23 ----------------------------------------------------------------------------- # data parameters (metadata) for spectrum types of sample From ef060c04d2574ebb0333160ca06004971e381533 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 19:50:28 +0100 Subject: [PATCH 03/18] Tentative key mapping for block 27 for time-resolved spectra --- R/create_dataset.R | 3 +++ 1 file changed, 3 insertions(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index f93e7bff..257d23a2 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -79,6 +79,9 @@ create_dataset <- function(header_data) { "b27-c8-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ig_ref_data_param"), "b27-c12-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ph_ref_data_param"), + # new key for time-resolved spectra + "b27-c136-t0-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved27"), + # block code 31 ----------------------------------------------------------------------------- # data parameters (metadata) when spectra (normalized single channels) saved in apparent absorbance "b31-c16-t0-a64" = c(read_class = "parameter", block_type_name = "ab_no_atm_comp_data_param"), From 6d290dd8925a1ae37861708ea9fb9f9755be993b Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 19:53:45 +0100 Subject: [PATCH 04/18] tentative key for block 27 channel 132 --- R/create_dataset.R | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index 257d23a2..98d868bc 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -79,8 +79,9 @@ create_dataset <- function(header_data) { "b27-c8-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ig_ref_data_param"), "b27-c12-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ph_ref_data_param"), - # new key for time-resolved spectra - "b27-c136-t0-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved27"), + # new keys for time-resolved spectra + "b27-c132-t0-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved27_c132"), + "b27-c136-t0-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved27_c136"), # block code 31 ----------------------------------------------------------------------------- # data parameters (metadata) when spectra (normalized single channels) saved in apparent absorbance From 0537a045a46cad1b31d38cf3139509ef947df6c6 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 19:57:36 +0100 Subject: [PATCH 05/18] tentative block 11, channel 132 --- R/create_dataset.R | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index 98d868bc..72a5343e 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -44,8 +44,10 @@ create_dataset <- function(header_data) { "b11-c8-t0-a(0|64)" = c(read_class = "data", block_type_name = "ig_ref"), "b11-c12-t0-a(0|64)" = c(read_class = "data", block_type_name = "ph_ref"), - # new key for time-resolved spectra - "b11-c136-t0-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved11"), + # new keys for time-resolved spectra + # new keys for time-resolved spectra + "b11-c132-t0-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved11_c132"), + "b11-c136-t0-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved11_b136"), # block code 15 ----------------------------------------------------------------------------- # spectrum report blocs From 70bf3783fc6bc10e1711d1d90285d697c0307aa0 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:01:15 +0100 Subject: [PATCH 06/18] tentative block 7, channel 132 --- R/create_dataset.R | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index 72a5343e..8e499793 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -38,13 +38,15 @@ create_dataset <- function(header_data) { "b7-c8-t0-a(0|64)" = c(read_class = "data", block_type_name = "ig_sample"), "b7-c12-t0-a(0|64)" = c(read_class = "data", block_type_name = "ph_sample"), + # new key for time-resolved spectra + "b7-c132-t80-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved7_c132"), + # block code 11 ---------------------------------------------------------------------------- # spectrum types of reference (background) "b11-c4-t0-a(0|64)" = c(read_class = "data", block_type_name = "sc_ref"), "b11-c8-t0-a(0|64)" = c(read_class = "data", block_type_name = "ig_ref"), "b11-c12-t0-a(0|64)" = c(read_class = "data", block_type_name = "ph_ref"), - # new keys for time-resolved spectra # new keys for time-resolved spectra "b11-c132-t0-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved11_c132"), "b11-c136-t0-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved11_b136"), From 04a8e5b5a05571dd9271447c4ab35a909b8f5589 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:05:37 +0100 Subject: [PATCH 07/18] tentative block 23, channel 136 --- R/create_dataset.R | 3 +++ 1 file changed, 3 insertions(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index 8e499793..a3774252 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -77,6 +77,9 @@ create_dataset <- function(header_data) { "b23-c8-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ig_sample_data_param"), "b23-c12-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ph_sample_data_param"), + # new key for time-resolved spectra + "b23-c136-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c136"), + # block code 27 ----------------------------------------------------------------------------- # data parameters (metadata) for spectrum types of reference (background) "b27-c4-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "sc_ref_data_param"), From 48736614243bf9382942457ea5df79b858f42712 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:07:13 +0100 Subject: [PATCH 08/18] tentative block 23, channel 4 --- R/create_dataset.R | 1 + 1 file changed, 1 insertion(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index a3774252..254a1cbb 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -78,6 +78,7 @@ create_dataset <- function(header_data) { "b23-c12-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ph_sample_data_param"), # new key for time-resolved spectra + "b23-c4-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c4"), "b23-c136-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c136"), # block code 27 ----------------------------------------------------------------------------- From 1ffa3fff36d585b995ed77d1c7c945ecbe362a95 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:10:48 +0100 Subject: [PATCH 09/18] tentative block 15, channel 16 --- R/create_dataset.R | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index 254a1cbb..84ed4787 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -58,6 +58,8 @@ create_dataset <- function(header_data) { "b15-c16-t104-a1" = c(read_class = "parameter", block_type_name = "me_test_report_ab"), "b15-c16-t0-a64" = c(read_class = "data", block_type_name = "ab_no_atm_comp"), "b15-c16-t0-a0" = c(read_class = "data", block_type_name = "ab"), + # new key for time-resolved spectra + "b15-c16-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved15_c16"), # channel code 48: save reflectance (settings "b15-c48-t112-a0" = c(read_class = "parameter", block_type_name = "quant_report_refl"), "b15-c48-t104-a1" = c(read_class = "parameter", block_type_name = "me_test_report_refl"), # check "a1" @@ -77,7 +79,7 @@ create_dataset <- function(header_data) { "b23-c8-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ig_sample_data_param"), "b23-c12-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ph_sample_data_param"), - # new key for time-resolved spectra + # new keys for time-resolved spectra "b23-c4-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c4"), "b23-c136-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c136"), From d5d5012638667ee80765e6220a25ccbe4dc11cd7 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:16:25 +0100 Subject: [PATCH 10/18] tentative block 7, channels 4 and 8 --- R/create_dataset.R | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index 84ed4787..4beabd24 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -35,6 +35,10 @@ create_dataset <- function(header_data) { # block code 7 ----------------------------------------------------------------------------- # spectrum types of sample "b7-c4-t0-a(0|64)" = c(read_class = "data", block_type_name = "sc_sample"), + + # new keys for time-resolved spectra + "b7-c4-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved7_c4"), + "b7-c8-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved7_c8"), "b7-c8-t0-a(0|64)" = c(read_class = "data", block_type_name = "ig_sample"), "b7-c12-t0-a(0|64)" = c(read_class = "data", block_type_name = "ph_sample"), From caae04156d6c65e12f1494b5be59a20b74bbe2c8 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:38:35 +0100 Subject: [PATCH 11/18] Tentative block 7, channel 136 --- R/create_dataset.R | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index 4beabd24..a022e075 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -42,8 +42,9 @@ create_dataset <- function(header_data) { "b7-c8-t0-a(0|64)" = c(read_class = "data", block_type_name = "ig_sample"), "b7-c12-t0-a(0|64)" = c(read_class = "data", block_type_name = "ph_sample"), - # new key for time-resolved spectra + # new keys for time-resolved spectra "b7-c132-t80-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved7_c132"), + "b7-c136-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved7_c136"), # block code 11 ---------------------------------------------------------------------------- # spectrum types of reference (background) From da977b5c9a570493fed17ca463814449d44eabcf Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:45:08 +0100 Subject: [PATCH 12/18] tentative: fix `read_class` --- R/create_dataset.R | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index a022e075..9977c35f 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -37,14 +37,14 @@ create_dataset <- function(header_data) { "b7-c4-t0-a(0|64)" = c(read_class = "data", block_type_name = "sc_sample"), # new keys for time-resolved spectra - "b7-c4-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved7_c4"), - "b7-c8-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved7_c8"), + "b7-c4-t80-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved7_c4"), + "b7-c8-t80-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved7_c8"), "b7-c8-t0-a(0|64)" = c(read_class = "data", block_type_name = "ig_sample"), "b7-c12-t0-a(0|64)" = c(read_class = "data", block_type_name = "ph_sample"), # new keys for time-resolved spectra "b7-c132-t80-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved7_c132"), - "b7-c136-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved7_c136"), + "b7-c136-t80-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved7_c136"), # block code 11 ---------------------------------------------------------------------------- # spectrum types of reference (background) @@ -76,6 +76,7 @@ create_dataset <- function(header_data) { # block code 16 ----------------------------------------------------------------------------- # new key for time-resolved spectra + # tbd check `read_class` "b16-c28-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved16"), # block code 23 ----------------------------------------------------------------------------- @@ -103,6 +104,9 @@ create_dataset <- function(header_data) { "b31-c16-t0-a64" = c(read_class = "parameter", block_type_name = "ab_no_atm_comp_data_param"), "b31-c16-t0-a0" = c(read_class = "parameter", block_type_name = "ab_data_param"), + # new key for time-resolved spectra + "b31-c16-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved31_c16"), + # data parameters (metadata) when spectra (normalized single channels) saved in reflectance "b31-c48-t0-a64" = c(read_class = "parameter", block_type_name = "refl_no_atm_comp_data_param"), "b31-c48-t0-a0" = c(read_class = "parameter", block_type_name = "refl_data_param"), From 1b13a5dbfc17f688f1ad08be847658ce89855b00 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:50:16 +0100 Subject: [PATCH 13/18] tentative block 23, channels 8 and 132 --- R/create_dataset.R | 2 ++ 1 file changed, 2 insertions(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index 9977c35f..8af3ad11 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -87,6 +87,8 @@ create_dataset <- function(header_data) { # new keys for time-resolved spectra "b23-c4-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c4"), + "b23-c8-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c8"), + "b23-c132-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c132"), "b23-c136-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c136"), # block code 27 ----------------------------------------------------------------------------- From 6bb2f74b35ae531e7a037184c572749de95de902 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:53:38 +0100 Subject: [PATCH 14/18] tentative block 31, channel 134 --- R/create_dataset.R | 3 +++ 1 file changed, 3 insertions(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index 8af3ad11..f438e7a6 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -115,6 +115,9 @@ create_dataset <- function(header_data) { # data parameters (metadata) for spectra matching "b31-c88-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "match_data_param"), + + # new key for time-resolved spectra + "b31-c144-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved31_c144"), "b31-c216-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "match_2_chn_data_param"), ## General metadata blocks From 24023ba90e9c44d8a6dd4e3aa2d76dd58b9b6a34 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 20:59:29 +0100 Subject: [PATCH 15/18] tentative block 0, channel 28; could be parameter --- R/create_dataset.R | 3 +++ 1 file changed, 3 insertions(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index f438e7a6..25a2d42d 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -32,6 +32,9 @@ create_dataset <- function(header_data) { # guess general text "b0-c0-t\\d+-a(0|64)" = c(read_class = "text", block_type_name = "text_information"), + # new key for time-resolved spectra + "b0-c28-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved0_c28"), + # block code 7 ----------------------------------------------------------------------------- # spectrum types of sample "b7-c4-t0-a(0|64)" = c(read_class = "data", block_type_name = "sc_sample"), From a0e0a4849573e3dc0ecd3102b56883b426ec02b4 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 21:13:36 +0100 Subject: [PATCH 16/18] tentative block 15, channel 144 --- R/create_dataset.R | 3 +++ 1 file changed, 3 insertions(+) diff --git a/R/create_dataset.R b/R/create_dataset.R index 25a2d42d..67236fff 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -75,6 +75,9 @@ create_dataset <- function(header_data) { "b15-c48-t0-a0" = c(read_class = "data", block_type_name = "refl"), # channel code 88 and 216: spectra matching "b15-c88-t0-a(0|64)" = c(read_class = "data", block_type_name = "match"), + + # new key for time-resolved spectra + "b15-c144-t80-a0" = c(read_class = "data", block_type_name = "unknown_timeresolved15_c144"), "b15-c216-t0-a(0|64)" = c(read_class = "data", block_type_name = "match_2_chn"), # block code 16 ----------------------------------------------------------------------------- From 558a2022cc9a3c64958b0eefb86dd0ecf11f8d06 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 21:33:30 +0100 Subject: [PATCH 17/18] fix data types for block 23 channel 4 and block 27 channel 136 --- R/create_dataset.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index 67236fff..dc772530 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -92,7 +92,7 @@ create_dataset <- function(header_data) { "b23-c12-t0-a(0|64)" = c(read_class = "parameter", block_type_name = "ph_sample_data_param"), # new keys for time-resolved spectra - "b23-c4-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c4"), + "b23-c4-t80-a0" = c(read_class = "text", block_type_name = "unknown_timeresolved23_c4"), "b23-c8-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c8"), "b23-c132-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c132"), "b23-c136-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved23_c136"), @@ -105,7 +105,7 @@ create_dataset <- function(header_data) { # new keys for time-resolved spectra "b27-c132-t0-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved27_c132"), - "b27-c136-t0-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved27_c136"), + "b27-c136-t0-a0" = c(read_class = "text", block_type_name = "unknown_timeresolved27_c136"), # block code 31 ----------------------------------------------------------------------------- # data parameters (metadata) when spectra (normalized single channels) saved in apparent absorbance From fb738b383a48c2670035ba5e29a81e8c44f91c20 Mon Sep 17 00:00:00 2001 From: Philipp Baumann Date: Sat, 11 Feb 2023 21:53:56 +0100 Subject: [PATCH 18/18] block 15, channel 16 might be a more complex data structure --- R/create_dataset.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/create_dataset.R b/R/create_dataset.R index dc772530..f803e9f6 100644 --- a/R/create_dataset.R +++ b/R/create_dataset.R @@ -67,7 +67,7 @@ create_dataset <- function(header_data) { "b15-c16-t0-a64" = c(read_class = "data", block_type_name = "ab_no_atm_comp"), "b15-c16-t0-a0" = c(read_class = "data", block_type_name = "ab"), # new key for time-resolved spectra - "b15-c16-t80-a0" = c(read_class = "parameter", block_type_name = "unknown_timeresolved15_c16"), + "b15-c16-t80-a0" = c(read_class = "text", block_type_name = "unknown_timeresolved15_c16"), # channel code 48: save reflectance (settings "b15-c48-t112-a0" = c(read_class = "parameter", block_type_name = "quant_report_refl"), "b15-c48-t104-a1" = c(read_class = "parameter", block_type_name = "me_test_report_refl"), # check "a1"