Items tagged with animation animation Tagged Items Feed


Is it possible to create animation of convolution of two functions?

For example f(t)=u(t)-u(t-2) and g(t) = tu(t)-(t-4)u(t-4), where u(t) is a step function.

I would like to generate animation for this convolution.

Any help would be appreciated.



So this is my minimal working code. Everything works, but I cannot get the arrow size fixed you can see the animation propperly. Adding wid=1/2 gives an error message.

A heart shape in 3d:



The code of the animation:

A := plots[animate](plot3d, [[16*sin(t)^3*cos(s), 16*sin(t)^3*sin(s), 13*cos(t)-5*cos(2*t)-2*cos(3*t)-cos(4*t)], t = 0 .. u, s = 0 .. 2*Pi, color = red, style = surface, axes = none], u = 0 .. Pi, frames = 100):

B := plots[animate](plot3d, [[16*sin(t)^3*cos(s), 16*sin(t)^3*sin(s), 13*cos(t)-5*cos(2*t)-2*cos(3*t)-cos(4*t)], t = u .. Pi, s = 0 .. 2*Pi, color = "LightBlue", style = surface, axes = none], u = 0 .. Pi, frames = 100):

plots[display](A, B);


Edited. The direction of painting changed.


Hi everyone,


I am using the following code (by dr. Corless) to animate a Riemann surface:


B := 1.5;
u2 := r*cos(th); v2 := r*sin(th);
w1 := u1+I*v1; w2 := u2+I*v2;
z1 := evalc(w1^2); z2 := evalc(w2^2);
x1 := evalc(Re(z1)); x2 := evalc(Re(z2));
y1 := evalc(Im(z1)); y2 := evalc(Im(z2));
f1 := proc (theta) options operator, arrow; plot3d([-x1, -y1, v1], u1 = -6 .. 1, v1 = -B .. B, grid = [50, 50], orientation = [theta, 80], color = u1) end proc;
f2 := proc (theta) options operator, arrow; plot3d([-x2, -y2, v2], r = 1 .. 1, th = -Pi .. Pi, grid = [50, 50], orientation = [theta, 80], color = black) end proc;
display(seq([f1(10*k), f2(10*k)], k = -17 .. 18), insequence = true, axes = box, view = [-1 .. 1, -1 .. 1, -B .. B]);

f1 is the Riemann surface and f2 is the winding curve.

The animation works fine on the individual plots, i.e. when I do:

display(seq(f1(10*k), k = -17 .. 18), insequence = true, axes = box, view = [-1 .. 1, -1 .. 1, -B .. B]);


display(seq(f2(10*k), k = -17 .. 18), insequence = true, axes = box, view = [-1 .. 1, -1 .. 1, -B .. B]);

but with both f's (as in my modification)  the animation does not combine correctly the two plots and shows them separately. Is there any way I can combine the plots so that display produces a smooth animation with each rotated frame containing its winding curve?


Many thanks,


The classical Draghilev’s method.  Example of solving the system of two transcendental equations. For a single the initial approximation are searched 9 approximate solutions of the system.
x01 := -1.; x02 := 1.;

Equation: ((x1+.25)^2+(x2-.2)^2-1)^2+(x3-.1)^2-.999=0;

Cam mechanism animation.   Equation:  (xx2-1.24)^10+5*(xx1-.66)^10-9.=0


I need to add animations in a word(.pdf) docuement or a pwerpoint presentation. I Saved my image as .gif and inserted it in my doc but it is an image (no animation)





If I have a function such as fk := exp(-x^2)*sin(Pi*x)  and I want to:

Create an animation to illustrate the differences between line thicknesses and then after the thicknesses, illustrate line styles. I also need to add the line thickness and style as text to the animations.

How would I go about doing this?


I wanted to answer a question and show an animation contained in an animated gif file. The file is small gif file and is on my local drive on my PC.

I am not able to find a way to include it here as I can easily do on stackexchange so it plays on the screen when someone sees the post.

Does this forum support such a feature? I tried the image->include, and in the URL I typed  C:\foo.gif, but nothing showed up on the post. So it did not work that way.

1 2 3 4 5 Page 1 of 5