Hello,

I'm currently working on a project where I need to create a 3D graph with close to 5500 data points. For smaller datasets, I have been able to create the graphs using the with (plots): pointplot3d command. An example of syntax used: 

with (plots): pointplot3d({[23.8, 2399, 24.2],[23.6, 3030, 24.0],[23.6, 3876, 24.2]},axes=normal,symbol=box);

However, when I try to use the same method to graph the larger data set, the program freezes ...

Hello,

I would like to create a model of a sinngle pendulum with Maple 13

I began but I cannot manage to animate it

Here is what i have already written:

pendulum:=proc(l,initialAngle,initialSpeed)

local eq,sol,angledata,x,y,plotseq

eq:=diff(θ(t),t,t) + 9.81/l sin(θ(t)) = 0;

sol:=dsolve({eq,θ(0)=initialAngle,D(θ)(0)=initialSpeed},θ(t),numeric);

I am trying to get the equation of a line. I have a buch of points and need the equation of a line going through those points. I am making computer program that can finde the y value of any point on the line with the equation I'm trying to get and an X value.

So, I have some points,..

I can get the graph,..but not the equation for that graph...

Is this posable,...?? I can't seem to find out how...

Thank you!

(I put in the points Im using just as are ference)

ifplease how can i factorise in powers of (x-x_n), the expression  y(t):=(1/3h²)[(-x+x_n+h)(-x+x_n+3h)]y_n+(1/3h²)[(-x_n+x)(-x+x_n+4h)]y_n+1 -(1/3h)[(-x_n+x)(-x+x_n+3h)]_fn+2?

i was trying to familiarize with maple 13 but encountered this. pls how may i go out from here?

> with(Student[NumericalAnalysis]);
> DE1 := d*y(t)/dt = y(t)-t^2+1;
                           d y(t)           2   
        ...

I need to differentiate a postion vector with respect to time and extract the theta dots in the following http://img543.imageshack.us/img543/3079/positionvector.jpg

Many Thanks

How I can, with the help of maple, perform the following demonstration using rsolve?

From Equation : Y(t)=1 +A t + B t² + D t³

recursively determine t, by equation:

How can I plot this piecewise function:

for j from n-1 by -1 to 0 do

... does some processing that's not really relevant to the question:

s[j] := evalf(a[j]+b[j]*(t-x[j])+c[j]*(t-x[j])^2+d[j]*(t-x[j])^3)

end do;

S := t-> piecewise(

x[0] <= t and t <= x[1], s[0],

x[1] <= t and t <= x[2], s[1],

x[2] <= t and t <= x[3], s[2]);

My friends all...

I Have a proc that creates some very long lists.
I would like to be able to store each of these lists with the same name in different indexed files.

What I would like to do looks something like...

fd:=["file1.m", "file2.m", ..., "filen.m"]

for i from 1 to n
do
proc(user defined variables)
save variable1,vaiable2, ...,variablem, fd[i]
end do:

This however doesn't work.

I would then like to be able then to run proceedures on these variables from each file.

hi everybody!

I have a question. Why my first loop works but the second one doesn't work?

first:

for m from 1 by 1 to 4 do

alpha := m+n:

od;

second:

for m from 1 by 1 to 4 do

for n from 1 by 1 to 4 do

alpha := m+n

od;

od;

what is my mistake?

Hello!

I'm writting a simple program to obtain chi-squared for my model. I've written it for a costant value of "n" and it correctly works and results chi-squared, but when I want to write a loop for "n" then the program doesn't work at all.

I don't recieve any error message. can you help me?

I am trying to solve the the differential equation. for this I have written the following program. But it is showing the error.

restart

with(plots)

eq := diff(x(t), `$`(t, 2))+326.1*(diff(x(t), `$`(t, 1)))+3190*(diff(x(t), `$`(t, 1)))^2-37500*sqrt(x(t)*(0.165e-2-x(t)))+2.825

BCs := [x(0), x(0.2e-1)-0.15e-2]

sol := dsolve({BCs, eq}, {x(t)}, type = numeric)

Maple is saying:

Error, (in dsolve/numeric/process_input) system...

Hi!

I'm sure there is a simple solution to my problem, but because I'm fairly new to using Maple, I can't figure out why my graph won't work. All I'm trying to do is graph a function along with its first and second derivatives within the same graph. The original function is f(x)= (2+sinx)^x²/(x²+1).

I defined the function as f and then found the first derivative by using df:=D(f...

EulerSystem:=proc(f,g,n,h,tinit,xinit,yinit,t,s,y);
local i;
t[0]:=tinit;x[0]:=xinit; y[0]:=yinit; 
for i from 1 to n do 
t[i]:= evalf(tinit+h);
x[i]:= evalf(xinit+h*f(tinit,xinit,yinit));
y[i]:=evalf(yinit+h*g(tinit,xinit,yinit));  od;  end;

When i tried to execute maple dispayed "unable to parse" but i can't find out where the syntax error is.  "local" was the word with the red dotted line box around...

I am attempting to define the rotation angle of an ellipse about the cartesian coord frame @ (0,0).  I am pretty sure the slope of the tangency vector @ both the major & semi-major axis is orthogonal to the vector originating from the origin from (0,0) with a length of a or b depending on which axis I am using.

My thought was in the case of the major axis that x = a*cos(theta) & the slope of the vector emanating from the origin is tan(theta).  So if I set dy/dx = -1/tan...