我想“合并”这两个华夫图:
waffle(pct, rows = 5, use_glyph = "angle-left", glyph_size = 9,
colors = c("grey", adjustcolor("green", alpha.f = 0.0)),
title = "Motoraccidents in bends",
xlab = "1 bike = 1% of all motorcycle accidents",
legend_pos = "bottom")
waffle(pct, rows = 5, use_glyph = "angle-right", glyph_size = 9,
#colors = c("White", "darkred"),
colors = c(adjustcolor("green", alpha.f = 0.0), "darkred"),
title = "Motoraccidents in bends",
xlab = "1 bike = 1% of all motorcycle accidents",
legend_pos = "bottom") 有什么想法吗?
发布于 2020-05-27 18:57:33
由于我在文档和互联网上都找不到任何东西,我尝试了一下,找到了答案:只需为use-glyph函数创建一个向量。
waffle(pct, rows = 5, use_glyph = c("arrow-left", "arrow-right"), glyph_size = 9,
colors = c("red", "darkred"),
title = "Motoraccidents in bends",
xlab = "1 glyph = 1% of motorcycle accidents in bends",
legend_pos = "bottom") https://stackoverflow.com/questions/62040752
复制相似问题