ggplot2 绘图如何保留原始的数据顺序？（2022.11.13更新）

Griffy650

已于 2022-11-13 08:49:50 修改

阅读量8.2k

点赞数 8

分类专栏： ggplot2 文章标签： r语言开发语言

于 2022-04-30 21:17:51 首次发布

本文链接：https://blog.csdn.net/weixin_56198196/article/details/124518774

版权

ggplot2 专栏收录该内容

3 篇文章

订阅专栏

本文介绍如何在使用ggplot2绘制散点图时，解决因因子水平排序不正确导致的颜色错乱问题。通过查看因子水平并重新设定level，确保颜色按照预期分组。提供了一种新方法，通过直接赋值level来简化调整过程，提高了代码的效率。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

这里以散点图图为例

p <- ggplot(data,aes(x,y))+
  geom_point(aes(color=group),shape=19,size=3.5) #设置点的颜色，大小和形状

如果这里直接用aes(color=group)，那么这个group分的时候是根据你的data里面的是能够成为因子的数据进行分组的，而有时因子的水平的排列顺序并不是在表格中看到的顺序，例如

在表格中分组信息排序是S1,S2,...,S10,S11,S12

但实际因子水平是S1,S10,S11,S12,S2,....

可以采用以下代码查看分组信息的水平(level)

factor(data$group) #data为数据，group为数据的分组信息

之前想到的解决方法是下面这个，但是我自己也觉得这个方法麻烦，评论区uu也有这样的想法，这里更新一下，多一步代码的新的解决办法！！！！

（旧方法）解决方法：建一个factor(因子)，规定level(水平)，然后把这个factor作为颜色的映射

data$group <-factor(data$group,level=c("S1","S2","S3","S4","S5","S6","S7","S8","S9","S10","S11","S12"))
p <- ggplot(data,aes(x,y))+
  geom_point(aes(color=group),shape=19,size=3.5)

（New version!）思路一致，就是把数据中的横坐标赋值给level

这里显示的是data：

level <- data[,1]    #就多出这一步，不用手动打出来，直接赋值
data$x <- factor(data$x,level = level)
p <- ggplot(data,aes(x,y))+
     geom_point()