在ggvis中繪製堆積面積圖的正確方法是什麼？

Question

我正在嘗試使用新的ggvis包在堆積區域繪圖。

在ggplot，我已經成功地做到這一點是這樣的：

d<- data.frame( 
    time=as.numeric(rep(1:100, 100)), 
    class=as.factor(sample(7, 100000, replace=TRUE)) 
) 

t <- as.data.frame(table(d$time, d$class)) 

ggplot(t, aes(x=as.numeric(Var1), y=Freq, fill=Var2)) + 
    geom_area(stat="identity") 

隨着ggvis，我設法用條繪製在相同的佈局相同的數據：

ggvis(t, x=~as.numeric(Var1), y=~Freq, fill=~Var2) 
    %>% group_by(Var2) 
    %>% layer_bars() 

但我不知道如何告訴ggvis我想要區域，而不是酒吧。 layer_areas不存在，並且layer_paths和layer_ribbons都給了我錯誤的結果。

我玩過路徑和緞帶的道具，但我不知道如何告訴ggvis繪製堆疊在彼此頂部的區域。

使用ggvis繪製堆積區域圖的正確方法是什麼？

Answer 1

我認爲你需要指定y（色帶的下邊界）和y2（色帶的上邊界）才能工作。因此，嘗試像

library(dplyr) 
library(ggvis) 
t %>% 
    group_by(Var1) %>% 
    mutate(to = cumsum(Freq), from = c(0, to[-n()])) %>% 
    ggvis(x=~as.numeric(Var1), fill=~Var2) %>% 
    group_by(Var2) %>% 
    layer_ribbons(y = ~from, y2 = ~to)