R 在plot（）中标记异常值

我想绘制有1个异常值的数据。我想要这样一个图，在图中标出异常值的观测值。为此，我有以下数据：

res
           x            x            x            x            x 
 -0.39123009  -0.02907481   0.01003539   0.65495527 -93.81415653

我正在努力：

plot(res, type = "o")
cv <- -50
abline(h = -50, lty = 2)

text(res, labels = ifelse(res > cv, names(res), ""), cex = 1, col = 4)  # add labels

绘图（res，type=“o”）
cv、名称（res）、cex=1、col=4）#添加标签

出现散点图，但没有异常值标记。如何根据观察编号添加标签

---

这是因为重复了“x”？

这看起来是由于数据结构造成的问题。我将您的数据转换为多行，而不是一行。这里是数据转换和绘图代码：

#Data
df <- structure(list(V1 = c(-0.39123009, -0.02907481, 0.01003539, 0.65495527, 
-93.81415653)), class = "data.frame", row.names = c("x", "x.1", 
"x.2", "x.3", "x.4"))

#数据
df
#Plot
plot(df$V1,type="o")
cv <- -50
abline(h = -50, lty = 2)
text(df$V1,labels=ifelse(df$V1>cv,rownames(df),""),cex=1,col=4)