We will be exploring the movement of 17 female elk through Yellowstone and the Grand Tetons National Park from 2006 to 2015. Environmental factors such as weather, land cover, and water quality will be analyzed for causing differences in elk migration.
Hover over each point on the map to see the elk ID and time.
# Let's make a custom elk icon!!
moose_icon <- makeIcon(
iconUrl = "pics/elk_icon.png", # Replace with the URL of your moose image
iconWidth = 30, iconHeight = 30
)
elk_df |>
filter(year(datetime) == 2012,
month(datetime) == 5) |>
leaflet() |>
addProviderTiles(providers$CartoDB.Positron, group = "Base Map") |>
addProviderTiles(providers$Esri.NatGeoWorldMap, group = "NatGeo Map") |>
addMarkers(
lng = ~long, lat = ~lat,
icon = moose_icon, # Use the custom icon
popup = ~paste("Elk ID:", elk_id, "Date", date(datetime)) # Add a popup with Elk ID
)
Take a tour of our website!