Построение изображения в произвольном месте - PullRequest
0 голосов
/ 24 декабря 2010

Я хотел бы добавить изображение к сюжету.Я могу успешно поместить изображение в диапазон [0 1], используя функцию изображения, но я хотел бы иметь возможность построить его в другом месте.Вот пример:

require(rgdal)
require(RgoogleMaps)
bb <- qbbox(c(40.702147,40.711614,40.718217),c(-74.015794,-74.012318,-73.998284), TYPE = "all", margin = list(m=rep(5,4), TYPE = c("perc", "abs")[1]));

MyMap <- GetMap.bbox(bb$lonR, bb$latR,destfile = "MyTile3.png", maptype = "satellite")
plot(0:20,0:20)
image(MyMap$myTile,col=attr(MyMap$myTile,"COL"),add=TRUE)

Это создает крошечную карту, расположенную в начале координат, я хотел бы, чтобы она охватила диапазон моего выбора (На самом деле это фактическая широта / долгота).

Ответы [ 2 ]

1 голос
/ 24 декабря 2010

Используйте аргументы x и y для image ().Обратите внимание, как image (x) будет работать для матрицы или списка, состоящего из векторов $ x и $ y и матрицы $ z, но вы также можете явно передать изображение (x = xvec, y = yvec, z = zmat).

Итак, примерно (вам нужно проверить, хотите ли вы, чтобы центры клеток [dim (z)] или углы клеток [dim (z) +1])

    dims <- dim(seqMyMap$myTile)
    image(x = seq(minX, maxX, length = dims[1]), y = seq(minY, maxY, length = dims[2]), z =  seqMyMap$myTile,col=attr(MyMap$myTile,"COL"),add=TRUE) 

Также прочитайтеИзображение - это объясняет это.

0 голосов
/ 24 декабря 2010

Также посмотрите на функцию subplot в пакете TeachingDemos или ms.image для использования с my.symbols (также в TeachingDemos).

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...