Compute intercept for vline and hline from data and parameters
compute_intercept(data, intercept, var = "x")
data
intercept
var
Hadley Wickham <h.wickham@gmail.com>