我使用deldir包来计算一组坐标的Voronoi投影。
这很有效，而且我已经能够构建绘图了，但是我需要将计算出的点与原始数据集相关联，原始数据集中包含每个坐标对的附加元数据。
基本上，我需要一个可以匹配原始数据的多边形ID。因此，例如，如果将坐标对＃1投影为五边形多边形，我需要将多边形ID = 1分配给这五个线段中的每一个，以便我可以合并元数据。
虚拟数据示例：
require(deldir)
set.seed(21)
x <- rnorm(500, 0, 1.5)
y <- rnorm(500, 0, 1)
df1 <- data.frame(x,y,ID=seq(1,500,1))
vtess <- deldir(df1$x, df1$y)
因此对于df1[1,]，我需要知道vtess中生成的每个值。
df1[1,]的ID = 1，因此我尝试为vtess$polygonID生成的每个细分创建一个df1[1,] = 1的列，依此类推。
任何帮助都会很棒