From f5c1f8984cd5e4d8003ef137005ef59fac296f61 Mon Sep 17 00:00:00 2001 From: bbuchsbaum Date: Tue, 20 May 2025 13:18:25 -0400 Subject: [PATCH] Fix participants fallback to participants.tsv --- R/bids.R | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/R/bids.R b/R/bids.R index 759e85b..1618360 100644 --- a/R/bids.R +++ b/R/bids.R @@ -390,8 +390,10 @@ tasks.bids_project <- function(x) { #' @export #' @rdname participants-method participants.bids_project <- function(x, ...) { - if ("subid" %in% names(x$tbl)) { + if ("subid" %in% names(x$tbl) && any(!is.na(x$tbl$subid))) { unique(x$tbl$subid[!is.na(x$tbl$subid)]) + } else if ("participant_id" %in% names(x$part_df)) { + unique(as.character(x$part_df$participant_id)) } else { character(0) }