if (FALSE) {
data('trg')
# Download OSM amenities
dt <- pp_vgi(trg, key = amenity)
# create binary ancillary information
dt <- pp_ancillary(dt, 'amenity')
# create ancillary information both binary and float
dt <- pp_ancillary(dt, floors, 'amenity')
}
Run the code above in your browser using DataLab