Step 3: `response` and `explanatory`

Write some reactive logic so that the appropriate choices appear for the response and explanatory input widgets

Hint: use updateSelectInput(). The variable names will be returned by names(Raw_data()). Should you use a eventReactive() or observeEvent() to accomplish this?