R 在ggplot中的聚集条之间添加空格？

我有以下R代码来绘制每月并排两个值（d1和d2）的计数。在使用ddply进行总结之前，我对不同日期的单独“帖子”进行了统计

我真的希望/需要在每个月的成对条和每个月的标签之间添加一个空格，以便更清晰地阅读。有人能建议我该怎么做吗

m_scores = ddply(data_NKsam2,.(zdate),summarise, d1 = sum(d1) , d2 = sum(d2))

require(tidyr)

df <- gather(m_scores, event, total, d1:d2)

plot <- ggplot(df, aes(zdate, total, fill=event))
plot <- plot + geom_bar(stat = "identity", position = 'dodge')

---

您可以包含一些（虚拟）数据，我们可以使用您的绘图代码来测试周围的事物吗？最好使用与df相同的结构（相同的列名和向量类型）。这是您想要的吗？谢谢@O.A这看起来非常有用…另外，感谢您的回复@teunbrand我明天将复制数据…链接的答案没有真正起作用，也没有起作用-因为两者都返回了“position_dodge需要不重叠的x间隔”。我添加了一些虚拟数据，您是否有可能帮助我找到解决方案。谢谢

  zdate  d1   d2
11 Nov 2014 263  318
12 Dec 2014 430  662
13 Jan 2015 507  326
14 Feb 2015 326  279
15 Mar 2015 281  345
16 Apr 2015 352  260
17 May 2015 280  315
18 Jun 2015 243  238
19 Jul 2015 313  251
20 Aug 2015 446  439
21 Sep 2015 416  404
22 Oct 2015 616  423
23 Nov 2015 269  242
24 Dec 2015 781  527
25 Jan 2016 865  861
26 Feb 2016 997 2139
27 Mar 2016 920 1421
28 Apr 2016 376  498
29 May 2016 434  309
30 Jun 2016 271  284