Reduce image size by 2 along both axes by dropping pixels.
half.image(image_data, byrow = TRUE)
image_data
integer matrix, a 1-channel image.