I'm just trying to highlight certain data points (the red ones in the image) over others for expected years of school vs learning-adjusted years of school. The data points I'm trying to highlight are for primary US export markets in sub-Saharan Africa--there are 5. I need these points to appear over the others since they are the main points I'm trying to emphasize in relation to the rest of world and other SSA countries. I've tried subsetting the data, as well as layering those 5 points over the rest with an additional geom_point code.
If someone could help with this I would really appreciate it.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"))