R 在绘图的线条上添加数字

我正在做一个如下的情节：

plot(df$time,df$response,type='o',ylim=c(2.1,2.8),col='black',xlab='Time (h)',ylab='response(L)')
points(df$time,df$res,type='o',col='black')
points(df$time,df$res,type='o',col='black')

在这里，我使用type='o'表示线在每个时间点都有圆。但我想用数字代替圆圈。第一行是1，第二行是2，第三行是3。有没有办法实现这一点

您可以根据需要将pch设置为该数字或使用文本功能。你也可以看看