说我有n个二维坐标，它们随机排列在[ 0 ， L ] x [ 0 ，< em> L ]正方形，包含在 n x 2数组中，如下所示：
n <- 1000
L <- 1000
c <- runif(n*2, 0, L)
coord <- cbind(c[1:n], c[(n+1):(2*n)])
将区域分割成J个相等大小的正方形，其中J是某个正方形整数（4、9、16 ...）。
在这些子区域R_1，R_2，...，R_J中，从r中随机选择该区域内包含的点中的coord。
现在将这些区域中的每个区域划分为J个子区域，并从每个子区域中再夺取r个点。
将此分形分解重复M次。
我希望能够将r中的coord索引与任何特定子区域中的坐标相对应，例如R_314（第三个正方形的第一个正方形的第四个正方形）
1）我可以使用哪种存储结构对任意M，J和r进行分形分解并存储与每个区域相关的索引？我需要一个树状结构，但是我不知道该怎么做。
2）如何在不使用大量循环和if语句的情况下用索引填充此内存结构？
