2017-10-20 77 views
0

这是一个已经在R上下文中回答的问题,所以我应该有一个类似的解决方案。问题是,我的代码在R中工作,但不在Shiny中?for Loop,替换长度为零,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答案?

回答

0

我明白了,既然问题太离谱了,我会在这里发帖,以防其他人遇到类似的问题。

代码不工作的原因是因为该函数的其中一个输入在Shiny中丢失了!!!!!

所以基本上这是一个普通的和简单的错字/粗心,但错误并没有真正的帮助。

Shiny应用程序仅仅是一个我在R中编写的模拟包装,它使用了函数,并从其他函数获取输入。该错误只出现在倒数第二个函数[没有真正的方式来跟踪它]

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