Как изменить размер больших изображений во всплывающих окнах маркеров R Leaflet?

Мой код:

library(leaflet)

df   <- as.data.frame(read.csv("arts.csv"))
file <- as.character(df$url)

leaflet() %>% addTiles() 
          %>% addMarkers(data = df, lng = ~lon, lat = ~lat, 
                         popup = paste0("<img src = ", file, ">")) 
          %>% popupOptions(maxWidth = "auto")

Я использовал фрагмент кода отсюда: Изображение во всплывающих окнах маркеров R Leaflet

Мой вопрос: как я могу легко изменить размер больших изображений, появляющихся во всплывающих окнах?

Иллюстрация проблемы: Например, я бы хотел уменьшить размер этой фотографии пещеры Рапа-Нуи, чтобы она поместилась во всплывающем окне.

Например, я хотел бы сделать эту фотографию пещеры Рапа-Нуи меньше, чтобы она соответствовала всплывающему окну.

Заранее спасибо!


r leaflet r-leaflet
person Übel Yildmar    schedule 23.10.2020    source источник

Ответы (1)


arrow_upward
2
arrow_downward

Вы можете настроить размер с помощью атрибута HTML width.

Отредактируйте свой код сверху, например.

map <- leaflet() %>% 
           addTiles() %>%
           addMarkers(data = df,
                      lng = ~lon,
                      lat = ~lat,
                      popup = paste0("<img src = ", file, " width = 300>"))

map  # print the map

введите здесь описание изображения

person help-info.de    schedule 23.10.2020
comment
Вилен Данк @help-info.de! - person Übel Yildmar; 09.12.2020