Check whether an object is empty, e.g. has no sub-elements, is NA
Examples
is_empty_xml(NA) # TRUE
#> [1] TRUE
is_empty_xml(list()) # TRUE
#> [1] FALSE
is_empty_xml(list(list())) # TRUE
#> [1] FALSE
is_empty_xml(1) # FALSE
#> [1] FALSE
is_empty_xml("") # FALSE
#> [1] FALSE
is_empty_xml(list(1)) # FALSE
#> [1] FALSE
is_empty_xml(list(list(1))) # FALSE
#> [1] FALSE