有没有人在底格里斯使用append_geoid建立一个新的数据框架，收集新的人口普查数据块？

Question

我正在寻找一种使用底格里斯在R中重新编码的方法。是否需要将其写入一个新的数据框架，并添加与该地址相关联的2010年人口普查块？

机场<- dplyr::data_frame(街道=“700CatalinaDR”，城市= "Daytona海滩“，state = "FL”)append_geoid(机场，‘街区’)

Answer 1

我以前从没用过底格里斯。我知道tmaptools可以完成这个任务，但是如果没有一些标记，就可以使用dataframe选项。

为了解决这种情况，我编写了我的代码OpenStreetMap。您可以看到在此链接上构建您所需的所有信息。

我使用的代码如下：

x <- 1:370

address_tidy <- tibble(
    accident_index = "accidents_tidy$accident_index[i]",
    geo_loc = "accidents_tidy$geo_loc[i]",
    xml.names = "(xml_name(xml_children(xml_children(open_map_xml))))",
    xml.text = "(xml_text(xml_children(xml_children(open_map_xml))))"
  )

address_tidy <- address_tidy %>%
  filter(accident_index == "Greg")

for (i in x) {
  open_map_url <- str_c(
    "https://nominatim.openstreetmap.org/search?q=",
    accident_index_loc_$geo_loc[i],
    "&format=xml&polygon=0&addressdetails=1"
  )
  
  open_map_xml <- read_xml(open_map_url)
  
  df <- tibble(
    accident_index = accident_index_loc_$accident_index[i],
    geo_loc = accident_index_loc_$geo_loc[i],
    xml.names = (xml_name(xml_children(xml_children(open_map_xml)))),
    xml.text = (xml_text(xml_children(xml_children(open_map_xml))))
  )
  
  address_tidy <- bind_rows(address_tidy, df)
  
}

write.csv(address_tidy, "address_tidy_part10.csv")