Calculate a destination
Examples
point <- '{
"type": "Feature",
"properties": {
"marker-color": "#0f0"
},
"geometry": {
"type": "Point",
"coordinates": [-75.343, 39.984]
}
}'
geo_destination(point, 50, 90, 'miles')
#> [1] "{\"geometry\":{\"coordinates\":[-74.398884,39.98017],\"type\":\"Point\"},\"properties\":{},\"type\":\"Feature\"}"
geo_destination(point, 200, 90)
#> [1] "{\"geometry\":{\"coordinates\":[-72.996866,39.960345],\"type\":\"Point\"},\"properties\":{},\"type\":\"Feature\"}"