Visualize Stroke Region and Center of Gravity (COG)

Visualizes the stroke region of a character-like binary image using the result from cog_stroke. Optionally overlays crosshair lines at the computed center of gravity (COG) position.

Usage

draw_stroke(lst, show_cog = TRUE, plot_image = TRUE, cimg = TRUE)

Arguments

lst: A list returned by cog_stroke, containing stroke pixel data and computed statistics.
show_cog: Logical. If TRUE (default), draws horizontal and vertical red lines through the COG to visualize its position.
plot_image: Logical. If TRUE (default), plots the image. If FALSE, returns the image object without plotting.
cimg: Logical. If TRUE (default) and imager is available, returns a cimg object. If FALSE, always returns a raster object.

Value

If cimg = TRUE and imager is installed, returns a cimg object. Otherwise, returns a raster object (class "raster").

Details

By default (cimg = TRUE), the function returns a cimg object if the imager package is available. If imager is not installed or if cimg = FALSE, a base R raster object created by as.raster() is returned.

Examples

data(img_A)
result <- cog_stroke(img_A)
draw_stroke(result, show_cog = TRUE, cimg = FALSE)