Isoreader supports several dual inlet IRMS data formats. This vignette shows some of the functionality for scan data files. For additional information on operations more generally (caching, combining read files, data export, etc.), please consult the operations vignette. For details on downstream data processing and visualization, see the isoprocessor package.
Note: this vignette is still a work in progress.
Reading scan files is as simple as passing one or multiple file or folder paths to the iso_read_scan() function. If folders are provided, any files that have a recognized scan file extensions within those folders will be processed (e.g. all .scn). Here we read several files that are bundled with the package as examples (and whose paths can be retrieved using the iso_get_reader_example() function).
# read scan examples
scan_files <-
iso_read_scan(
iso_get_reader_example("peak_shape_scan_example.scn"),
iso_get_reader_example("background_scan_example.scn"),
iso_get_reader_example("full_scan_example.scn"),
iso_get_reader_example("time_scan_example.scn")
)
#> Info: preparing to read 4 data files (all will be cached)...
#> Info: reading file 'peak_shape_scan_example.scn' with '.scn' reader
#> Info: reading file 'background_scan_example.scn' with '.scn' reader
#> Info: reading file 'full_scan_example.scn' with '.scn' reader
#> Info: reading file 'time_scan_example.scn' from cache...
#> Info: finished reading 4 files in 0.78 secsThe scan_files variable now contains a set of isoreader objects, one for each file. Take a look at what information was retrieved from the files using the iso_get_data_summary() function.
scan_files %>% iso_get_data_summary() %>% rmarkdown::paged_table()
#> Info: aggregating data summary from 4 data file(s)In case there was any trouble with reading any of the files, the following functions provide an overview summary as well as details of all errors and warnings, respectively. The examples here contain no errors but if you run into any unexpected file read problems, please file a bug report in the isoreader issue tracker.
Detailed file information can be aggregated for all isofiles using the iso_get_file_info() function which supports the full select syntax of the dplyr package to specify which columns are of interest (by default, all file information is retrieved).
# all file information
scan_files %>% iso_get_file_info(select = c(-file_root)) %>% rmarkdown::paged_table()
#> Info: aggregating file info from 4 data file(s), selecting info columns 'c(-file_root)'File information can also be modified across an entire collection of isofiles using the iso_select_file_info() and iso_rename_file_info() functions:
# select + rename specific file info columns
scan_files2 <- scan_files %>%
iso_select_file_info(-file_root) %>%
iso_rename_file_info(`Date & Time` = file_datetime)
#> Info: selecting/renaming the following file info across 4 data file(s): '-file_root'
#> Info: renaming the following file info across 4 data file(s): 'file_datetime'->'Date & Time'
# fetch all file info
scan_files2 %>% iso_get_file_info() %>% rmarkdown::paged_table()
#> Info: aggregating file info from 4 data file(s)Any collection of isofiles can also be filtered based on the available file information using the function iso_filter_files. This function can operate on any column available in the file information and supports full dplyr syntax.
# find files that have 'CIT' in the new ID field
scan_files2 %>%
iso_filter_files(type == "High Voltage") %>%
iso_get_file_info() %>%
rmarkdown::paged_table()
#> Info: applying file filter, keeping 2 of 4 files
#> Info: aggregating file info from 2 data file(s)The file information in any collection of isofiles can also be mutated using the function iso_mutate_file_info. This function can introduce new columns and operate on any existing columns available in the file information (even if it does not exist in all files) and supports full dplyr syntax.
scan_files3 <- scan_files2 %>%
iso_mutate_file_info(
# introduce new column
`Run in 2019?` = `Date & Time` > "2019-01-01" & `Date & Time` < "2020-01-01"
)
#> Info: mutating file info for 4 data file(s)
scan_files3 %>%
iso_get_file_info() %>%
rmarkdown::paged_table()
#> Info: aggregating file info from 4 data file(s)Additionally, some IRMS data files contain resistor information that are useful for downstream calculations (see e.g. section on signal conversion later in this vignette):
scan_files %>% iso_get_resistors() %>% rmarkdown::paged_table()
#> Info: aggregating resistors info from 4 data file(s)The raw data read from the scan files can be retrieved similarly using the iso_get_raw_data() function. Most data aggregation functions also allow for inclusion of file information using the include_file_info parameter, which functions identically to the select parameter of the iso_get_file_info function discussed earlier.
# get raw data with default selections (all raw data, no additional file info)
scan_files %>% iso_get_raw_data() %>% head(n=10) %>% rmarkdown::paged_table()
#> Info: aggregating raw data from 4 data file(s)# get specific raw data and add some file information
scan_files %>%
iso_get_raw_data(
# select just time and the two ions
select = c(x, units, v44.mV, v45.mV),
# include the scan type and rename the column
include_file_info = c(`Scan Type` = type)
) %>%
# look at first few records only
head(n=10) %>% rmarkdown::paged_table()
#> Info: aggregating raw data from 4 data file(s), selecting data columns 'c(x, units, v44.mV, v45.mV)', including file info 'c(`Scan Type` = type)'
#> Warning: 'select = c(x, units, v44.mV, v45.mV)' refers to unknown column(s) in data frame 'data':
#> - no applicable method for 'units' applied to an object of class "character"For users familiar with the nested data frames from the tidyverse (particularly tidyr’s nest and unnest), there is an easy way to retrieve all data from the iso file objects in a single nested data frame:
Saving entire collections of isofiles for retrieval at a later point is easily done using the iso_save function which stores collections or individual isoreader file objects in the efficient R data storage format .rds (if not specified, the extension .scan.rds will be automatically appended). These saved collections can be convientiently read back using the same iso_read_scan command used for raw data files.
# export to R data archive
scan_files %>% iso_save("scan_files_export.scan.rds")
#> Info: exporting data from 4 iso_files into R Data Storage 'scan_files_export.scan.rds'
# read back the exported R data storage
iso_read_scan("scan_files_export.scan.rds")
#> Info: preparing to read 1 data files (all will be cached)...
#> Info: reading file 'scan_files_export.scan.rds' with '.scan.rds' reader
#> Info: loaded data for 4 data files from R Data Storage - checking loaded fi...
#> Info: finished reading 1 files in 0.15 secs
#> Data from 4 scan iso files:
#> # A tibble: 4 x 5
#> file_id raw_data file_info method_info file_path
#> <chr> <glue> <chr> <chr> <chr>
#> 1 peak_shape_sca… 220 measurements, 3 io… 8 entries resistors peak_shape_scan…
#> 2 background_sca… 525 measurements, 7 io… 8 entries resistors background_scan…
#> 3 full_scan_exam… 799 measurements, 3 ch… 8 entries resistors full_scan_examp…
#> 4 time_scan_exam… 5532 measurements, 2 i… 8 entries resistors time_scan_examp…At the moment, isoreader supports export of all data to Excel and the Feather file format (a Python/R cross-over format). Note that both export methods have similar syntax and append the appropriate file extension for each type of export file (.scan.xlsx and .scan.feather, respectively).
# export to excel
scan_files %>% iso_export_to_excel("scan_files_export")
#> Info: exporting data from 4 iso_files into Excel 'scan_files_export.scan.xlsx'
#> Info: aggregating all data from 4 data file(s)
# data sheets available in the exported data file:
readxl::excel_sheets("scan_files_export.scan.xlsx")
#> [1] "file info" "raw data" "resistors" "problems"# export to feather
scan_files %>% iso_export_to_feather("scan_files_export")
#> Info: exporting data from 4 iso_files into .scan.feather files at 'scan_files_export'
#> Info: aggregating all data from 4 data file(s)
# exported feather files
list.files(pattern = ".scan.feather")
#> [1] "iso_files_export_file_info.scan.feather"
#> [2] "iso_files_export_method_info-resistors.scan.feather"
#> [3] "iso_files_export_problems.scan.feather"
#> [4] "iso_files_export_raw_data.scan.feather"
#> [5] "scan_files_export_file_info.scan.feather"
#> [6] "scan_files_export_problems.scan.feather"
#> [7] "scan_files_export_raw_data.scan.feather"
#> [8] "scan_files_export_resistors.scan.feather"