Hi @Noj! Welcome!
I'm afraid it looks like there are a couple of errors preventing your example from running:
- the
library()
statements are missing - both inputs are called
Var1
, but theserver()
code referencesinput$Var2
(Maybe take a look at the tips in our Shiny Debugging & Reprex Guide?)
However, I suspect the source of the problem you're asking about is just a typo — you seem to be missing the +
between your two geom_line()
layers. Try this, instead:
p <- ggplot() +
geom_line(data = out(), aes(x = x, y = y)) +
geom_line(data = out2(), aes(x = x, y = y), color = "red")