MaplePrimes Questions

Good day everyone,

          I am trying to write a code for the loop of the equations below such the Theta[k] and Phi[k] start from 2 to M while F[k] starts from 4  to M.

         Anyone with good informations should please.
         Below is the link.

Thanks in anticipation

Solution_1.mw

Hi there!

In order to keep the code more readable, and to spare myself some brackets, I am trying to use the function composition to write

simplify(eval(f(x),x=a))

as

simplify@eval(f(x),x=a))

but it doesn't work. How would I do it the right way? (I am coding in 2D math)

 

Thanks for help!

Hello everyone! I have just started to using Maple 13. I want to solve complex eauation systems.

When I am working on Maple, If I write simple mathematical calculation and then press right click, the context menu open. However, I want to use solve command. Therefore I wrote an eauation after than press right click the context menu will not open. 

What is the reason of this problem? 

Hi everyone, I need to use the integral calculation in MapleSim but there is no MapleSim Block to do it. So I create a Custom Component and using the integral calculation from Maple, the expression of the equation was done. But when I click Dimension analysis button, one error popped out as the photo. Have anyone got the same error before? How should I do to solve it? Thank you very much.

Hi

Assume a linear second order ode with constant coefficients as follows:

M*u''+C*u'+K*u=0

where the symbol (') denotes derivative with respect to time and M, C and K are positive real constants.

The initial conditions are u(0)=u0 and u'(0)=u'0.

Substituting u=exp(a*t) in the ODE to calculate characteristic equation, one has

M*a^2+C*a+K=0  ---> If 0<C<2sqrt(M*K) then u=exp(-C/(2M)*t)*(c1*sin(w*t)+c2*cos(W*t))

in which c1 and c2 can be obtained from initial conditions and W=sqrt(C^2-4*M*K)/2M.

For the case that C is imaginary number, assuming C=i*c yields

{a1,a2} ={ -(c/(2M) +sqrt(c^2+4*M*K)/2M)*i,(-c/(2M) +sqrt(c^2+4*M*K)/2M)*i }

where i is one of the square roots of -1.

Is it true to write u=c1*(sin(a1*t)+cos(a1*t))+c2*(sin(a2*t)+cos(a2*t)) ?

I solve two examples by Maple,

dsolve({diff(u(t), t, t)+0.1*(diff(u(t), t))+2*u(t)} union {u(0) = 1, (D(u))(0) =0.1});

dsolve({diff(u(t), t, t)+0.1*I*(diff(u(t), t))+2*u(t)} union {u(0) = 1, (D(u))(0) = 0.1});

Second example gives complex answer. Is it possible to get trigonometric answer with real constants c1 and c2?

Hi folks,

I've just now installed Maple player, and I find it crashes immediately when I run it:

Exception in thread "Request id 1" java.lang.UnsupportedOperationException: PERPIXEL_TRANSLUCENT translucency is not supported
        at java.awt.Window.setBackground(Window.java:3842)
        at java.awt.Frame.setBackground(Frame.java:988)
        at com.maplesoft.worksheet.application.WmiSplashScreen.<init>(Unknown Source)
        at com.maplesoft.worksheet.player.WmiPlayerStartupStrategy.showSplash(Unknown Source)
        at com.maplesoft.worksheet.application.WmiGenericStartupStrategy.doStartup(Unknown Source)
        at com.maplesoft.worksheet.player.WmiPlayerStartupStrategy.doStartup(Unknown Source)
        at com.maplesoft.application.Maple.doStartup(Unknown Source)
        at com.maplesoft.application.Application.startup(Unknown Source)
        at com.maplesoft.application.ServerProtocol$StartApplicationHandler.processCommand(Unknown Source)
        at com.maplesoft.application.ServerProtocol.executeCommand(Unknown Source)
        at com.maplesoft.application.ServerProtocol.processNextStep(Unknown Source)
        at com.maplesoft.application.ExchangeProtocol.executeProtocol(Unknown Source)
        at com.maplesoft.application.ApplicationManager$Listener.run(Unknown Source)
        at java.lang.Thread.run(Thread.java:748)


The operating system is CentOS 7 (64 bit).   Any idea how I can fix this?

Thanks,

Bryan

How to solve system of convolution equations in maple?

When x axis range is large, the graph display still small , how to expand the graph display in large size?

hi. i want to show steps of a limit solution, but maple says it is unbale to show. could anybody help?


int.mw

x1=ginseng, x2=grape, f1=preference;
> x1:=5;
> f1:=3.579167+3.537500*x1-2.645833*x2-0.250000*x1*x1-0.012500*x2*x1+0.175000*x2*x2;
> plot3d (f1, x2=3..7, labels=[grape, preference], axes=boxed);

 

Error, (in plot3d/expression) bad range arguments: .8 = 3 .. 7, labels = [grape, preference]

 

The error was found! Please help!!!

Hello,

I want to solve the following inequality for "r".

Another question is that what I can say about the signature of "f(r)" and their derivatives for various positive "r"?

inequalitysolve.mw

Hi,

I'm trying to solve this system of differential equation, coming from the iterative process of the Elastic Curve's  solution.

The problem is that Maple returns:

risultato12 := NULL

EDIT: i think the problem is related to the non-linear equations in the system.

Any suggestion?

Here is the file

https://1drv.ms/u/s!AuhHGe410qgOm1_PdEDqkO4J1YYp

The attach maple workshhet evaluates a set of values for different values of input parameters. Each time I want to change the input parameter I have to run the code. I tried to call the code using documenttools[runworksheet] option, but I could not get any output. How can I get the output for a set of input parameters by running the code once. For example similar to a for loop that gives multiple outputs for corresponding inputs.
 

Download Numerical-recursive.mw

 


 

1 .. Nonlinear*Fractional*KdV*equation

PDE1 := D[t]^alpha*u(x, t)-3*(u^2)[x]+u[xxx] = 0;

D[t]^alpha*u(x, t)-3*(u^2)[x]+u[xxx] = 0

(1)

"u(x,0)=6*x         0<alpha<=1, t>0"

Error, missing operation

"u(x,0)=6*x         0<alpha<=1, t>0"

 

``

``

2.*linear*time*fractional*diffusion*equation

2.*linear*time*fractional*diffusion*equation

(2)

``

PDE2 := diff(u(x, t), [`$`(t, alpha)]) = diff(u(x, t), x, x)

diff(u(x, t), [`$`(t, alpha)]) = diff(diff(u(x, t), x), x)

(3)

"IC:= u(x,0):=sinx , 0<alpha<=1 , t>0"

Error, unable to parse

"IC:= u(x,0):=sinx , 0<alpha<=1 , t>0"

 


 

Download kdv.mw

Integral is not evaluated. 

 

PROBLE_13.mw

First 788 789 790 791 792 793 794 Last Page 790 of 2427