如何取消 json 中包含 r 中地图坐标 int 列表列的字段？

编程问答 2022-04-29

问题描述

我已阅读 json .txt 文件，并希望从嵌套在其中的数据中提取 geometry 和 coordinates 字段。

但是由于 列表列在取消嵌套 coordinates 数据中存在问题。

library(tidyverse)
library(jsonlite)

India_map_data <- fromJSON(url("https://raw.githubusercontent.com/johnsNow09/covid19-df_stack-code/main/India_map_data.txt"))

下面的代码工作正常

India_map_data %>% 
  .$features %>% 
  map_if(is.data.frame,list) %>%
  as_tibble() %>% 
  unnest(properties,geometry) 

A tibble:1,369 x 10
hc-middle-x  hc-middle-y  type1 coordinates
<dbl>         <dbl>       <chr> <list>
0.50    0.50    Multipolygon    <list [2]>
0.50    0.50    Multipolygon    <list [4]>
0.35    0.70    Multipolygon    <list [3]>
0.50    0.50    polygon <int [1 × 45 × 2]>
0.50    0.50    Multipolygon    <list [2]>
0.50    0.50    polygon <int [1 × 5 × 2]>
0.50    0.50    Multipolygon    <list [8]>
0.50    0.50    Multipolygon    <list [2]>
0.60    0.75    Multipolygon    <list [4]>
0.62    0.82    Multipolygon    <list [6]>

但是当我 unnest(coordinates) 它给出错误

India_map_data %>% 
  .$features %>% 
  map_if(is.data.frame,geometry) %>% 
  unnest(coordinates)

错误：无法组合 ..1$coordinates 和 ..4$coordinates 。

我该如何解决这个问题，以便我可以进一步使用这些数据进行绘图？

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

jsonjsonliterrtidyrunnest