| TO_GeoJson {geojsonR} | R Documentation |
converts data to a GeoJson object
Description
converts data to a GeoJson object
converts data to a GeoJson object
Usage
# utl <- TO_GeoJson$new()
Value
a List
Methods
TO_GeoJson$new()--------------Point(data, stringify = FALSE)--------------MultiPoint(data, stringify = FALSE)--------------LineString(data, stringify = FALSE)--------------MultiLineString(data, stringify = FALSE)--------------Polygon(data, stringify = FALSE)--------------MultiPolygon(data, stringify = FALSE)--------------GeometryCollection(data, stringify = FALSE)--------------Feature(data, stringify = FALSE)--------------FeatureCollection(data, stringify = FALSE)--------------
Methods
Public methods
Method new()
Usage
TO_GeoJson$new()
Method Point()
Usage
TO_GeoJson$Point(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method MultiPoint()
Usage
TO_GeoJson$MultiPoint(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method LineString()
Usage
TO_GeoJson$LineString(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method MultiLineString()
Usage
TO_GeoJson$MultiLineString(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method Polygon()
Usage
TO_GeoJson$Polygon(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method MultiPolygon()
Usage
TO_GeoJson$MultiPolygon(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method GeometryCollection()
Usage
TO_GeoJson$GeometryCollection(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method Feature()
Usage
TO_GeoJson$Feature(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method FeatureCollection()
Usage
TO_GeoJson$FeatureCollection(data, stringify = FALSE)
Arguments
dataa list specifying the geojson geometry object
stringifyeither TRUE or FALSE, specifying if the output should also include a geojson-dump (as a character string)
Method clone()
The objects of this class are cloneable with this method.
Usage
TO_GeoJson$clone(deep = FALSE)
Arguments
deepWhether to make a deep clone.
Examples
library(geojsonR)
# initialize class
init = TO_GeoJson$new()
# Examples covering all geometry-objects
# Point
point_dat = c(100, 1.01)
point = init$Point(point_dat, stringify = TRUE)
point
# MultiPoint
multi_point_dat = list(c(100, 1.01), c(200, 2.01))
multi_point = init$MultiPoint(multi_point_dat, stringify = TRUE)
multi_point
# LineString
linestring_dat = list(c(100, 1.01), c(200, 2.01))
line_string = init$LineString(linestring_dat, stringify = TRUE)
line_string
# MultiLineString
multilinestring_dat = list(list(c(100, 0.0), c(101, 1.0)), list(c(102, 2.0), c(103, 3.0)))
multiline_string = init$MultiLineString(multilinestring_dat, stringify = TRUE)
multiline_string
# Polygon (WITHOUT interior rings)
polygon_WITHOUT_dat = list(list(c(100, 1.01), c(200, 2.01), c(100, 1.0), c(100, 1.01)))
polygon_without = init$Polygon(polygon_WITHOUT_dat, stringify = TRUE)
polygon_without
# Polygon (WITH interior rings)
polygon_WITH_dat = list(list(c(100, 1.01), c(200, 2.01), c(100, 1.0), c(100, 1.01)),
list(c(50, 0.5), c(50, 0.8), c(50, 0.9), c(50, 0.5)))
polygon_with = init$Polygon(polygon_WITH_dat, stringify = TRUE)
polygon_with
# MultiPolygon
# the first polygon is without interior rings and the second one is with interior rings
multi_polygon_dat = list(list(list(c(102, 2.0), c(103, 2.0), c(103, 3.0), c(102, 2.0))),
list(list(c(100, 0.0), c(101, 1.0), c(101, 1.0), c(100, 0.0)),
list(c(100.2, 0.2), c(100.2, 0.8), c(100.8, 0.8), c(100.2, 0.2))))
multi_polygon = init$MultiPolygon(multi_polygon_dat, stringify = TRUE)
multi_polygon
# GeometryCollection (named list)
Point = c(100, 1.01)
MultiPoint = list(c(100, 1.01), c(200, 2.01))
MultiLineString = list(list(c(100, 0.0), c(101, 1.0)),
list(c(102, 2.0), c(103, 3.0)))
LineString = list(c(100, 1.01), c(200, 2.01))
MultiLineString = list(list(c(100, 0.0), c(101, 1.0)),
list(c(102, 2.0), c(103, 3.0)))
Polygon = list(list(c(100, 1.01), c(200, 2.01), c(100, 1.0), c(100, 1.01)))
Polygon = list(list(c(100, 1.01), c(200, 2.01), c(100, 1.0), c(100, 1.01)),
list(c(50, 0.5), c(50, 0.8), c(50, 0.9), c(50, 0.5)))
MultiPolygon = list(list(list(c(102, 2.0), c(103, 2.0), c(103, 3.0), c(102, 2.0))),
list(list(c(100, 0.0), c(101, 1.0), c(101, 1.0), c(100, 0.0)),
list(c(100.2, 0.2), c(100.2, 0.8), c(100.8, 0.8), c(100.2, 0.2))))
geometry_collection_dat = list(Point = Point, MultiPoint = MultiPoint,
MultiLineString = MultiLineString, LineString = LineString,
MultiLineString = MultiLineString, Polygon = Polygon,
Polygon = Polygon, MultiPolygon = MultiPolygon)
geometry_col = init$GeometryCollection(geometry_collection_dat, stringify = TRUE)
geometry_col
# Feature (named list)
# Empty 'properties' list
feature_dat1 = list(id = 1, bbox = c(1,2,3,4), geometry = list(Point = c(100, 1.01)),
properties = list())
# Nested 'properties' list
feature_dat2 = list(id = "1", bbox = c(1,2,3,4), geometry = list(Point = c(100, 1.01)),
properties = list(prop0 = 'value0',
prop1 = 0.0, vec = c(1,2,3), lst = list(a = 1, d = 2)))
feature_obj = init$Feature(feature_dat2, stringify = TRUE)
feature_obj
cat(feature_obj$json_dump)
# FeatureCollection (named list)
# takes as input the previously created 'feature_dat1', 'feature_dat2'
feature_col_dat = list(bbox = c(-10.01, -10.01, 10.01, 10.01),
features = list(Feature = feature_dat1, Feature = feature_dat2))
feature_col_dat
feature_collection_obj = init$FeatureCollection(feature_col_dat, stringify = TRUE)
feature_collection_obj
cat(feature_collection_obj$json_dump)