You can use text () as shown below:
set.seed(10)
x = rnorm(10)
y = rnorm(10)
plot(y~x, pch = ".", cex = 2)
text(x, y,
label = paste("(", round(x, 1), ", ", round(y, 1), ")", sep = ""),
cex = 0.6)
If you do not need all the points, just send some of them to the text ().
source
share