Question

我正在尝试在q中创建2d存储桶

给出二维网格

5 o---o---o
  |   |   |
3 o---o---o
  |   |   |
0 o---o---o
  0   3   5

网格上的每个节点为正整数定义2d桶的边界。例如，中心节点将包含元组(x;y)，其中3<=x<5和3<=y<5。从0,...,8索引了这9个存储桶。

我尝试在q中实现此方法的方式是

bucketidx:{((0 3 5i) cross (0 3 5i)) bin "i"$(first x;last x)}

要遍历水桶：

bucketidx each ((0 3 5i) cross (0 3 5i))
/0j, 1j, 2j, 3j, 4j, 5j, 6j, 7j, 8j

但是我在bucketidx 6 0上遇到了奇怪的行为。我希望它在左上角节点

(5<=y) and (x=0)

，但它返回索引8，该索引将是右上节点。我希望很清楚我要做什么。

感谢您的帮助

Answer 1

那是因为垃圾箱的行为。

二进制搜索返回x中最后一项的索引，即<= y

您的列表是：

    q) a:(0 3 5i) cross (0 3 5i)
    q) a / (0 0; 0 3;0 5;3 0; 3 3; 3 5;5 0;5 3; 5 5)

您正在使用bin函数在此列表中搜索（6 0），该列表中的最后一项为<=（6; 0）为（5; 5），该项目的索引为8。

    q) a bin 6 0 / 8

这就是获得8分的原因。

我认为“带元组的元组”方法不是解决此问题的正确方法。

您可以使用类似下面的想法。函数的第一个参数是X坐标，第二个是Y坐标。

 q) node:{b:0 3 5;(b bin x)+3*b bin y}
 q) node[0;6] / 6

Answer 2

另一种方法是使用具有已排序属性的字典，这使其成为一个步进函数。

q)d:`s#0 3 5!0 1 2
q)3 sv' d@(0 3 5i) cross (0 3 5i)
0 1 2 3 4 5 6 7 8
q)3 sv' d@enlist 6 0
,6