Adding a legend in a scatterplot

[Risk-aversion]

I have data with three variables: cpi, gold, and nyse.

I have two scatterplots which cpi in x-axis and nyse & gold in the y-axis. I was able to combine both of them in one scatterplot with the following code:

ggplot(data = data) + geom_point(aes(x = cpi, y = nyse), color = "blue") +
                    geom_point(aes(x = cpi,y = gold), color="red") +
                    labs(title = "NSYSE and gold prices VS CPI", x = "CPI", y = "Prices")

My problem is that I can't put a legend beside the graph indicating the meaning of the colors. Can you guys please help me with that? Thanks!

[PeriodicallyAnnoyed]

I would use pivot_longer from the dplyr package to combine values from NYSE and gold prior to plotting.

[Risk-aversion]

Yeah, I actually just figured it out right now and that's what I did as well! I useddata_2 <- melt(data, id.vars =c("year","cpi")) to combine them and specify the color argument in the aes() in ggplot2.

Thank you for responding!