R 如何使用ggplot2完整显示“Inf”标签

当我使用ggplot2软件包绘制具有无穷大值的直线时，即使我使用了一个大的微移参数，它的标签也无法完全显示。手动文本可以得到结果，但这不是我的答案。 如何完整地显示它

x=seq(1,3,1)
y=c(1/3,Inf,3/3)
dt=data.frame(x=x,y=y,z=round(y,2))
ggplot(dt)+geom_line(aes(x=x,y=y))+
     geom_text(aes(x=x,y=y,label=z))

可以添加+coord_cartesianclip=off以显示剪裁到绘图区域之外的零件

使用ggrepel包也可以实现您的目标

library(tidyverse)
library(ggrepel)

x = seq(1,3,1)
y = c(1/3,Inf,3/3)
dt = data.frame(x=x,y=y,z=round(y,2))

ggplot(dt, aes(x=x,y=y)) +
 geom_line()+
 geom_label_repel(aes(label=z), nudge_x = .05)

---

希望这有帮助

太好了！把你的问题按答案写出来。