Test whether an object has a Segment2D class

is_segment2d() tests whether an object has a "Segment2D" class

Usage

is_segment2d(x)

Arguments

x

An object

Value

A logical value

Examples

p1 <- as_coord2d(x = c(0, 1), y = c(0, 0))
p2 <- as_coord2d(x = c(1, 1), y = c(0, 1))
s <- as_segment2d(p1, p2 = p2)
is_segment2d(s)
#> [1] TRUE