Image-Dethering-in-R Trying to dether the image in R at high and low resolution and identify the noises