Question

I am adding a point to a ggplot, how can I make the x and y coordinates as variables? I tried this code, but it does not work

func <- function(data){

  meanx <- mean(data[,1])
  meany <- mean(data[,2])

  p <- ggplot(data, aes(x = data[,1], y = data[,2]))
  p + 
  geom_point(size = 5, shape = 19, color = "#00FF00",
         aes(x = meanx, y = meany))

}

func(iris)

I have the following error:

Error in eval(expr, envir, enclos) : object 'meanx' not found

Can anyone help me please?

Answer 1

One solution would be to replace

geom_point(size = 5, shape = 19, color = "#00FF00", aes(x = meanx, y = meany)) 

with

annotate("point",size = 5, shape = 19, color = "#00FF00", x = meanx, y = meany)