我有一个数据框，其中第1列是行标识符，第2列是数据列表，第3列是模型列表，第4和第5列是模型输出列表。我想从两个模型输出列表（“ sys_loc_code”，“ tidy”和“ glance”）的每一个中选择行标识符和单个vlaue。在这种情况下，我希望“ tidy”位置（[2，2]处）的估计值的斜率和“ glance”位置[4]处的p。值的斜率，同时保持行结构为“ sys_loc_code”。
> zz
# A tibble: 1,918 x 5
sys_loc_code data model tidy glance
<chr> <list> <list> <list> <list>
1 S000-001 <tibble [455 x 18]> <S3: survreg> <tibble [4 x 7]> <tibble [1 x 8]>
2 S000-002 <tibble [32 x 18]> <S3: survreg> <tibble [4 x 7]> <tibble [1 x 8]>
3 S000-003 <tibble [146 x 18]> <S3: survreg> <tibble [4 x 7]> <tibble [1 x 8]>
4 S000-004 <tibble [45 x 18]> <S3: survreg> <tibble [4 x 7]> <tibble [1 x 8]>
5 S000-006 <tibble [54 x 18]> <S3: survreg> <tibble [4 x 7]> <tibble [1 x 8]>
理想情况是：
z <- select(zz, sys_loc_code, tidy[[2,2]], glance[[4]])
任何人都可以提供一些指导吗？任何建议将不胜感激。抱歉，没有提供数据集，但是我不确定如何将其放入堆栈。
zz %>% head() %>% dpasta()
倾倒了相当大的混乱。