Skip to main content
2 events
when toggle format what by license comment
Dec 10, 2015 at 14:19 comment added ex-kiwi I think the init. should be Initialization :> (r = {{a, b}}). Also you could extend this to full persistence by: Manipulate[(AppendTo[r, {a, b}]; Plot[Evaluate@Table[Sin[r[[i]].{x, 1}] , {i, Length[r]}], {x, -2 Pi, 2 Pi}, PlotLabel -> Length@r, PlotStyle -> Evaluate[ Table[Lighter[Blue, (Length[r] - j)/Length[r]], {j, Length[r]} ]]]), {a, -5, 5}, {b, 0, \[Pi]}, TrackedSymbols :> {a, b}, Initialization :> (r = {{a, b}};)]
Dec 9, 2015 at 20:26 history answered Dr. belisarius CC BY-SA 3.0