I may be misunderstanding your question, but I think this is all you need:

ggplot(data = data, aes(x = x, y = y, color = Variable)) + geom_point() + scale_color_manual(values = color_plot)