r - 将单色图像转换为 x,y 坐标到数据帧

Question

我想将单色图像的“黑色值”转换为 xy 点，以便稍后在散点图中绘制它们。

链接中的以下图片很容易解释我在寻找什么。

我还想控制“每个区域的点数”！

让我们来：

_{（来源：tieudesigns.com）}

作为我们的示例图像。

编辑：

这是我想出的：

> library("magick")
> test <- image_read('*CENSORED*\\white-circle-black-background.jpg')
> testDS <- as.raster(test)

Answer 1

只是展示了我在评论中所暗示的内容。R当我在命令行中展示使用ImageMagick的技术时，您必须调整该方法：

convert mask.jpg -threshold 50% -colorspace gray -fx "(1-u)*rand()>0.8 ? 0:1" result.png

或更改阈值：

convert mask.jpg -threshold 50% -colorspace gray -fx "(1-u)*rand()>0.9 ? 0:1" result.png

有趣的部分显然是-fx表达式，它使用每个像素的值 - 称为u- 并在 [0,1] 范围内缩放，其中 0 是黑色，1 是白色。基本上我反转像素 ( 1-u) 并乘以一个随机数然后阈值它。更改阈值会更改像素的密度。根据结果​​，我要么输出黑色像素，要么输出白色像素。

我不确定“将这些值转换为坐标”是什么意思，但如果你真的想要黑色像素坐标的列表：

convert mask.jpg -threshold 50% -colorspace gray -fx "(1-u)*rand()>0.8?0:1" -depth 8 txt: | grep "(0)"

样本输出

2,0: (0)  #000000  gray(0)
4,0: (0)  #000000  gray(0)
6,0: (0)  #000000  gray(0)
7,0: (0)  #000000  gray(0)
8,0: (0)  #000000  gray(0)
10,0: (0)  #000000  gray(0)
13,0: (0)  #000000  gray(0)
14,0: (0)  #000000  gray(0)