R 将列表和数据帧转换为数据帧

我有一个称为“

账单

”的DF

X2030
ICD-10
J441
慢性阻塞性肺疾病（急性）加重
医院
12
Y6055
ICD-10
I21
急性心肌梗死
医院
8.
Z9088
ICD-10
F20
精神分裂症
医院
1.

我的代码：

require(tidyverse)
require(xml2)
setwd("D:/")
page<- read_xml("base.xml")

require（tidyverse）
require（xml2）
setwd（“D:/”）
页面%jsonlite:：fromJSON（）

参见示例：对于每个变量，都有其他变量（列表或数据帧）。我想将这些子变量转换为标准变量（整数、字符等），并构建一个没有这些隐藏变量（列表和数据帧）的DF。有可能吗

DF应该是这样的

guidenumber<- c('X2030','Y6055','Z9088')
table<- c('ICD-10','ICD-10','ICD-10')
diagnosiscod<- c('J441','I21','F20')
description<- c('CHRONIC OBSTRUCTIVE PULMONARY DISEASE WITH (ACUTE) EXACERBATION','ACUTE MYOCARDIAL INFARCTION','SCHIZOPHRENIA')
procedure<- c('HOSPITAL','HOSPITAL','HOSPITAL')
amount<- c(12,8,1)
DF<- data.frame(guidenumber,table,diagnosiscod,description,procedure,amount)

---

guidenumber请分享一个可复制的示例，并显示所需的输出。只有两行、两列样本输入和所需输出。使用
dput（）
共享示例数据以使其可复制/粘贴，或共享代码以创建对象。@Gregor--RestoreMonica--I再次提出疑问并提供了更多详细信息，包括代码
ns<- page %>% xml_find_all(".//test:billing")
billing<-xml2::as_list(ns) %>% jsonlite::toJSON() %>% jsonlite::fromJSON()

guidenumber<- c('X2030','Y6055','Z9088')
table<- c('ICD-10','ICD-10','ICD-10')
diagnosiscod<- c('J441','I21','F20')
description<- c('CHRONIC OBSTRUCTIVE PULMONARY DISEASE WITH (ACUTE) EXACERBATION','ACUTE MYOCARDIAL INFARCTION','SCHIZOPHRENIA')
procedure<- c('HOSPITAL','HOSPITAL','HOSPITAL')
amount<- c(12,8,1)
DF<- data.frame(guidenumber,table,diagnosiscod,description,procedure,amount)