Description Usage Note Examples
This function provides a spatial interpretation of earthquake data with popups of location, magnitude and mortality.
This function provides a spatial interpretation of earthquake data with popups of location, magnitude and mortality.
1 2 3 |
For BC date ranges, use a one sided inequality e.g. datevalue < '0000-01-01'
For BC date ranges, use a one sided inequality e.g. datevalue < '0000-01-01'
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 | ## Not run:
# User inputs a country and range of dates to be explored.
# The earth map will plot the points as a leaflet with a pop up based on the date of the event.
# For BC date ranges, use a one sided inequality e.g. datevalue < '0000-01-01'
library(leaflet)
library(dplyr)
any_name_df<-eq_clean_data(results)
any_name_df<-any_name_df%>%filter(COUNTRY=="GREECE")%>% filter(datevalue > '1900-01-01', datevalue < '1950-01-01')
any_name_df<-any_name_df%>%mutate(popup_info=eq_create_label(any_name_df))
any_name_df%>%leaflet() %>% leaflet::addTiles()%>%addCircleMarkers(lng = ~LONGITUDE,lat = ~LATITUDE,radius = ~EQ_PRIMARY,weight=1,popup=~popup_info)
## End(Not run)
## Not run:
# User inputs a country and range of dates to be explored.
# The earth map will plot the points as a leaflet with a pop up based on the date of the event.
# For BC date ranges, use a one sided inequality e.g. datevalue < '0000-01-01'
# Not all events will have a mortality value.
library(leaflet)
library(dplyr)
any_name_df<-eq_clean_data(results)
any_name_df<-any_name_df%>%filter(COUNTRY=="GREECE")%>% filter(datevalue > '1900-01-01', datevalue < '1950-01-01')
any_name_df<-any_name_df%>%mutate(popup_info=eq_create_label(any_name_df))
any_name_df%>%leaflet() %>% leaflet::addTiles()%>%addCircleMarkers(lng = ~LONGITUDE,lat = ~LATITUDE,radius = ~EQ_PRIMARY,weight=1,popup=~popup_info)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.