# \donttest{
demo_data <- eyelink_asc_demo_dataset()
demo_data |>
eyeris::glassbox() |>
eyeris::epoch(
events = "PROBE_{startstop}_{trial}",
limits = c(-1, 1),
label = "prePostProbe"
) |>
eyeris::bidsify(
bids_dir = tempdir(),
participant_id = "001",
session_num = "01",
task_name = "assocret",
run_num = "03", # override default run-01 (block_1) to use run-03 instead
db_enabled = TRUE # enable database storage
)
# extract all data for all subjects (returns list of data frames)
all_data <- eyeris_db_collect(tempdir())
# view available data types
names(all_data)
# access specific data type
blinks_data <- all_data$blinks
epochs_data <- all_data$epochs
# extract specific subjects and data types
subset_data <- eyeris_db_collect(
bids_dir = tempdir(),
subjects = c("001"),
data_types = c("blinks", "epochs", "timeseries")
)
# extract epoch data for specific epoch label
epoch_data <- eyeris_db_collect(
bids_dir = tempdir(),
data_types = "epochs",
epoch_labels = "prepostprobe"
)
# }
Run the code above in your browser using DataLab