Map of the Canary Islands (Spain)

The following map shows a marker for each of the Canary Islands and a circle proportional to the island population

library(leaflet)
df <- data.frame(lat=c(29.250,29.035,28.4325,27.95861111,28.2686111,28.11666667,28.66666667,27.75),
                 lng=-c(13.508,13.63305556,14.00305556,15.5925,16.60555556,17.21666667,17.86666667,18),
                 pop=c(734,152289,116886,851231,904713,9093,81350,10968),
                 names=c("La Graciosa","Lanzarote","Fuerteventura","Gran Canaria","Tenerife","La Gomera","La Palma","El Hierro"))
map <- df %>%
        leaflet() %>%
        addTiles() %>%
        addMarkers(popup=df$names) %>%
        addCircles(weight=1,radius=sqrt(df$pop)*30)
## Assuming "lng" and "lat" are longitude and latitude, respectively
## Assuming "lng" and "lat" are longitude and latitude, respectively
map