Загрузка растровых данных карты PNG на ggmaps R

Это будет опубликовано в списке рассылки R.

У меня есть карта в виде png, поэтому я не буду использовать get_map функция. Я извлек растровые данные из png, и я хочу загрузить карту в том виде, в котором она отображается на дисплее R, а затем я хотел бы нанести на нее точку.

Итак, вот как я пытался ggmaps, Программа компилируется нормально. Проблема здесь в том, что не отображается какой-либо вывод.

library (png)
library (ggmap)

latitude  = c(40.702147,40.718217,40.711614)
longitude = c(-74.012318,-74.015794,-73.998284)

# Reads a PNG and outputs a raster array.
img <- readPNG (system.file ("img", "My.png", package="png"))

df <- data.frame (latitude, longitude)

# img: raster array read from the map png.
ggimage (img, fullpage = TRUE) + geom_point (data = df, aes_auto (df), size = 2)

qplot (latitude, longitude, data = df, colour = I("red"), size = I(3))

Конечно, я делаю что-то не так. Пожалуйста, укажите.

> sessionInfo()
R version 2.15.1 (2012-06-22)
Platform: x86_64-unknown-linux-gnu (64-bit)

locale:
 [1] LC_CTYPE=en_US.UTF-8       LC_NUMERIC=C              
 [3] LC_TIME=en_US.UTF-8        LC_COLLATE=en_US.UTF-8    
 [5] LC_MONETARY=en_US.UTF-8    LC_MESSAGES=en_US.UTF-8   
 [7] LC_PAPER=C                 LC_NAME=C                 
 [9] LC_ADDRESS=C               LC_TELEPHONE=C            
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] ggmap_2.1     ggplot2_0.9.1 png_0.1-4    

loaded via a namespace (and not attached):
 [1] colorspace_1.1-1   dichromat_1.2-4    digest_0.5.2       grid_2.15.1       
 [5] labeling_0.1       MASS_7.3-18        memoise_0.1        munsell_0.3       
 [9] plyr_1.7.1         proto_0.3-9.2      RColorBrewer_1.0-5 reshape2_1.2.1    
[13] RgoogleMaps_1.2.0  rjson_0.2.8        scales_0.2.1       stringr_0.6       
[17] tools_2.15.1      
>

РЕДАКТИРОВАТЬ: Я нашел ошибку. На самом деле я впервые запустил его с source (uff.R) и эта команда не показала никакой ошибки. Потом я попробовал Rscript,

anisha@linux-y3pi:~> Rscript uff.R
Loading required package: ggplot2
Loading required package: methods
Error in eval(expr, envir, enclos) : object 'x' not found
Calls: print ... sapply -> lapply -> eval.quoted -> lapply -> FUN -> eval
Execution halted
Источник

2 ответа

Решение

Ваш ggimage терпит неудачу, потому что нет x а также y в этом. Переименуйте свои лат-длинные координаты в x и y. Вот полностью воспроизводимый пример. Это основной материал ggplot:

> library(png)
> library(ggplot2)
> img <- readPNG(system.file("img", "Rlogo.png", package="png"))
> latitude  = c(40.702147,40.718217,40.711614)
> longitude = c(-74.012318,-74.015794,-73.998284)
> df <- data.frame (x=longitude,y=latitude)
> qplot(x,y,data = df, colour = I("red"), size = I(3))

Запустите эти команды в командной строке, и вы должны увидеть график. Возможные причины неудачи:

  • Ваш R не имеет подключения X11 к вашему дисплею. Это все работает на локальной машине Linux? Вы не подключились к серверу? Если R не может открыть графическое окно, он, вероятно, попытается создать файл Rplots.pdf.
  • Вы работаете в сценарии, который не печатает. Оберните все графические функции ggplot, grid и grid, которые вы хотите выводить в вызовах функции print(). Это FAQ, я думаю. Пол Химстра поставил это как ответ, но затем удалил это...
Источник

При звонке grid на основе построения библиотеки (lattice а также ggplot2), вам нужно явно print график, чтобы получить какой-либо вывод при использовании его вне интерактивного сеанса:

bla = ggplot(...)
print(bla)

или короче:

print(ggplot(...))
Источник
Другие вопросы по тегам