[feature request] addImageQuery functionality with SpatRast

[Jadamso]

Thank you for this package. It would be nice to update the package to use terra instead of raster, specifically the function "addImageQuery".

library(terra)
library(leaflet)
library(leafem)
library(plainview)

r <- rast(system.file("ex/elev.tif", package="terra"))
leaflet() %>%
    addRasterImage(r, group="elevation",  layerId="elevation") %>%
    addImageQuery(raster::raster(r), type='mousemove', layerId='elevation')%>%
    addMouseCoordinates()