I have turned a list containing lists into a dataframe with the following:
dt <- as.data.table(xml_data$VEHICLES)
And the result as