query and manipulation of variables in shiny server

Question

I\'m continuing to try and understand the basics of shiny. I am now trying to take a user input via a text box (input$answer), have a conditional test based on