Я все ближе к решению с использованием leaflet-easyPrint (https://github.com/rowanwins/leaflet-easyPrint). Мне удалось найти решение с помощью Shiny ( Shiny leaflet, плагин easyPrint ), но я не очень знакомс Shiny, и это, кажется, вызывает у меня проблемы в других областях. Есть ли способ использовать leaflet-easyPrint без блестящей?
Я пытаюсь повторить примеры из https://gist.github.com/jcheng5/c084a59717f18e947a17955007dc5f92
и ямогу запустить мою карту без ошибок, но кнопка не отображается.
код:
printPlugin <- htmlDependency("leaflet-easyPrint",
"2.1",
src=c(href="https://raw.githubusercontent.com/rowanwins/leaflet-easyPrint/gh-pages/src/"),
script="index.js")
registerPlugin <- function(map, plugin) {
map$dependencies <- c(map$dependencies, list(plugin))
map}
и у меня есть
registerPlugin(printPlugin)
до
onRender(
"function(el, x) {
L.easyPrint({
sizeModes: ['Current', 'A4Landscape', 'A4Portrait'],
filename: 'mymap',
exportOnly: true,
position: 'topleft',
hideControlContainer: true
}).addTo(this);}"
)
Мне бы хотелось, чтобы она работала как демо http://rowanwins.github.io/leaflet-easyPrint/
Извините, если у меня плохое форматирование. Все еще привыкаю к этому.