R 量化灰度图像

我有灰度图像，我想量化到不同的灰度

更准确地说，在中，我们有一个函数

equalize（）

，它有一个参数

levels

。我们可以将

级别

值设置为256、128或64等，以量化灰度图像。（但是

equalize（）

函数将对给定的灰度图像执行直方图均衡化，这在我目前的情况下不是首选）

---

有人能提出一个公式或函数，我们可以用它来改变给定灰度图像中的灰度级数吗

首先将格式转换为连续格式。 现在是伪代码

intx=（int）（值/（量化））；
（新格式）y=x*量化

也可以通过这种糟糕的方式压缩图像。
EBImage中的默认图像数据表示是0到1之间的连续范围。为了将图像量化到给定数量的
级别
，首先将其转换为
0：（级别-1）
范围内的整数，然后返回到
0:1
，如以下示例中的
量化
函数所示

library(EBImage)

## sample grayscale image
x = readImage(system.file("images", "sample.png", package="EBImage"))

## function for performing image quantization
quantize = function(img, levels) round(img * (levels-1)) / (levels-1)

## quantize the image
y = quantize(x, levels = 8) 

## show the result
display(y)