尝试使用ggplot删除x轴下方的轴答案

【问题标题】：Trying to remove an axis below x-axis using ggplot尝试使用ggplot删除x轴下方的轴
【发布时间】：2018-12-10 03:08:03
【问题描述】：

我是ggplot 的新手，正在尝试使用它绘制两条线。但是我的 x 轴看起来很奇怪，现在我想删除它。这是我的代码。

ggplot(BJ11, aes(Date, mean,group=1)) +
  geom_line(aes(color = "stateair daily values")) + 
  geom_line(data = bjvalue2,
            aes(color = "CNEMC values"))

这是我的数据：

> head(BJ11)  
       Date   min    max      mean  
1 2015-01-01   6    154  54.58333  
2 2015-01-02  12    157  63.54167  
3 2015-01-03 147    322 209.25000  
4 2015-01-04 106    360 201.16667  
5 2015-01-05   9    186  90.87500  
6 2015-01-06  10    121  43.16667


> head(bjvalue2)  
        Date     mean  
1 2015-01-01   43  
2 2015-01-02   52  
3 2015-01-03  150  
4 2015-01-04  176  
5 2015-01-05      92  
6 2015-01-06   40

我应该怎么做才能同时删除“日期”上方的粗黑轴和 x 轴？

【问题讨论】：

将以下内容添加到您的绘图中 theme(axis.title.x=element_blank(), axis.text.x=element_blank(), axis.ticks.x=element_blank(), axis.line.x = element_blank())
我明白了！谢谢！
如果解决了问题，应该作为答案@NColl，以便将来更容易看到

标签： r ggplot2

【解决方案1】：

ggplot(BJ11, aes(Date, mean, group=1))+
  geom_line(aes(color = "stateair daily values"))+ 
  geom_line(data = bjvalue2, aes(color = "CNEMC values"))+
  theme(axis.title.x = element_blank(), 
      axis.text.x = element_blank(), 
      axis.ticks.x = element_blank(), 
      axis.line.x = element_blank())

【讨论】：

【解决方案2】：

另一种选择是修复 x 轴而不是移除它。我知道这不是您的问题，但是 ggplot 在处理日期轴方面非常出色，所以我想知道您是否将日期作为字符？如果你有然后例如。可以使用带有 ymd() 的 library(lubridate)。

我猜你的 group=1 可以省略为简单起见。

另外，在你的最后一行中，我个人更喜欢在 aes 内定义 x 和 y 轴，以确保 R 以你想要的方式处理数据。

【讨论】：