Более

Форма не соответствует карте ggmap

Форма не соответствует карте ggmap


Я пытаюсь подогнать свою форму под карту Google.

require (rgdal) in.dir <- getwd () sh <- readOGR (in.dir, layer = "Ytor", p4s = "+ proj = tmerc + lat_0 = 0 + lon_0 = 15.80827777777778 + k = 1 + x_0 = 1500000 + y_0 = 0 + ellps = bessel + units = m + no_defs ") sh @ proj4string sh2 <- spTransform (sh, CRS (" + proj = longlat + datum = WGS84 + ellps = WGS84 + no_defs ")) sh2 @ proj4string sh2 .df <- fortify (sh2) library (ggplot2) library (ggmap) swe <- get_map (location = c (15.3, 63.63, 15.5, 63.68), maptype = 'satellite') ggmap (swe) + geom_polygon (aes (x = as.numeric (long), y = as.numeric (lat), group = group), data = df, color = "white", fill = "white", alpha = 0.1)

Наконец я получил карту, как показано ниже

Границы фигуры не совпадают с границами ggmap. Что я не так сделал, что границы не подходят?


В строке вашей проекции нетбуксиры84параметры.

Предполагая, что ваши данные находятся вEPSG: 3021 RT90 2,5 угольник В, так должно быть:

+ proj = tmerc + lat_0 = 0 + lon_0 = 15.80827777777778 + k = 1 + x_0 = 1500000 + y_0 = 0 + ellps = bessel + towgs84 = 414.1,41.3,603.1, -0.855,2.141, -7.023,0 + units = m + no_defs

Смотреть видео: STARE DE ALERTA! Un AVION MILITAR F-16 A Fost NIMICIT In ROMANIA!