for循环，替换长度为零，闪亮

Question

这是一个已在 R 上下文中回答的问题，所以我应该有类似的解决方案。问题是，我的代码在 R 中有效，但在 Shiny 中无效？

错误来源

for(i in 1:N)
{

rank_free_choice<- rank_free_choice_fn(signal_agent[i], M, gamma, omega, K,m)

website_choice<- website_choice_fn(rank_data_today,alpha,rank_free_choice)   

t1<- ranking_algo_fn(rank_data_today, website_choice, kappa)

rank_data_today<- t1


df_website_choice[i,]<- website_choice
df_rank_data[i,]<- rank_data_today

}

两个矩阵都在循环开始之前被初始化，rank_data_today 之前也被创建。

函数继续进行，多个输出被放在一个列表中，然后在函数外返回。

奇怪的是，我还有另一个类似地运行此代码的应用程序，而且运行良好！！在那一个中​​，初始排名数据被传递给df_rank_data[i,]，更新后的数据被传递给df_rank_data[i+1,]

有人有解决办法吗？或者也许可以在我的上下文中解释this 答案？

Answer 1

我想通了，因为这个问题太奇怪了，所以我把它贴在这里，以防其他人遇到类似的问题。

代码不起作用的原因是 Shiny 中缺少函数的输入之一！！！！！

所以基本上这是一个简单明了的错字/粗心，但错误并没有真正帮助。

Shiny 应用程序只是我在 R 中编写的使用函数并从其他函数获取输入的模拟的封装。该错误只出现在倒数第二个函数中[没有真正的方法可以追踪它]

它在 R 中工作，因为我不必单独输入任何值，因为我已经保存了代码。