maptools dotsInPolys：向量内存耗尽

Question

我猜r抛出错误是因为它试图分配比我在这台计算机上更多的RAM。但是，我尝试在具有更多RAM的计算机上仍然出现相同的错误。我认为spacePolygonsDataframe的结构或内容可能存在问题，但我不确定如何解决。

以下是引发错误的代码：

library(maptools)

load(url("https://www.dropbox.com/s/22iwbofvg1gjeko/nj_shape.RData?dl=1"))

persons.per.dot <- 500

num.dots <- nj@data %>% select("WhiteE") %>%
  mutate(WhiteE = WhiteE/persons.per.dot)

dots.output <-  dotsInPolys(nj, as.integer(num.dots[, "WhiteE"]), f="random")

产生此错误：

Error: vector memory exhausted (limit reached?)

有什么想法吗？谢谢！