Integrating R code with Shiny app

Solved. I got it. Instead of if(pass == TRURE) I should use if(isTRUE(TRUE))