是否有一个ggplot2扩展程序包,可以生成类似于第五十八个表格/水平条形图的表格/水平条形图。理想情况下,我希望能够添加第二个甚至第三个条形图和其他文本列。
我一直在Googlging并查看ggplot图表画廊,但还没有发现任何东西。
一种解决方法是使用DT
包。这将呈现一个 HTML 表,但是根据您的需要,您可以使用此表。在RStudio
中,您还可以轻松地将表格导出为任何图片格式:
library(DT)
dat <- data.frame(CANDIDATE = c("Biden","Sanders","Gabbard","O'Rourke","Warren","Yang","Buttigieg","Castro","Harris","Klobuchar","Booker","Steyer"),EXCLUSIVE = c(218,100,11,29,107,14,27,6,23,8,4,1),TOTAL = c(996,683,83,245,917,187,437,105,433,180,201,84),SHARE = c(21.9,14.6,13.1,11.7,11.6,7.4,6.2,5.7,5.2,4.2,2.2,1.4) / 100)
datatable(dat,options = list(
columnDefs = list(list(className = "dt-left",targets = 4)))) %>%
formatPercentage("SHARE",1) %>%
formatStyle("SHARE",background = styleColorBar(dat$SHARE,"steelblue",-90),backgroundPosition = "left")