我希望使用ggvis绘制一个函数 - 在ggplot2中有类似于stat_function的东西吗?
例如:
ggplot(data.frame(x=c(0,1)), aes(x=x)) +
stat_function(fun=dbeta, args=list(shape1=2, shape2=10))
答案 0 :(得分:0)
我还没有找到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")