This function provides an easy way to return the embargo period in the different categories
parse_embargo(xml_source, type = c("pre", "post", "pdf"))
[xml_document
]
a parsed xml document
[character(1)
]
name of the embargo type must be in "pre"
, "post"
, and
"pdf"
the embargo period as a string like "12 months"