library(leaflet)
df <- data.frame(lat=c(-15.75718,-23.58618,-34.59105,-9.18996,-12.08559,12.11814,19.41178,33.98273,36.00828,35.76977,37.78937,37.80434,45.56235,35.08,29.97428,41.84674,38.41924,38.877,42.33115,33.58204,40.39736,50.7217,52.53529,-33.92123,-1.30124,-4.04347),
lng=c(-47.88295,-46.67512,-58.43478,-75.01515,-77.01689,-86.25463, -99.17491,-118.22563,-119.96179,-119.2441,-122.40574,-122.27069,-122.64516,-106.62,-90.0822,-87.70726,-82.44515,-77.00637,-71.08325,-7.61922,-3.6665,7.11126,13.39925,18.41964,36.78861,39.6682))
orgsites <- c("https://www.socioambiental.org/pt-br", "amigosdaterra.org.br","www.amigos.org.ar","https://tierractiva.pe/","www.aidesep.org.pe","www.tierra.org","https://aida-americas.org/es","https://caleja.org/","https://cejcoalition.org/","https://crpe-ej.org/en/","http://greenaction.org/","https://www.cdeinspires.org/","https://swuraniumimpacts.org/","http://www.labucketbrigade.org/","http://www.lvejo.org/","https://ohvec.org/","https://groundswell.org/","https://ace-ej.org/","aycm.org","https://www.tierra.org/justicia-climatica/#","germanwatch.org","https://www.gendercc.net/home.html","https://naturaljustice.org/","www.pacja.org","https://www.centerforjgea.com/index.php")
df %>%
leaflet()%>%
addTiles() %>%
addMarkers(popup=orgsites)
df
## lat lng
## 1 -15.75718 -47.88295
## 2 -23.58618 -46.67512
## 3 -34.59105 -58.43478
## 4 -9.18996 -75.01515
## 5 -12.08559 -77.01689
## 6 12.11814 -86.25463
## 7 19.41178 -99.17491
## 8 33.98273 -118.22563
## 9 36.00828 -119.96179
## 10 35.76977 -119.24410
## 11 37.78937 -122.40574
## 12 37.80434 -122.27069
## 13 45.56235 -122.64516
## 14 35.08000 -106.62000
## 15 29.97428 -90.08220
## 16 41.84674 -87.70726
## 17 38.41924 -82.44515
## 18 38.87700 -77.00637
## 19 42.33115 -71.08325
## 20 33.58204 -7.61922
## 21 40.39736 -3.66650
## 22 50.72170 7.11126
## 23 52.53529 13.39925
## 24 -33.92123 18.41964
## 25 -1.30124 36.78861
## 26 -4.04347 39.66820