ggplot中stat_function的ggvis等價物是什麼？

Question

我正在尋找繪製使用ggvis的函數 - 有沒有類似於ggplot2中的stat_function的東西？

例如：

ggplot(data.frame(x=c(0,1)), aes(x=x)) + 
    stat_function(fun=dbeta, args=list(shape1=2, shape2=10)) 

Answer 1

我還沒有找到一個等效ggvis版本的ggplot2::stat_function()。但是，我已使用以下解決方法，使用ggvis::add_data()和ggvis::layer_paths()。

例如：下面將添加一個拋物線到ggivs散點圖：

mtcars %>% 
    ggvis() %>% 
    layer_points(x = ~ wt, y = ~ mpg) %>% 
    add_data(data = data.frame(x = mtcars$wt, 
          y = 49.931 - 13.380 * mtcars$wt + 1.171 * mtcars$wt^2)[order(mtcars$wt), ]) %>% 
    layer_paths(x = ~ x, y = ~ y, stroke := "red")