imCrop {xRing}

Crop Image Interactively

Description

A GUI for cropping an image

Usage

imCrop(im)

Arguments

im

a cimg object

Value

a cropped image

Examples

if (interactive()) {
  file_path <-
    system.file("img", "AFO1046.1200dpi.png", package = "xRing")
  im <- imRead(file_path)
  print(dim(im))
  im_crop <- imCrop(im)
  print(dim(im_crop))
}