<- function(x1, x2, binwidth = 0.1, xlim = c(-3, 3)) {
df <- data.frame(
x = c(x1, x2),
g...= c(rep("x1", length(x1)), rep("x2", length(x2)))
)
ggplot(df, aes(x, fill = g)) +
geom_histogram...**当然输入发生改变时,Shiny 可以非常聪明地自动更新结果;但 Shiny 无法聪明到选择性运行更新输出的代码。**换句话说,输出是原子类型的,它们整体要么执行要么不执行。...后面我们像使用函数一样调用这个变量。...模块化的响应图
为什么我们需要响应表达式
因为通过创建变量和函数的方式减少重复在 Shiny 中是不工作的。