R shiny - 反応（{}）設定のヒストグラムパラメータを使用して作業する

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)