if (FALSE) {
set_osmapi_connection("testing") # use the testing server
chset_id <- osm_create_changeset(
comment = "Describe the changeset",
source = "GPS;survey",
hashtags = "#testing;#osmapiR"
)
chaset <- osm_read_changeset(changeset_id = chset_id)
chaset
upd_chaset <- osm_update_changeset(
changeset_id = chset_id,
comment = "Improved description of the changeset",
hashtags = "#testing;#osmapiR"
)
upd_chaset
}
Run the code above in your browser using DataLab