Rstudio使用ggplot2系统，双数列条形图操作

以下是使用ggplot2绘制双数列条形图的操作步骤：

1. 准备数据：假设我们有以下数据集，其中x列为分组变量，y1列和y2列分别为两个数列。

library(tidyverse)

data <- tibble(x = c("A", "B", "C", "D"),
               y1 = c(10, 20, 30, 40),
               y2 = c(20, 30, 40, 50))

2. 使用ggplot2绘制条形图：使用`geom_bar()`函数绘制条形图。为了绘制双数列条形图，我们需要将y1列和y2列分别绘制成两个图层，然后使用`position_dodge()`函数将它们分开。同时，我们可以使用`scale_fill_manual()`函数设置颜色。

ggplot(data, aes(x = x)) +
  geom_bar(aes(y = y1, fill = "y1"), stat = "identity", position = position_dodge()) +
  geom_bar(aes(y = y2, fill = "y2"), stat = "identity", position = position_dodge()) +
  scale_fill_manual(values = c("y1" = "red", "y2" = "blue"))

3. 结果：运行以上代码，我们可以得到如下双数列条形图。