I have some code that's designed to evaluate a function that has two input variables, plot and animate said function in a specific order, and finally export the result. While I can get the function working fine within the notebook, I can't figure out how to properly export the code.
Subscript[x, 0] = 0
ϕ[x_,t_,c_]=(c/2)*(Sech[0.5*Sqrt[c]*(x-Subscript[x, 0]-c*t)]^2)
Animatation1 =
Manipulate[Plot[ϕ[x, t, c], {x, 0, 20}, PlotRange -> {0, 3}], {t, 0, 4}, {c, 0, 5}]
Export["Soliton1B.swf", Animatation1]
I evaluated my code, basically in the order shown there, and then used the plus symbol on the manipulate animation to add in bookmarks so that it'll animate in the right order. However, when I go to export the animation, it completely ignores the bookmarks and adjusts only one slider at a time. I've tried with a variety of different output formats with no luck.
Alternatively, is there a way to export a stand-alone manipulable object from this module?
*Note: I am aware that I misspelled "Animatation", it's a long night.
AutoRun
code. See reference.wolfram.com/language/ref/AutorunSequencing.html (if you've posted code instead of images, would be easier to show you). $\endgroup$