Specify a point-line junction

Usage

synthetic.point.line.junction(
  point.location,
  line.origin,
  line.direction,
  line.range
)

Arguments

point.location: Point location.
line.origin, line.direction, line.range: Segment parameters.

Value

A two-stratum synthetic_stratified_geometry.

Examples

synthetic.point.line.junction(c(0, 0), c(0, 0), c(1, 0), c(0, 1))
#> $kind
#> [1] "geometry"
#> 
#> $family
#> [1] "stratified"
#> 
#> $version
#> [1] 1
#> 
#> $parameters
#> $parameters$strata
#> $parameters$strata[[1]]
#> $id
#> [1] "point"
#> 
#> $family
#> [1] "point"
#> 
#> $version
#> [1] 1
#> 
#> $intrinsic.dim
#> [1] 0
#> 
#> $parameters
#> $parameters$location
#> [1] 0 0
#> 
#> 
#> attr(,"class")
#> [1] "synthetic_point_stratum" "synthetic_stratum"      
#> [3] "list"                   
#> 
#> $parameters$strata[[2]]
#> $id
#> [1] "line"
#> 
#> $family
#> [1] "segment"
#> 
#> $version
#> [1] 1
#> 
#> $intrinsic.dim
#> [1] 1
#> 
#> $parameters
#> $parameters$coordinate.range
#> [1] 0 1
#> 
#> $parameters$origin
#> [1] 0 0
#> 
#> $parameters$direction
#> [1] 1 0
#> 
#> 
#> attr(,"class")
#> [1] "synthetic_segment_stratum" "synthetic_stratum"        
#> [3] "list"                     
#> 
#> 
#> $parameters$junctions
#> NULL
#> 
#> $parameters$ambient.dim
#> [1] 2
#> 
#> $parameters$intrinsic.dim
#> [1] NA
#> 
#> $parameters$intrinsic.dim.by.region
#> point  line 
#>     0     1 
#> 
#> $parameters$declared.regions
#> [1] "point" "line" 
#> 
#> 
#> attr(,"class")
#> [1] "synthetic_stratified_geometry" "synthetic_geometry"           
#> [3] "synthetic_component"