2016-09-26 20 views
-3

我有这种数据格式,在一个CSV文件中的形状(多边形),它看起来像这样:GeoJSON的数据格式和传单

enter image description here

当我与read.csv2看,就是这个样子:

{"type": "Polygon", "coordinates": [[[5.595422739518895, 46.574661252730515], [5.5868864112024, 46.578124834208275], [5.566460487135743, 46.579404434922125], [5.558571581276076, 46.580572027975954], [5.561819437593718, 46.587949918898076], [5.575191603674612, 46.59190224479517], [5.580673541265257, 46.59754467932337], [5.582347290927083, 46.60141691853218], [5.587289521318402, 46.59292683804338], [5.604997996100999, 46.58938109997026], [5.611508140899815, 46.5826199806949], [5.603671590915408, 46.57586134356789], [5.595422739518895, 46.574661252730515]]]} 

我想知道如何将这些数据转换(这似乎是一个字符串,read.csv2看完后)到的东西,与小叶被ploted。

+0

您可以提供R数据框中的数据吗?可重复的东西。 –

+0

感谢您的评论,但我不知道如何提供数据框。数据首先在csv文件中读取;那么我可以看到整个字符串作为一个值。 –

回答

2

将数据保存为文本编辑器* .geojson(在test.geojson下面的示例中)。然后,你可以这样做:

library(leaflet) 
library(geojsonio) 

tst <- geojson_read("/home/ede/test.geojson", what = "sp") 

leaflet() %>% addTiles() %>% addPolygons(data = tst) 
+0

谢谢你的回答。但是,是否有可能不以geojson格式重新保存数据?它是在一个csv文件中读取的。有可能将其转换为geojson数据? –

+0

请参阅'geojsonio :: geojson_write' – TimSalabim

+0

你可以在某处提供数据吗?在不访问原始数据的情况下知道自己的真实情况并不容易。 – TimSalabim

0

的一种方式导入JSON数据作为数据帧是使用jsonlite包:

library(jsonlite) 
geojson <- '{"type": "Polygon", "coordinates": [[[5.595422739518895, 46.574661252730515], [5.5868864112024, 46.578124834208275], [5.566460487135743, 46.579404434922125], [5.558571581276076, 46.580572027975954], [5.561819437593718, 46.587949918898076], [5.575191603674612, 46.59190224479517], [5.580673541265257, 46.59754467932337], [5.582347290927083, 46.60141691853218], [5.587289521318402, 46.59292683804338], [5.604997996100999, 46.58938109997026], [5.611508140899815, 46.5826199806949], [5.603671590915408, 46.57586134356789], [5.595422739518895, 46.574661252730515]]]}' 
df <- fromJSON(geojson) 

注意:这是一个答案,在提出的问题XR SC一条评论。