R闪亮 - 在反应式（{}）设置中使用直方图参数

Question

我试图将闪烁应用中的反应直方图的x轴限制设置为常量。例如，无论我模拟的数据如何，我总是希望在0到3000之间有200个中断（任何频率超过3000或低于0的频率应该被截断）。

有没有简单的方法来完成这项工作？

我尝试了基于一个想法here如下：依次

output$plot4 <- renderPlot({ 
     plot(histSims()     
    )) 
    }) 

histSims <- reactive({ 
     #return 
     hist(beanSims()[beanSims() > 1 & beanSims < 3000], 
      breaks = 200, 
      prob = T) 

，但我得到

Error: comparison (3) is possible only for atomic and list types 

Answer 1

这个怎么样代码：

histSims <- reactive({ 
      #return 
      beanSims_local<-beanSims() 
      beanSims_local<-beanSims_local[beanSims_local> 1 & beanSims_local< 3000] 
      hist(beanSims_local, 
       breaks = 200, 
       prob = T)