当我使用ggplot2软件包绘制一条具有无穷大值的线时,即使我使用了一个很大的"nudge_y“参数,它的标签也不能完全显示出来。手动文本可以得到结果,但这不是我的答案。如何完整地展示它?
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))

发布于 2019-10-29 08:46:13
使用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)

希望这能有所帮助!
发布于 2019-10-28 11:46:29
可以添加+ coord_cartesian(clip = "off")以显示在打印区域之外剪裁的零件。

https://stackoverflow.com/questions/58585461
复制相似问题