Interactive maps

A simple map

Show the quakes data, or a subset, on a map:

library(leaflet)
quakes %>% 
  ___ %>% 
  leaflet() %>% 
  addTiles() %>% 
  addCircles()

► Solution:

library(leaflet)
quakes %>% 
  head(50) %>% 
  leaflet() %>% 
  addTiles() %>% 
  addCircles()

## Assuming "long" and "lat" are longitude and latitude, respectively

Add a popup to the tiles. Click on one of the circles

Hint: Use str_c() or paste0() to concatenate text and data.

library(leaflet)
___ %>% 
  addCircles()

► Solution:

library(leaflet)
quakes %>% 
  head(50) %>% 
  leaflet() %>% 
  addTiles() %>% 
  addCircles(popup = ~str_c("Magnitude: ", mag))

## Assuming "long" and "lat" are longitude and latitude, respectively

Explore further options in ?addTiles.