如何在ggplot geom_smooth()上使用manipulate()

时间:2013-04-09 15:13:41

标签: r ggplot2

是否有人知道如何在 ggplot 上使用操作(),以便轻松选择平滑(跨度)级别?我没有成功尝试以下内容:

# fake data
    xvals <- 1:10
    yvals <- xvals^2*exp(rnorm(2,5,0.6))
    data <- data.frame(xvals,yvals)

# plot with manipulate
    manipulate(
    ggplot(data,aes(xvals,yvals)) +
      geom_smooth(span=slider(0.5,5)) +
      geom_point()
    )

我希望能够轻松地循环“平滑水平”。

1 个答案:

答案 0 :(得分:4)

更改了您的数据以获得更多数据点。

xvals <- 1:100
yvals <- rnorm(100)
data <- data.frame(xvals,yvals)

您必须在span=中为geom_smooth()使用的值指定名称(例如span.val),然后在span.val=slider(0.1,1)函数之外定义ggplot() - 在此示例中作为manipulate()的第二个参数。

library(manipulate)
library(ggplot2)
manipulate({
  #define plotting function 
  ggplot(data,aes(xvals,yvals)) +
    geom_smooth(method="loess",span=span.val) +
    geom_point()},
  #define variable that will be changed in plot
    span.val=slider(0.1,1)
)