Delaunay4Points出错：下标超出范围

Question

我有这个矩阵：

v <- rbind(  c( -5, -5,  16 )  
           , c( -5,  8,   3 )  
           , c(  4, -1,   3 )  
           , c(  4, -5,   7 )  
           , c(  4, -1, -10 )  
           , c(  4, -5, -10 )  
           , c( -5,  8, -10 )  
           , c( -5, -5, -10 ))

然后：

> library(DatabionicSwarm)
Delaunay4Points(v, IsToroid = FALSE)

Error in UniqDelaunay[Uniq2DataInd, Uniq2DataInd] : 
  subscript out of bounds

这是一个错误吗？不幸的是，没有Github回购填补问题。

我与其他工具进行了比较，结果应为：

[0,1,0,1,0,0,0,1]
[1,0,1,1,0,0,1,1]
[0,1,0,1,1,1,1,1]
[1,1,1,0,0,1,0,1]
[0,0,1,0,0,1,1,1]
[0,0,1,1,1,0,0,1]
[0,1,1,0,1,0,0,1]
[1,1,1,1,1,1,1,0]