I looks like you are using the base plotting function so you would use the abline function to add a line to the plot. Using the h parameter adds a horizontal line with the given y intercept.
DF <- data.frame(X = 1:20, Y = runif(n = 20, min = -5, max = 5))
plot(DF$X, DF$Y)
abline(h = 0)

Created on 2020-06-11 by the reprex package (v0.3.0)