Unanswered Questions

This page lists MaplePrimes questions that have not yet received an answer

Hi,
I'm trying to import matlab function from m-file.

File looks like this:

    function out = xxx(omega)
    out = heaviside(omega);

It's only heaviside function.

And now, when I'm using "FromMFile" command in Maple it doesn't recognize Heaviside function. It imports that function as "heaviside" - witch small first character (in Maple we needs big "H").

Any help? 

thx 

Hello, I'm creating a rolling thin disk (rolling without slip) in the MapleSim, the model like the picture below (Fig. 1).

 

       ...

I need to make one "DensityPlot-point" (similar Statistics [DensityPlot] or histogram in 
Matrixplot) of a set of points (x, y). 

The set of points (x, y) was generated by the procedure.

Is there a way to generate it?

Thank you.

Please help me plot the graphs of the following equations:-

eq1 := diff(E[X(t)], t) = lambda-delta*E[X(t)]-beta*E[X(t)*V(t)];
 eq2 := diff(E[Y(t)], t) = -delta*E[Y(t)]+beta*exp(-rho*tau)*E[X(t)*V(t)];

eq3 := diff(E[V(t)], t) = gamma+N*kappa*E[Y(t)]-mu*E[V(t)]-beta*E[X(t)*V(t)]
NB:- E[X(t)]= the expected value of variable X at time t. 
Please help me know how to input this...

Hello colleagues! :)

I have some problems after create two objects, with array row in object definition...

module Point() option object;     local base:=Array(0..2);     export ModuleApply::static := proc()   Object(Point, _passed );   end;

The result - two same object...

 

How can i solve for X(t) in the following equation

diff(mean(X(t)), t) = lambda-delta*mean(X(t))-beta*mean(X(t)*V(t))

and how can i plot X(t) against t.

I have a program in  matlab,

I want to change below code in maple,

 

 

henon_map = inline('[a-x.^2+b*y x]','a','b','x','y');

%a=input('a [0] = ');
b=input('b [0.4] = ');

%if(isempty(a))
% a=0
%end

if(isempty(b))
 b=0.4
end

Npts=200;
Ntrans=100;
Ntot=Ntrans+Npts;

% For the whole window:
fig1=1; fig2=2;xmin=-2;xmax=2; Nmin=1; Nmax=50;
amin = -0.09;
amax = 1.249;

Branched from huffman coding (excellent example).  The huffman tree was not encoded in the message. The tree was known from the original message but suppose we didn't have the original message.  We need the tree in the compressed message.

How do you include the huffman tree in the message?

Every time i open an already saved document and change it then try to save it it comes up with this error:cwmaple.exe has stopped working!!! Why does this happen??

 

 

Please Help

 

Thanks,

Hello all

I have a set of differential equations and its numerical solution, for two functions. Here's the worksheet (just a part of it, I don't need the rest)

##########################################

eq1 := diff(W(r), r) = -(1-beta*(W(r)-W0))*(M(r)+4*Pi*r^3*p(r))/(beta*r*(r-2*M(r)));

eq2 := diff(M(r), r) = 4*Pi*r^2*rho(r);

W0 := solve(thetaR = theta0-W0, W0);

r0:=10^(-5);

rf:=10^20;

# ini := evalf({M(r0) = 0, W(r0) = W0});

How to include/code/type such type of boundary conditions in maple?

Thanks

 

I need to update prcLeastSquareLA so that it adds error estimate information as an output in prcLeastSquareLA.

This is what I have so far:

prcLeastSquareLA:=proc(data,degree)

local vars,y,A,V,k,e,i,j,v,c,lstVars;  

vars := seq(c_i, i = 0 .. degree);

y := unapply(`+`(seq((c_i)*t^i, i = 0 .. degree)), t);

 for k to nops(data) do 

e_k := y(data[k][1]) = data[k][2];

v_k := [coeffs(lhs(e_k))];

I wrote the following code but am stuck on how to Update prcLeastSquareLA, so it does what prcLeastSquare does.

I believe you have to add error estimate information in prcLeastSquareLA but I have tried to no avail.

 

prcLeastSquareLA:= proc(data,degree)
local vars,y,A,V,k,e,i,j,v,c,1stVars;

vars:= seq(ci, i=0..degree);
y:=unapply(‘+’(seq(ci*t^j, i=0..degree)),t);
for k

Hi, I need to update a procedure prcLeastSquareLA so that it includes error estimate information as output in it. So far for the procedure I have this:

prcLeastSquareLA:=proc(data,degree)

local vars,y,A,V,k,e,i,j,v,c,lstVars;  

vars := seq(c_i, i = 0 .. degree);

y := unapply(`+`(seq((c_i)*t^i, i = 0 .. degree)), t);

 for k to nops(data) do 

e_k := y(data[k][1]) = data[k][2];

v_k := [coeffs(lhs(e_k))];

How to extract affine terms from a differential equation after linearization?

Vanderpol Eqn:

diff(x[1](t),t)=x[2](t)

diff(x[2](t),t)=(1-x[1](t)^2)*x[2](t)-x[1](t)

 

To be precise, I linearized...

First 300 301 302 303 304 305 306 Last Page 302 of 362