Labeling points on scatter plot

In the below example i show how to assign a label (in this case Casenr) to each data point on my scatter plot.


```
plot(BMI~Age, data=prevend.sample)
text(BMI~Age, labels=Casenr, data=prevend.sample)
```