## Not run:
# twiddle(print(x))
# twiddle(print(x), eval = FALSE)
# twiddle(print(a && !b), a = toggle(), b = toggle())
# twiddle(curve(sin(a * x) + cos(b * x), type = "l", col = "darkblue"),
# a = knob(c(0, 0.1), 0.001),
# b = knob(c(0, 0.2), 0.001),
# auto = FALSE)
# twiddle(plot(rnorm(100), type=t), t=combo("p", "l", "b"))
# ## End(Not run)
Run the code above in your browser using DataLab