Размещение пользовательских изображений в окне графика - как пользовательские маркеры данных или аннотирование этих маркеров

У меня есть набор изображений PNX 150x150px и набор координат (x, y), которым они соответствуют. Есть ли способ построить изображения на сетке? Например, я ищу решение R или Python для создания чего-то вроде следующего:

Ответ 1

Создается ограничивающий прямоугольник, создавая экземпляр AnnotationBbox - один раз для каждого изображения которые вы хотите отобразить; изображение и его координаты передаются конструктору.

Код, очевидно, повторяется для двух изображений, поэтому, когда этот блок помещается в функцию, это не так долго, как кажется здесь.

import matplotlib.pyplot as PLT
from matplotlib.offsetbox import AnnotationBbox, OffsetImage
from matplotlib._png import read_png

fig = PLT.gcf()
fig.clf()
ax = PLT.subplot(111)

# add a first image
arr_hand = read_png('/path/to/this/image.png')
imagebox = OffsetImage(arr_hand, zoom=.1)
xy = [0.25, 0.45]               # coordinates to position this image

ab = AnnotationBbox(imagebox, xy,
    xybox=(30., -30.),
    xycoords='data',
    boxcoords="offset points")                                  
ax.add_artist(ab)

# add second image
arr_vic = read_png('/path/to/this/image2.png')
imagebox = OffsetImage(arr_vic, zoom=.1)
xy = [.6, .3]                  # coordinates to position 2nd image

ab = AnnotationBbox(imagebox, xy,
    xybox=(30, -30),
    xycoords='data',
    boxcoords="offset points")
ax.add_artist(ab)

# rest is just standard matplotlib boilerplate
ax.grid(True)
PLT.draw()
PLT.show()

Ответ 2

Один способ сделать это в R (2.11.0 и выше):

library("png")
# read a sample file (R logo)
img <- readPNG(system.file("img", "Rlogo.png", package="png"))
# img2 <- readPNG(system.file("img", "Rlogo.png", package="png"))
img2 <- readPNG("hand.png", TRUE) # here import a different image 
if (exists("rasterImage")) { 
  plot(1:1000, type='n')
  rasterImage(img, 100, 100, 200, 200)
  rasterImage(img2, 300, 300, 400, 400)
}

Подробнее см. readPNG и? rasterImage.

Ответ 3

Я бы использовал matplotlib для этого. эта демонстрация показывает что-то подобное, я уверен, что она может быть адаптирована к вашей конкретной проблеме

Ответ 4

Также в R вы можете использовать функции my.symbols и ms.image в пакете TeachingDemos.

Ответ 5

В R, прочитанном в справке (rasterImage):

require(grDevices)
#set up the plot region:
op <- par(bg = "thistle") <h>
plot(c(100, 250), c(300, 450), type = "n", xlab="", ylab="")
image <- as.raster(matrix(0:1, ncol=5, nrow=3))
rasterImage(image, 100, 300, 150, 350, interpolate=FALSE)
rasterImage(image, 100, 400, 150, 450)
rasterImage(image, 200, 300, 200 + xinch(.5), 300 + yinch(.3), interpolate=FALSE)
rasterImage(image, 200, 400, 250, 450, angle=15, interpolate=FALSE)
par(op)

.... хороший пример.