Register Bookstein's coordinates

Registers a new baseline for the shape, with the ldk1-th and ldk2-th points being set on \((x= -0.5; y=0)\) and \((x= 0.5; y=0)\), respectively.

Usage

coo_bookstein(coo, ldk1, ldk2)

Arguments

coo

matrix of (x; y) coordinates or any Coo object.

ldk1

numeric the id of the first point of the new baseline (the first, by default)

ldk2

numeric the id of the second point of the new baseline (the last, by default)

Value

a matrix of (x; y) coordinates, or a Coo object.

Details

For Out, it tries to do it using $ldk slot. Also the case for Opn, but if no landmark is defined, it will do it on the first and the last point of the shape.

For Out and Opn defines the first landmark as the first point of the new shapes with coo_slide.

See also

Other baselining functions: coo_baseline()

Other coo_ utilities: coo_aligncalliper(), coo_alignminradius(), coo_alignxax(), coo_align(), coo_baseline(), coo_boundingbox(), coo_calliper(), coo_centdist(), coo_center(), coo_centpos(), coo_close(), coo_down(), coo_dxy(), coo_extract(), coo_flipx(), coo_force2close(), coo_interpolate(), coo_is_closed(), coo_jitter(), coo_left(), coo_likely_clockwise(), coo_nb(), coo_perim(), coo_range(), coo_rev(), coo_right(), coo_rotatecenter(), coo_rotate(), coo_sample_prop(), coo_samplerr(), coo_sample(), coo_scale(), coo_shearx(), coo_slice(), coo_slidedirection(), coo_slidegap(), coo_slide(), coo_smoothcurve(), coo_smooth(), coo_template(), coo_trans(), coo_trimbottom(), coo_trimtop(), coo_trim(), coo_untiltx(), coo_up(), is_equallyspacedradii()

Examples

h <- hearts %>% slice(1:5) # for the sake of speed
stack(h)

stack(coo_bookstein(h, 2, 4))

h <- hearts[1]
coo_plot(h)

coo_plot(coo_bookstein(h, 20, 57), border='red')