lawn_line_slice: Slice a line given two points

Description Usage Arguments Value Examples

View source: R/line_slice.R

Description

Takes a line, a start Point, and a stop point and returns the line in between those points

Usage

1
lawn_line_slice(point1, point2, line, lint = FALSE)

Arguments

point1

Starting data-Feature<(data-Point)>

point2

Stopping data-Feature<(data-Point)>

line

Line to slice, a data-Feature<(data-LineString)>

lint

(logical) Lint or not. Uses geojsonhint. Takes up increasing time as the object to get linted increases in size, so probably use by default for small objects, but not for large if you know they are good geojson objects. Default: FALSE

Value

A data-Feature<(data-LineString)>

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
start <- '{
  "type": "Feature",
  "properties": {},
  "geometry": {
    "type": "Point",
    "coordinates": [-77.029609, 38.881946]
  }
}'
stop <- '{
  "type": "Feature",
  "properties": {},
  "geometry": {
    "type": "Point",
    "coordinates": [-77.021884, 38.889563]
  }
}'
line <- '{
 "type": "Feature",
 "properties": {},
 "geometry": {
   "type": "LineString",
   "coordinates": [
     [-77.031669, 38.878605],
     [-77.029609, 38.881946],
     [-77.020339, 38.884084],
     [-77.025661, 38.885821],
     [-77.021884, 38.889563],
     [-77.019824, 38.892368]
    ]
  }
}'
lawn_line_slice(start, stop, line)

# lint input objects
lawn_line_slice(start, stop, line, TRUE)
## Not run: 
line %>% view
lawn_line_slice(point1 = start, point2 = stop, line) %>% view

## End(Not run)

Example output

<LineString>
  Bounding box: -77.0 38.9 -77.0 38.9
  No. points: 10
  Properties: NULL
<LineString>
  Bounding box: -77.0 38.9 -77.0 38.9
  No. points: 10
  Properties: NULL

lawn documentation built on Jan. 6, 2021, 5:07 p.m.