TYPESCRIPT

rstudio plots arrows(), text()

text(x=df$x[c(10, 20, 30)], y=df$y[c(10, 20, 30)], labels=c("Point 10", "Point 20", "Point 30"), pos=4, col="blue")

rstudio plots arrows(), text()

text(x=df$x[1:5], y=df$y[1:5], labels=rownames(df[1:5,]), pos=4, col="red")