Engine
library(V8)
engine <- v8()
engine$eval("var x = 42")
engine$get("x")
## [1] 42
turfjs
library(lawn)
data <- '{
"type": "Feature",
"properties": {},
"geometry": {
"type": "Polygon",
"coordinates": [[
[-112.072391,46.586591],
[-112.072391,46.61761],
[-112.028102,46.61761],
[-112.028102,46.586591],
[-112.072391,46.586591]
]]
}
}'
(b <- lawn_buffer(data, 1, "kilometers"))
## <Feature>
## Type: Polygon
## Bounding box: -112.1 46.6 -112.0 46.6
## No. points: 74
## Properties: NULL
class(b) <- "polygon"
view(list(b, data)) %>%
addProviderTiles("CartoDB")
mapshaper
library(rmapshaper)
ls("package:rmapshaper")
## [1] "apply_mapshaper_commands" "drop_null_geometries"
## [3] "ms_clip" "ms_dissolve"
## [5] "ms_erase" "ms_explode"
## [7] "ms_filter_fields" "ms_filter_islands"
## [9] "ms_innerlines" "ms_lines"
## [11] "ms_points" "ms_simplify"