epoch_ETG4000_average: Average the epoched ETG-4000 data

Description Usage Arguments Value Examples

Description

Average the epoched ETG-4000 data

Usage

1
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

1
2
3
4
5
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.