小编Jon*_*nas的帖子

有没有办法从操作包中的滑块控件中提取当前值？例如:

library(manipulate)

xx <- seq(-pi, pi, pi/20)

manipulate(
  plot(xx, sin(par.a*xx)),
  par.a = slider(-3, 3, step=0.01, initial = 1))

在玩滑块之后,我希望获得par.a进一步计算的价值,而不必每次都看一下控件并手工编写.