可以按如下方式使用文本（）：

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)

如果您不需要所有的点，只需将其中一些点发送到text（）。

我不喜欢t -> (a(t),b(t))表达式......没关系，我发现您希望显示值而不是绘制字符。

# I'll steal shamelessly Greg's code
plot(x, y, pch = "")
# then do the text() part...

但是，我建议使用ggplot2执行此操作：

ggplot(mtcars, aes(mpg, hp)) + geom_text(aes(label = rownames(mtcars)))

不幸的是，我不能帮助你更多，除非你拿出一些虚拟数据集。

关于你问题的后半部分，
“我有一个二维参数函数t -〉（a（t），B（t）），我画出点（a（t），b（t）），我想打印出对应于每个点的t值。”
以下示例显示如何使用一对参数化函数来定义点的位置以及函数的自变量：

t <- seq(0,1.75,by=0.25)*pi
plot(cos(t),sin(t))
text(cos(t),sin(t),labels=round(t,2), ## location and text
     pos = 1,offset=0.4) ## text is placed below the specified locations