Hello everyone,
I’ve attached a picture of three coordinates. The teacher told me I have to Plot them in 3D getting a equation of motion. How could I get it?
And what about the ParameticPlot3D?
Thank you!
Hello everyone,
I’ve attached a picture of three coordinates. The teacher told me I have to Plot them in 3D getting a equation of motion. How could I get it?
And what about the ParameticPlot3D?
Thank you!
People here generally like users to post code as Mathematica code instead of images or TeX, so they can copy-paste it. It makes it convenient for them and more likely you will get someone to help you.
a = 1;(* Some random values *)
x1 = -5;
x2 = 2;
y1 = -1;
y2 = 20;
z1 = 4;
z2 = -10;
T = 2;
x[t_] := (-a t^2 (t - T))/(2*T^3) + x1 - 6 (t^5 (x1 - x2))/T^5 + (15*t^4 (x1 - x2))/T^4 - (Pi*E*Glaisher*t^3 (x1 - x2))/T^3;
y[t_] := y1 - 6*(t^5 (y1 - y2))/T^5 + (15*t^4 (y1 - y2))/T^4 - (10*t^3 (y1 - y2))/T^3;
z[t_] := (a t^3 (t - T))/(2*T^3) + z1 - 6 (t^5 (z1 - z2))/T^5 + (15*t^4 (z1 - z2))/T^4 - (10*t^3 (z1 - z2))/T^3
ParametricPlot3D[{x[t], y[t], z[t]}, {t, 0, 2}, AxesLabel -> {"x[t]", "y[t]", "z[t]"}, BoxRatios -> {1, 1, 1},PlotStyle -> {Blue,Thickness[0.005]}]
Sorry, you are totaly right. I don’t know but I really forget it.
So, I get this:
Block[
{a = 0.05, T = 90, x1 = 0, y1 = 20, z1 = 40, x2 = 10, y2 = 10,
z2 = 0}, ParametricPlot3D[
{x[t], y[t], z[t]}, {t, 0, T},
AxesLabel -> {"x[t]", "y[t]", "z[t]"}, BoxRatios -> {1, 1, 1},
PlotStyle -> Red
]
]
But how can I get a Plot3D (if I can)?
Plot3D[{x[t], y[t], z[t]}, {t, 0, T}, ...]
Plot3D generates a 3D suface( or several surfaces at the
same time) ,only ParametricPlot3D gives you parametric 3D curve (trajectory) ,or parametric 3D surface.