#javascript #r #shiny #leaflet
#javascript #r #блестящий #листовка
Вопрос:
Я пытаюсь создать карту-листовку в shiny, которая отображает наложения navionics, но у меня нулевой опыт работы с javascript. Как мне добавить приведенный ниже javascript в мою карту листовок в R?
Пожалуйста, помогите!
Javascript:
var map = L.map('nautical-non-transparent-map-container');
var overlay=new JNC.Leaflet.NavionicsOverlay({
navKey: 'navionics_key',
chartType: JNC.NAVIONICS_CHARTS.NAUTICAL,
isTransparent: false,
// Enable Navionics logo without payoff (default behaviour)
logoPayoff: false
zIndex: 1
});
map.setView([36.140751,-5.353585], 14);
overlay.addTo(map);
Базовая карта листовок
library(leaflet)
leaflet(options = leafletOptions( zoomControl = TRUE, dragging = TRUE))%>%
addTiles(group = "Open Street Map")%>%
fitBounds(121.8, -33.9, 122.3, -33.96)