Add together geo_list or json objects
Details
If the first object is an object of class geo_list
, you
can add another object of class geo_list
or of class json
,
and will result in a geo_list
object.
If the first object is an object of class json
, you can add
another object of class json
or of class geo_list
, and will result
in a json
object.
Examples
if (FALSE) { # \dontrun{
# geo_list + geo_list
## Note: geo_list is the output type from geojson_list, it's just a list with
## a class attached so we know it's geojson :)
vec <- c(-99.74, 32.45)
a <- geojson_list(vec)
vecs <- list(
c(100.0, 0.0), c(101.0, 0.0), c(101.0, 1.0),
c(100.0, 1.0), c(100.0, 0.0)
)
b <- geojson_list(vecs, geometry = "polygon")
a + b
# json + json
c <- geojson_json(c(-99.74, 32.45))
vecs <- list(
c(100.0, 0.0), c(101.0, 0.0), c(101.0, 1.0),
c(100.0, 1.0), c(100.0, 0.0)
)
d <- geojson_json(vecs, geometry = "polygon")
c + d
(c + d) %>% pretty()
} # }