- 已编辑
第二个双柱的图,position = 'dodge'
要求数据是长表的格式,两个geom_bar加上dodge并不能使柱子错开,具体可以参考下position_dodge的帮助文档
试了下,不用dodge,用just
和width
参数控制也可以
ggplot(data = diamonds.new2, aes(x = cut)) +
geom_bar(aes(y = y1), fill = 'red', just = -0.1, width = 0.3, stat = 'identity') +
geom_bar(aes(y = y2 * coeff), fill = 'green', just = 1.1, width = 0.3, stat = 'identity') +
scale_y_continuous(name = "主Y轴", sec.axis = sec_axis( ~ . / coeff, name = "次Y轴"))