RNetLogo 不适用于 macOS Sierra 和 Windows

Question

我使用的是 macOS Sierra 和 R 版本 3.4.1 以及 java 版本“1.8.0_144”。我正在尝试一个改编自 RNetLogo 手册的简单示例:

require(RNetLogo)
require(tidyverse)
require(extrafont)
loadfonts()

nl.path <- "/Applications/NetLogo 6.0.1"
NLStart(nl.path)
model.path <- "/models/Sample Models/Earth Science/Fire.nlogo"
absolute.model.path <- paste(nl.path,model.path,sep="")
NLLoadModel(absolute.model.path)

但是命令 NLLoadModel 给出了以下错误:

Error in .jcall(nl.obj, "V", "loadModel", .jnew("java/lang/String", model.path)) : 
  RcallMethod: invalid object parameter

这也发生在 Windows 和 Java 版本 1.8 中。

Answer 1

在 macOS Sierra 中使用 Fire.nlogo 模型，我找到了两种解决方案(参见 RNetLogo 的手册):首先，使用 gui=FALSE

Sys.setenv(NOAWT=1)
require(RNetLogo)
nl.path <- "/Applications/NetLogo 6.0.1/Java"
nl.path2 <- "/Applications/NetLogo 6.0.1"
NLStart(nl.path, gui=FALSE, nl.jarname='netlogo-6.0.1.jar')
model.path <- "/models/Sample Models/Earth Science/Fire.nlogo"
absolute.model.path <- paste(nl.path2,model.path,sep="")
NLLoadModel(absolute.model.path)
# Fire from manual
NLCommand("setup")
NLDoCommand(10, "go")
burned <- NLReport("burned-trees")
print(burned)
NLQuit()

然后使用 gui=TRUE:

Sys.setenv(NOAWT=1)
require(JGR)
Sys.unsetenv("NOAWT")
JGR()
# Now using JGR
require(RNetLogo)
nl.path <- "/Applications/NetLogo 6.0.1/Java"
nl.path2 <- "/Applications/NetLogo 6.0.1"
NLStart(nl.path, gui=TRUE, nl.jarname='netlogo-6.0.1.jar')
model.path <- "/models/Sample Models/Earth Science/Fire.nlogo"
absolute.model.path <- paste(nl.path2,model.path,sep="")
NLLoadModel(absolute.model.path)
# Fire from manual
NLCommand("setup")
NLDoCommand(10, "go")
burned <- NLReport("burned-trees")
print(burned)
NLQuit()