Finds files named like PEB_sub*.rds or PEB_sub*.mat and extracts the numeric subject identifier from each filename.

dcm_peb_files(peb_dir)

Arguments

peb_dir

Directory to search.

Value

List with files (full paths) and subjects (integer identifiers), in the order returned by list.files.

Examples

# Set up a directory with two dummy subject PEB files
d <- tempfile(); dir.create(d)
saveRDS(list(), file.path(d, "PEB_sub-01.rds"))
saveRDS(list(), file.path(d, "PEB_sub-02.rds"))

found <- dcm_peb_files(d)
basename(found$files)
#> [1] "PEB_sub-01.rds" "PEB_sub-02.rds"
found$subjects
#> [1] 1 2

unlink(d, recursive = TRUE)