Создайте пузырьковый график в R, используя спутниковую карту

Я уже создал пузырьковый график, используя следующий код:

library(ggplot2)

library(sp)

library(raster)

library(maps)

library(mapdata)

library(maptools)

library(gstat)

library(ggmap)

xy <- se_pp[,c("longitude_s", "latitude_s")]

nl <- getData('GADM', country="Netherlands", level=2) #raster data, format SpatialPolygonsDataFrame

# coercing the polygon outlines to a SpatialLines object

spl <- list("sp.lines", as(nl, "SpatialLines"))

SPDF <- SpatialPointsDataFrame(coords=xy, data=se_pp)

projection(SPDF)<- "+proj=longlat +ellps=WGS84 +datum=WGS84 +no_defs +towgs84=0,0,0"

coordinates(SPDF)[1:5,] #retrieves spatial coordinates form the dataframe

bubble(SPDF, "Quantity", sp.layout=spl, main="Plaice Quantity (#/km2), end summer (Sand Engine)")

Теперь я получаю карту побережья Нидерландов, содержащую график пузырьков (через getData). К сожалению, это очень простая карта. Я хотел бы иметь спутниковую карту той же области, которая показывает больше деталей, чтобы показать мой пузырьковый график. Кто-нибудь знает возможно ли это? Спасибо.


person Roiya    schedule 02.05.2014    source источник


Ответы (1)


Я не уверен, что вы все еще проверяете SO. Но я оставляю один подход для вас. Вы можете поиграть со значениями масштабирования, чтобы определить наилучшее масштабирование для ваших целей. Руководство CRAN ggmap предлагает вам больше примеров. Пожалуйста, посмотрите.

map <- get_map(location = 'netherlands', zoom = 7,
               source = 'google',
               maptype = 'satellite')

ggmap(map)
person jazzurro    schedule 26.09.2014