试图将某些点置于其他点之上

Question

我只是想突出显示某些数据点（图像中的红色数据点），而不是其他数据点，分别代表预期的上学年数和学习调整的上学年数。我要强调的数据点是针对撒哈拉以南非洲的美国主要出口市场——有 5 个。我需要这些点出现在其他点之上，因为它们是我要强调的与世界其他地区和其他 SSA 国家。我已经尝试对数据进行子集化，并使用额外的 geom_point 代码将这 5 个点分层。

如果有人可以帮助我，我将不胜感激。Learning-adjusted vs. expected (ROW vs SSA)

LAYvsEY<-ggplot(HC,aes(expected,learning,label=HC$`Country Name`))+
  geom_point(aes(fill=Comparison),pch=21,size=10)+
  labs(x="Expected Years of School",y="Learning-Adjusted Years of School")+
  ggtitle("Learning-adjusted Education vs. Expected Years of Schooling",subtitle="Sub-Saharan Africa vs. ROW")+
  stat_smooth(method="gam",se=TRUE,color="navy",show.legend=FALSE)+geom_text(check_overlap=TRUE,family="serif")+theme_stata(base_size=12,base_family="serif")+
  guides(color=guide_legend(override.aes=list(size=7)))+scale_y_continuous(breaks=c(2,4,6,8,10,12))+
  theme(legend.title=element_blank(),legend.position=c(0.12,0.88),
        legend.background=element_rect(colour=NA,fill=NA),
        panel.border=element_rect(color="black",fill="NA"),
        plot.subtitle=element_text(face="italic"))+
  scale_fill_manual(values=c("#A6CEE3","#B2DF8A","indianred"),breaks=c("Rest of World","Sub-Saharan Africa","Primary SSA Export Market"))

Answer 1

有几个选项可以帮助你，在这个答案中解释 - controlling order of points in ggplot2 in R?

您可以尝试根据其他答案创建另一个geom_point，或者事先安排数据框以将您要突出显示的值放在最后。

顺便说一句，如果您提供一个最小的可重现示例，然后其他人可以协助编写可以工作的代码 (How to make a great R reproducible example)，可能会更容易提供帮助。尝试调整代码以使其在没有原始数据的情况下工作可能有点困难。

根据您的评论，这里有一个示例，看看什么是有效的：更改原始数据中项目的顺序适用于这个小示例。

library(dplyr)
library(ggplot2)

# Carb values of 1 behind others
ggplot(mtcars, aes(mpg, wt, colour = as.character(carb))) +
  geom_point(size = 20)

# Arrange so that 1 is last
mtcars2 <- mtcars %>% arrange(desc(carb))

# Now value of 1 is on top of others
ggplot(mtcars2, aes(mpg, wt, colour = as.character(carb))) +
  geom_point(size = 20)

如果您想在代码中尝试，可以尝试更改 ggplot 调用中数据的顺序。

# Potential change for your code
LAYvsEY<-ggplot(HC %>% arrange(desc(Comparison)), aes(expected,learning,label=HC$`Country Name`))