如何用ggplot在R中绘制多个条形图

Question

我无法绘制以下数据集

Holiday_sales1 <- read.csv(text="
Holidays,Date,Weekly_Sales
Super bowl,2010-02-12,48336678
Labor Day,2010-09-10,45634398
Thanksgiving,2010-11-26,65821003
Christmas,2010-12-31,40432519
Super Bowl,2011-02-11,47336193
Labor Day,2011-09-09,46763228
Thanksgiving,2011-11-25,66593605
Christmas,2011-12-30,46042461
Super Bowl,2012-02-10,50009408
Labor Day,2012-09-07,48330059
", header=T)
Holiday_sales1$Date <- as.Date(Holiday_sales1$Date)

我正在使用此代码

library(ggplot2)
ggplot(Holiday_sales1, aes(x =Date, y=Weekly_Sales)) + geom_col(aes(fill=Holidays))

但是条形图显示不正常。例如，即使数据集包含该年的4个数据点，2010也仅显示一个条形图。

将感谢您的反馈意见

Answer 1

数据显示正确。问题在于，由于2010年的最后2个事件是在该年末，所以显示的柱状图比2010年更接近2011年。

也许您可以从数据中提取年份并绘制图。

@StepScope
@Bean
public MyItemProcessor myItemProcessor(@Value("#{stepExecution.jobExecution}") JobExecution jobExecution) {
    return new MyItemProcessor(jobExecution);
}

@Bean
public Step myStep() {
    return stepBuilderFactory.get("myStep")
        ...
        .processor(myItemProcessor(null))
        ...
        .build()
}