Jak mieć rozdzielczość panoramiczną z ggmap

Mam takie dane:

YEAR-STORM-DATETIME-NORTH-WEST-PRESSURE-WIND-SPEED-TRACKDATE
2011-arlene-6/28/2011 6:00-19.9-92.8-1007-30-NA-6/28/2011
2011-arlene-6/28/2011 12:00-20.3-93.1-1006-35-4-6/28/2011
2011-arlene-6/28/2011 18:00-20.7-93.5-1006-40-5-6/28/2011
so on..

Jestem nowy w R i kreślęgęstość-wykres nad ggmap. Używam również błyszczącego R do wyświetlania ich na stronie internetowej. Problem polega na tym, że dane wyjściowe są mapami nieekranowymi (kwadratowymi). Chcę mieć prostokątną mapę, taką jak mapy google dostarczone przez Openlayers lub KML. Mój kod to:

library(ggplot2)
library(ggmap)

mydata <- read.csv("C:/R Data/Analytics/dMetrics.csv")
slice_year <- mydata[mydata$YEAR=='2009',]
map <- get_map(c(lon = -55.3632715, lat = 31.7632836), zoom = 3,
               source = 'google', maptype = c("terrain"), messaging = FALSE,
               color = 'color')

world <- ggmap(map) #extent = 'device'
world <- world + 
         stat_density2d(data = slice_year,
                        aes(x = WEST, y = NORTH, fill = ..level.., alpha = ..level..),
                        show_guide = FALSE, geom = "polygon", na.rm = TRUE) + 
         scale_fill_gradient(name = "Density", low = "maroon", high = "yellow", 
                             guide = 'colorbar')
world

Przeprowadź mnie, aby utworzyć mapę rozdzielczości panoramicznej, być może w wysokiej rozdzielczości.

questionAnswers(2)

yourAnswerToTheQuestion