ggplot: Der von geom_text ausgegebene Text ist nicht eindeutig

Question

Der mit geom_text gedruckte Text ist nicht sehr klar. Wie kann ich ihn deutlicher machen?

data = data.frame(rnorm(1000))
colnames(data) = "numOfX"
m <- ggplot(data, aes(x=numOfX))
m + geom_histogram(colour = "blue", fill = "white", binwidth = 0.5) +
  annotate("segment", x=10,xend=10,y=20,yend=0,arrow=arrow(), color="blue") +
  geom_text(aes(10, 30, label="Observed \n value"), color = "blue")