entity_int <- BIDSEntity_index_optional(key = "run", value = "001")
entity_int$value <- integer()
print(entity_int) # nothing will be printed out
# subject entity
entity_subject <- BIDSEntity_any_required(key = "sub", value = "HUP225")
print(entity_subject)
# index
entity_subject$value <- 1
print(entity_subject)
# format index
entity_subject$index_format <- "%03d"
print(entity_subject)
# trying to set invalid values will result in errors
try({
BIDSEntity_index_required(key = "run")
})
entity_int <- BIDSEntity_index_required(key = "run", value = "001")
# trying to unset require entity
try({
entity_int$value <- integer()
})
# trying to set invalid entity
try({
entity_int$value <- "asdad"
})
# trying to set prohibited entiry
try({
BIDSEntity_index_prohibited("invalid", 123)
})
Run the code above in your browser using DataLab