# NOT RUN {
pt <- '{
"type": "Feature",
"properties": {
"marker-color": "#0f0"
},
"geometry": {
"type": "Point",
"coordinates": [-75.343, 39.984]
}
}'
lawn_circle(pt, radius = 5, steps = 10)
# }
# NOT RUN {
lawn_circle(pt, radius = 5, steps = 10) %>% view
lawn_circle(pt, radius = 4, steps = 10) %>% view
lawn_circle(pt, radius = 3, steps = 10) %>% view
lawn_circle(pt, radius = 10, steps = 10) %>% view
lawn_circle(pt, radius = 5, steps = 5) %>% view
lawn_circle(pt, radius = 5, steps = 4) %>% view
# }
Run the code above in your browser using DataLab