epoch_ETG4000_average: Average the epoched ETG-4000 data

In erzk/fnirsr: Package for analysing funtional near-infrared spectroscopy (fNIRS) data

Description

Average the epoched ETG-4000 data

Usage

epoch_ETG4000_average(x, start_epoch, end_epoch)

Arguments

x	A data frame with an ETG-4000 data.
start_epoch	A numeric. Number of samples before the trigger. Start of the epoch. The same as in epoch_ETG4000().
end_epoch	A numeric. Number of samples after the trigger. End of the epoch. The same as in epoch_ETG4000().

Value

A data frame.

Examples

file_path <- system.file("extdata", "Hitachi_ETG4000_24Ch_Total.csv", package = "fnirsr")
ETG_header <- load_ETG4000_header(file_path)
rawData <- load_ETG4000_data(file_path, ETG_header)
df_epochs <- epoch_ETG4000(rawData, 1, -100, 100) # use to explore the epoch quality
df_epochs_average <- epoch_ETG4000_average(df_epochs, -100, 100)

erzk/fnirsr documentation built on May 16, 2019, 8:50 a.m.