我有下面的Alluvial情節
library(ggplot2)
library(ggalluvial)
data = structure(list(val = c(10, 30, 15, 30, 40, 12, 10, 30, 15), name = c("A",
"B", "C", "A", "B", "C", "A", "B", "C"), group = c("gr1", "gr1",
"gr1", "gr2", "gr2", "gr2", "gr3", "gr3", "gr3")), row.names = c(NA,
-9L), class = "data.frame")
data['val1'] = c('45', '23', '44', '55', '34', '55', '12', '34', '89')
ggplot(data,
aes(x = group, stratum = name, alluvium = name,
y = val,
fill = name, label = val))
scale_x_discrete(expand = c(.1, .1))
geom_flow(aes(fill = name), alpha = .3, width = 1/9)
geom_stratum(aes(color = name), alpha = .9, width = 1/9)
geom_text(position = "stack", aes(x = group, y = val, label = val1))
如您所見,標簽在每個塊的中心沒有垂直對齊。有什么辦法可以做到這一點?
謝謝你的指點
uj5u.com熱心網友回復:
當您position = "stack"在geom_text()通話中設定時,這是設定的語法糖position = position_stack(vjust = 1, reverse = FALSE)。
由于您希望文本垂直居中,您可以顯式呼叫該
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/523481.html
標籤:rggplot2冲积层
上一篇:轉換ggplot軸刻度標簽
