I am learning the leaflet package and am running into a snag. To learn the package I am using the Snow deaths dataset from the package HistData which contains historic Cholera deaths from an epidemic.
When I run the following code the deaths plot correctly put the map layer underlying the dots is Africa rather than London. Any tips on correcting this?
# John Snow Cholera data library(leaflet) library(HistData) library(sp) data(Snow.deaths) coordinates(Snow.deaths) <- x+y proj4string(Snow.deaths) <- CRS("+init=epsg:3109") leaflet(Snow.deaths) %>% addTiles() %>% addCircles(lng = ~y, lat = ~x, weight = 1, radius = ~3000, popup = ~case )