更改数据重叠因子的显示顺序

Question

我有一个有重叠点的图并希望更改哪个组位于最前面。

请检查此示例，我设法根据图例中的颜色和顺序颠倒a和b，使用rev()但“b”仍位于“a”之上。任何解决方案

在此先感谢

D.

library(ggplot2) 

mytable <- data.frame(x = rep(1:10, 2), 
      y = c(1:10, (1.1:10.1)), 
      var = factor(c(rep("a",10), rep("b",10))) 
     ) 

ggplot(mytable) + 
    geom_point(aes(x=x,y=y, colour = var), cex=2) 

mytable$var_rev <- with(mytable, factor(var, levels=rev(levels(var)))) 

ggplot(mytable) + 
    geom_point(aes(x=x,y=y, colour = var_rev), cex=2) 

Answer 1

试试这个：

library(tidyverse) 
mytable %>% 
    arrange(desc(var)) %>% 
    ggplot() + 
    geom_point(aes(x=x,y=y, colour = var), cex=2) 

刚：

ggplot(mytable) + 
    geom_point(aes(x=x,y=y, colour = var), cex=2) 

的点以相同的顺序绘制为在所述数据帧