r语言labelxnpc 修改位置例子

假设我们有以下数据：

df <- data.frame(x = 1:5, y = 1:5, label = c("A", "B", "C", "D", "E"))

我们想要将每个点的标签垂直偏移一些，可以使用 label.x.npc 参数来进行修改。例如，将所有标签向上偏移 0.05：

library(ggplot2)

ggplot(df, aes(x, y)) +
  geom_point() +
  geom_text(aes(label = label),
            vjust = 0,
            label.x.npc = 0.5,
            label.y.npc = 0.5,
            check_overlap = TRUE,
            nudge_y = 0.05)

这里的 label.x.npc 设置为 0.5，表示标签的水平位置与数据点相同；label.y.npc 设置为 0.5，表示标签的垂直位置与数据点相同。nudge_y 参数用于控制偏移量，这里设置为 0.05。

如果要对不同的标签做不同的修改，可以根据需要在 geom_text() 函数中添加条件语句。例如，只将 "B" 标签向上偏移：

ggplot(df, aes(x, y)) +
  geom_point() +
  geom_text(aes(label = label),
            vjust = 0,
            label.x.npc = 0.5,
            label.y.npc = 0.5,
            check_overlap = TRUE,
            nudge_y = ifelse(df$label == "B", 0.05, 0))