eq_map: Interactive Earthquake Map
In JazminCevallos/Package-Evaluation: NOAA Significant Earthquake

Description Usage Arguments Details Value See Also Examples

eq_map creates an interactive leaflet map showing the location of earthquakes in the given quakes data set.

1	eq_map(data, annot_col = "DATE")

`data`	The `quakes` data frame. For best results, you should filter to a single country or nearby countries, and preferably filter down to a relatively narrow date range (maybe several decades at most).
`annot_col`	The column to use for the popup annotation. You may use a single column; otherwise create a more useful label first by using the `eq_create_label` function.

This function shows an interactive map of the location of the earthquakes in the given quakes data. The size of the circles are proportional to the magnitude of the earthquakes (in the EQ_PRIMARY) variable. The map is interactive, and when you click on a link, the popup shows the annotation as specified by the annot_col variable.

Returns an interactive leaflet map.

eq_create_label to create a more useful popup annotation in the quakes data frame.

library(lubridate); library(dplyr)

## use 'DATE' as annotation
quakes <- eq_load_clean_data() %>%
 dplyr::filter(COUNTRY == 'JAPAN') %>%
 dplyr::filter(lubridate::year(DATE) >= 2000)

eq_map(quakes, annot_col = 'DATE')


## Create a popup_text variable and use that for the label
quakes <- eq_load_clean_data() %>%
 dplyr::filter(COUNTRY == 'JAPAN') %>%
 dplyr::filter(lubridate::year(DATE) >= 2000) %>%
 dplyr::mutate(popup_text = eq_create_label(.))

eq_map(quakes, annot_col = 'popup_text')