将列表转换为 Tibble Plus 添加带有列表名称的列

Question

我正在从事网络抓取/映射项目，我从餐厅网站抓取地址数据并将结果存储为列表 - 在本例中称为 loc_list。

问题是，如何最好地将这些列表项转换为单个 data.frame / tibble（目前使用 bind_rows( )），同时在新的 data.frame 中有一列标题为metro 对应每个列表项名称。在我的示例中，输出将有 3 个 alpharetta，然后是 3 个 atlanta，然后是 1 个 buford.

loc_list

$alpharetta
# A tibble: 3 x 2
                  names                                                  address
                  <chr>                                                    <chr>
1 East Roswell          US 2630 Holcomb Bridge Rd Alpharetta, GA  30022
2 Old Milton US 4305 Old Milton Parkway Ste 101 Alpharetta, GA  30022
3 Windward       US 875 N Main Street Ste 306 Alpharetta, GA  30009

$atlanta
# A tibble: 3 x 2
                        names                                         address
                        <chr>                                           <chr>
1 Philips Arena        US 100 Techwood Drive Atlanta, GA  30303
2 Virginia Highlands       US 1006 N Highland Ave Atlanta, GA  30306
3 Perimeter     US 1211 Ashford Crossing Atlanta, GA  30346

$buford
# A tibble: 1 x 2
            names                                          address
            <chr>                                            <chr>
1 Woodward US 3250 Woodward Crossing Blvd Buford, GA  30519

目标输出：

names          address       metro
East Ros...    US 2630...    alpharetta

Answer 1

正如 alistaire 指出的那样，bind_rows 与 .id 就足够了。这是示例数据：

alpharetta <- tibble(names=c("East Roswell", "Old Milton"),
                     address = c("US 2630 Holcomb Bridge Rd Alpharetta, GA  30022", "4305 Old Milton Parkway Ste 101 Alpharetta, GA  30022"))
atlanta <- tibble(names=c("Philips Arena", "Virginia Highlands"),
                  address = c("US 100 Techwood Drive Atlanta, GA  30303", "US 1006 N Highland Ave Atlanta, GA  30306"))

loc_list <- list(alpharetta = alpharetta, atlanta = atlanta)

bind_rows(loc_list, .id="metro")
# A tibble: 4 x 3
       metro              names                                               address
       <chr>              <chr>                                                 <chr>
1 alpharetta       East Roswell       US 2630 Holcomb Bridge Rd Alpharetta, GA  30022
2 alpharetta         Old Milton 4305 Old Milton Parkway Ste 101 Alpharetta, GA  30022
3    atlanta      Philips Arena              US 100 Techwood Drive Atlanta, GA  30303
4    atlanta Virginia Highlands             US 1006 N Highland Ave Atlanta, GA  30306

将列表转换为 Tibble Plus 添加带有列表名称的列

Convert List to Tibble Plus Add Column With List Names

r

list

tidyverse

tibble