shiny code doesn't work if combined into 1 function

Question

In the provided example, I am trying to clear all filters in this table, and then have the server set one filter to "apple."

I have 3 buttons in the example