The problem arise when I try to generate use the geom_vline and geom_hline function to have the mean lines, when I click run it appears the message:
Warning messages:
1: Removed 1 rows containing missing values (geom_vline).
2: Removed 1 rows containing missing values (geom_hline).
3: Removed 1 rows containing missing values (geom_text).
I am running the following functions to create the scatter plot (I just started using ggplot2 in Rstudio, so pardon my coding mistakes, plus it is the first time posting here for help):


 
    