How to switch between various render types and then display output in the same output panel based on input?

Question

I\'m trying to output a plot or a print based on whether the string in the text box: if(grepl("plot", input$code) == TRUE)

The code and the app