我有一个用ggplot生成的分层图表:
this one http://www.charttypes.com/charts/area-chart/images/stacked-area-chart.png
我想在图表的右边缘添加标签,在每个图层的中间显示每个数据系列的最后一个值。
因此,对于链接图表,我想在美国的栗色层的最右边显示“10K”的标签,在俄罗斯的石灰绿层的最右边显示“20K”, “40K”位于中国的边缘。
我尝试使用geom_label()
,但是当将每个系列的最新值传递到其data
属性时,这些值会在y的比例下显示在它们的相应位置,而不是与({图表)他们应该标记图层。
p <- ggplot(pData, aes(x, y, label = z)) +
geom_area(aes(y = y, fill = a, group = a), position = 'stack') +
geom_label(data = lData)
有什么建议吗?