各位好，我的標題打得很不清楚，因為不知道怎麼一句話形容
我現在想讓使用者在shiny內可以filter整個資料
因此我寫了一個selectInput進來，接著在shiny內部用switch
轉成一個reactive obejct
但是這樣會的很奇怪，R code不讓我過，我也覺得這段程式碼很怪
舉個例子就像這樣我想確認2是不是大於1
正常的寫法一定是 2 > 1 所以答案是TRUE
那我現在因為是從外部進來的關係所以我得指定他給一個object
bigger <- input$chooseoperator
假設bigger裡面已經是">"
那我就會寫成 2 bigger 1，不過這明顯是怪怪的
我有想過另外一種用function寫的方法，像是除號除了用/代表之外
也有divide_by function可以使用，
請問有板友有其他方法可以克服這個問題嗎?

if(input$chooseoperator == ">") 2 > 1 else 2 < 1

其實我看不懂問題是什麼... sorry