R jags中的dgenpareto模

Question

我最近更新了我的R、Rstudio和rjags包。下面是我正在运行我的R脚本的平台/版本：

> version
_                                
platform       x86_64-w64-mingw32               
arch           x86_64                           
os             mingw32                          
crt            ucrt                             
system         x86_64, mingw32                  
status                                          
major          4                                
minor          2.0                              
year           2022                             
month          04                               
day            22                               
svn rev        82229                            
language       R                                
version.string R version 4.2.0 (2022-04-22 ucrt)
nickname       Vigorous Calisthenics            
> 


> library(runjags)
Warning message:
package ‘runjags’ was built under R version 4.2.1 

> library(rjags)
Loading required package: coda
Linked to JAGS 4.3.1
Loaded modules: basemod,bugs
Warning message:
package ‘rjags’ was built under R version 4.2.1 

> library(R2jags)
Attaching package: ‘R2jags’
The following object is masked from ‘package:coda’:
    traceplot
Warning message:
package ‘R2jags’ was built under R version 4.2.1 

我正在运行一个jags模型，其中包含作为'dgenpareto‘的广义Pareto分布(GPD)。我使用以下命令行来运行我的jags模型：

> jags.parallel(model.file = bayes_gpd,data = jags.data,parameters.to.save = jags.params,
                                            inits = jags.inits,n.iter=50000,n.chains = 4,
                                            jags.module='runjags')

但是，每次尝试评估jags模型时，我都会得到以下错误消息：

checkForRemoteErrors中的错误(Val)：4个节点产生错误；第一个错误:未找到文件: C:\Program \JagesJags-4.3.1/x64/modules/runjags.dll

虽然我在更新R和jags包之前运行我的jags模型(相同的代码)并没有问题。请你提供一些提示，说明我如何解决这个问题？

Answer 1

不幸的是，我无法像上面描述的那样解决rjags模型的这个问题。但是，我可以将我的模型代码转换为一个runjags模型，其中已经嵌入了degenpar。下面是在R中以并行方式运行模型的命令行：

cl <- makeCluster(4)
> run.jags(model=bayes_gpd,
       data=jags.data,
       n.chains=4,
       burnin=4000,
       sample=n.iter,
       monitor=jags.params,
       method="rjparallel", cl=cl,
       modules="runjags")

请注意，rjags中的以下代码语法如下：

bayes_gpd <- function() {
YOUR MODEL/LINES
}

将更改为runjags模型语法，如下所示：

bayes_gpd <- "model {
YOUR MODEL/LINES
}"