Warning: Error in : Aesthetics must be either length 1 or the same as the data (1): x, group and colour

Question

I can get this to work without using Shiny but I am getting this error. Basically I am trying to add lines to the graph based on a checkbox. I do this by creating the vector