# NOT RUN {
# all okay
x <- "{ type: 'Feature', properties: {}, geometry: { type: 'Point',
coordinates: [10, 50] } }"
lawn_featureof(x, 'Point', 'foobar')
# error
# lawn_featureof(x, 'MultiPoint', 'foobar')
# }
Run the code above in your browser using DataLab