如何解决如何在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")
我从此处使用了一些代码段:Image in R Leaflet marker popups
我的问题是:如何轻松调整弹出窗口中出现的大图像的大小?
例如,我想缩小这张Cave Rapa Nui的照片以适合弹出窗口。
提前谢谢!
解决方法
您可以使用HTML width
属性来调整大小。
将代码从上方编辑为例如
map <- leaflet() %>%
addTiles() %>%
addMarkers(data = df,lng = ~lon,lat = ~lat,popup = paste0("<img src = ",file," width = 300>"))
map # print the map
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。