a <- 'ITEM: [ label: sunshine, [foo: 1, bar: 3]]'
# yaml.load() sees label nested one-deep, and foo nested two-deep:
yaml::yaml.load(a)
# unnest() sees label nested zero-deep, and foo nested one-deep:
unnest(yaml::yaml.load(a))
# as_yamlet() provides explicit name (default key) for second element of ITEM:
as_yamlet(a)
Run the code above in your browser using DataLab