在 ggplot 内移动时图例消失

Question

我正在制作一个图，显示随着时间的推移几种动物的家庭范围大小。 图例自动填充到图的右侧，我可以使用+ theme(legend.position= "position")成功地将它移动到图的上方、下方或左侧，但是当我尝试将图例移动到使用+ theme(legend.position= c(1, 250))的情节消失了。

我的数据由列“id”（字符向量）、“wtd_area”（数字）和“study_year”（数字）组成。

data %>%
ggplot(aes(x= study_year, y= wtd_area, color= id, shape= id)) + 
  theme_js() + 
  geom_point(size= 3) + geom_line(aes(group=id), size= 1) + 
  ylim(0,160) + scale_color_manual(values= palette) + 
  labs(x= NULL, y= NULL, color= "Animal ID", shape= "Animal ID") +
  theme(legend.position= c(1,150))

我有：

1.) 确认自定义主题theme_js()不会通过切换到通用主题来干扰。

2.) 分别为geom_point()和geom_line() ) 添加了aes(color= id, shape= id)和aes(color= id) 。

3.) 将show.legend= TRUE添加到geom_point()和geom_line() 。

4.) 在scale_color_manual()中添加了aesthetics= "color" 。

palette是包含颜色十六进制代码的字符向量。

Answer 1

该位置应在 0 到 1 的范围内，而不是对应于您的轴。 x,y 为 0,0（左下）到 1,1（右上）。 在这里，我以ToothGrowth样本数据为例。

ToothGrowth$dose <- as.factor(ToothGrowth$dose)

library(ggplot2)

ggplot(ToothGrowth, aes(x=dose, y=len, fill=dose)) + 
  geom_boxplot() +
  theme(legend.position = c(0.8, 0.2))