是否有人知道如何在 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()
)
我希望能够轻松地循环“平滑水平”。
答案 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)
)