# NOT RUN {
lat <- 54.4502651
long <- -3.1767946
square_km <- 1
overlay_image <- slippy_raster(lat = lat,
long = long,
square_km = square_km,
image_source = "stamen",
image_type = "watercolor",
max_tiles = 5)
# }
Run the code above in your browser using DataLab