foo <- as_yamlet(c('id: subject','amt: dose'))
class(foo)
bar <- as_yam(foo)
class(bar)
as.character(bar)
as.character(
as_yam(
as_yamlet(
"race: [label: race, guide: [ white: 0, black: 1, asian: 2 ], multiple: ['yes': 1, 'no': 0]]"
)))
Run the code above in your browser using DataLab