# Download https://github.com/bids-standard/bids-examples/
# extract to directory ~/rave_data/bids_dir/
bids_root <- '~/rave_data/bids_dir/'
project_name <- 'ieeg_visual'
if(dir.exists(bids_root) &&
dir.exists(file.path(bids_root, project_name, 'sub-01'))){
header <- load_bids_ieeg_header(bids_root, project_name, '01')
print(header)
# sessions
names(header$sessions)
# electrodes
head(header$sessions$`01`$spaces$unknown_space$table)
# visual task channel settings
head(header$sessions$`01`$tasks$`01-visual-01`$channels)
# event table
head(header$sessions$`01`$tasks$`01-visual-01`$channels)
}
Run the code above in your browser using DataLab