2016-09-26 61 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一條評論。