Mapas Interactivos en R

Paquete Leaflet

Contenedor

contenedor<-leaflet()

contenedor

Mapa base - Open Street Map

mapa_base<-leaflet()%>%

addTiles()

mapa_base

Latitud - Longitud - Marcador - Circulo

palacio_gobierno<-leaflet() %>% 

addTiles() %>% 

addMarkers(lat=-16.495989129153443, lng=-68.13357878074682) %>% 

addCircleMarkers(lat=-16.495989129153443, lng=-68.13357878074682, color="red",radius=50)

palacio_gobierno

MiniMap - Logo

img <-"https://www.rstudio.com/wp-content/uploads/2018/10/RStudio-Logo-Flat.png"

palacio_gobierno<-leaflet() %>% 

addTiles() %>% 
  
leafem::addLogo(img,url="https://www.rstudio.com/",position = "topright",width = 60,height = 25) %>% 

addMarkers(lat=-16.495989129153443, lng=-68.13357878074682) %>% 

addCircleMarkers(lat=-16.495989129153443, lng=-68.13357878074682, color="red",radius=50) %>% 

addMiniMap(position="bottomleft", toggleDisplay=TRUE)

palacio_gobierno

Popup Configuracion

# Popup configuración

# Palacio Nacional de La República Dominicana 18.47474559888523, -69.89787861615132

lugar_01 <- c("Palacio Gobierno Rep. Bolivia")

lat_01 <-c(-16.495989129153443)

lng_01 <-c(-68.13357878074682)

url_01 <-paste0("<a href='https://www.presidencia.gob.bo/' target='_blank'>Web Palacio Nacional</a>")

img_01 <- paste0("<center><img src='https://upload.wikimedia.org/wikipedia/commons/thumb/8/82/Fotograf%C3%ADa_de_Palacio_Quemado_en_2020.jpg/320px-Fotograf%C3%ADa_de_Palacio_Quemado_en_2020.jpg' width=200 height=100></center>")

img <-"https://www.rstudio.com/wp-content/uploads/2018/10/RStudio-Logo-Flat.png"

palacio_gobierno <- leaflet() %>% 

addTiles() %>% 

leafem::addLogo(img,url="https://www.rstudio.com/",position="topright",width=60,height=25) %>% 

addMarkers(lat=-16.495989129153443,lng=-68.13357878074682,popup=paste(sep="<br>","<b>Lugar:</b>",lugar_01,"<b>Latitud:</b>",lat_01,"<b>Longitud:</b>",lng_01,"<b>URL:</b>",url_01,img_01)) %>% 
  
addCircleMarkers(lat=-16.495989129153443,lng=-68.13357878074682,color="orange",radius=40) %>% 

addMiniMap(position="bottomleft",toggleDisplay=TRUE)


palacio_gobierno