rings <- list(list(
c(-2.275543, 53.464547),
c(-2.275543, 53.489271),
c(-2.215118, 53.489271),
c(-2.215118, 53.464547),
c(-2.275543, 53.464547)
))
lawn_polygon(rings, properties = list(name = 'poly1', population = 400))
# Make a FeatureCollection
lawn_featurecollection(lawn_polygon(rings))
Run the code above in your browser using DataLab