Как построить 2 гистограмму на одном графике

Question

У меня есть датафрейм в этом формате. Я хочу построить гистограмму, перекрывающую друг друга для каждого дня.

day_of_week clicks impressions
        <int>  <int>       <int>
1           0  65181     3778745
2           1  54658     2912405
3           2  50020     3016874

Я использую этот код. Но это выдает мне ошибку:

ggplot(weekday_count, aes(x=day_of_week)) +                    # basic graphical object
  geom_bar(aes(y=clicks), colour="red") +  # first layer
  geom_bar(aes(y=impressions), colour="green")  # second layer

Ошибка: stat_count () нельзя использовать с эстетикой y.

Answer 1

учитывая ваш код, я думаю, что вы ищете это

dd = read.table(text = 'day_of_week clicks impressions

          0  65181     3778745
          1  54658     2912405
          2  50020     3016874', header = T)

dd = melt(dd, id.vars = 'day_of_week')

ggplot(data = dd, aes(x = day_of_week, y = value, fill = variable)) +
  geom_col(alpha = 0.5, position = 'identity')