Animate[Plot[{Sin[xCos[a]]}, {x, -2.5Pi, 2.5Pi},
PlotRange → {{-2.5Pi, 2.5*Pi}, {-2, 2}}, Axes → {False},
AspectRatio → Automatic,
PlotStyle → {Directive[Thickness[.03], Black]}], {a, -Pi, 0},
RefreshRate → 60, AnimationDirection → ForwardBackward,
DefaultDuration → 4]
So I’ve got this. What I really, really want to do but cannot figure out for the life of me is to export this animation as a .avi file with the following specifications:
- Just export the plot itself (not the moving bar for “a” or the either of the boxes around the plot
- Export with a minimum height of 1920 pixels
- Export with a minimum width of whatever corresponds to the height with the same aspect ratio
- Export is 4 seconds long, from a=-Pi to a=0
- Export is 60fps
- Export has an alpha channel so that the white background is transparent and only the black animated plot shows up.
I know that this is a tall order. I’ve looked at countless tutorials and I’m completely lost. I’m on Mathematica 10.3. If somebody could just please give me one template example that meets these specifications for this specific animation (shown above) that I could use for all my other endeavors, I would be forever indebted.