This R Markdown file builds a leaflet map of the location of what has recently been established as the world’s oldest asteroid impact crater (2.2 billion years old), as of January 21, 2020, at Yarrabubba, Western Australia.
This map is adapted from results of a study published in Nature Communications cited below.
I am in no way affiliated with this work, this document is purely for personal interest and for the purpose of publishing an interactive map using leaflet in RStudio to satisfy requirements of the Coursera online course: JHU Data Science Specialisation - Developing Data Products.
The ~70km diameter crater area is shown by the blue circle, best viewed at 9x zoom back away from max zoom.
The top left corner of the image marker gives the precise location of the crater centre at max zoom (for a better view of the centre of the area, type “-27.170599 118.817707” in the search field in google maps satellite view).
Click the map marker image to link to the Nature Comms paper.
website <- "https://www.nature.com/articles/s41467-019-13985-7"
citation <- "Erickson, T.M., Kirkland, C.L., Timms, N.E. et al.
Precise radiometric age establishes Yarrabubba, Western Australia,
as Earth’s oldest recognised meteorite impact structure.
Nat Commun 11, 300 (2020) doi:10.1038/s41467-019-13985-7"
access <- "open"library(leaflet)picIcon <- makeIcon(
iconUrl = "https://i.imgsafe.org/7e/7e4bb7ac91.png",
iconWidth = 200, iconHeight = 150,
iconAnchorX = 0, iconAnchorY = 0
)
paperSite <- "https://www.nature.com/articles/s41467-019-13985-7"
cratermap <- leaflet()
cratermap <- addTiles(cratermap)
cratermap <- cratermap %>% addMarkers(lat = -27.170599, lng = 118.817707,
label = "crater center (top-left corner at full zoom)",
icon = picIcon, popup = paperSite)
cratermap <- cratermap %>% addCircles(lat = -27.170599, lng = 118.817707,
radius = 35000, label = "impact structure area")
cratermap