# \donttest{
layer <- arc_open(
"https://geodata.baltimorecity.gov/egis/rest/services/Housing/dmxOwnership/MapServer/0"
)
res <- arc_select(
layer,
n_max = 100,
where = "RESPAGCY <> ' '",
fields = "RESPAGCY"
)
encoded <- encode_field_values(res, layer)
table(encoded$RESPAGCY)
# }
Run the code above in your browser using DataLab