我实际上是在使用脚本和来自纽约大学的一个类似的数据集,他报告了一个大约18小时的类似DS的估计时间。然而,当我尝试运行我的模型时,它在18小时内不会超过10%。我正在运行一个500ITER,100个预热2链模型,使用超过5个参数的Bernoulli_logit函数,试图通过No U Turn MC过程估计其中的2个。(在每一步,它从随机正态a中提取每个参数,然后估计y,并将其与实际数据进行比较,以查看新参数是否更适合数据)
y[n] ~ bernoulli_logit( alpha[kk[n]] + b
我使用rstan::stan()开发了一些软件包。我创建了一个函数,其返回值是由S4生成的一个rstan::stan()类对象。为了方便地访问估计值或为数据添加信息,我希望创建一个新的S4类对象,它继承了rstan::stan()的S4类,这样就有了新的插槽。fit <- rstan::stan( model_name=scr, data=data) # This is a fictitious code.character",