R：向瀑布图添加值

Question

我在 R 中使用waterfall package 来准备瀑布图，并喜欢将值添加到图表中。

示例代码（取自http://lamages.blogspot.de/2012/05/waterfall-charts-in-style-of-economist.html）：

library(latticeExtra)
library(waterfall)
data(rasiel) # Example data of the waterfall package
rasiel
#    label          value   subtotal
# 1  Net Sales       150    EBIT
# 2  Expenses       -170    EBIT 
# 3  Interest         18    Net Income
# 4  Gains            10    Net Income
# 5  Taxes            -2    Net Income

asTheEconomist(
               waterfallchart(value~label, data=rasiel,
                              groups=subtotal, main="P&L")
               )

此图中的结果：

我正在寻找正确的代码来得到这样的东西：

Answer 1

waterfallchart 只是使用具有特定设置的 lattice 包来创建这种类型的图。因此，所有修改绘图的格函数都将在瀑布图中工作。

您必须像这样设置面板的文本参数：

asTheEconomist(
  waterfallchart(value~label, data=rasiel,
                      groups=subtotal, main="P&L",
                 panel=function(x, y, ...) {
                   panel.waterfallchart(x, y, ...);
                   ltext(x=seq(1,7,1),y=c(75,75,10,1,20,15,14),
                         labels=c("+150","-170","-20","+10","+18","-2","+6"),
                         srt=90,font=2,cex=1.5)
                 }
       )
)

Answer 2

简短的回答是否定的，这是不可能的。当我为瀑布图和瀑布图编写代码时，我明确地尝试分别模仿条形图和条形图的行为。当时，这是几年前的事，双方都没有选择支持这一点，我认为这没有改变。

我认为通过在 ggplot2 中重新实现瀑布图会取得更大的进展，它应该使这个和其他情节调整相对容易。