MaplePrimes Questions

Hello

I wonder how I could use Maple commands to do the following:

An irrational number, ir, (a huge symbolic expression as a result of iterating a discrete map) is converted to single precision (Real16) and then to hexadecimal as a string. Example: using matlab it will be something like single(ir)=0.25(float representation) =3e800000 (hexadecimal representation).

I am not sure if single precision is available in Maple 2017 but I guess Real32, Real64 and Real128 are.

Once the hexadecimal representation is acquired I need to convert it back to Real16, Real 32 and etc.

Your help is much appreciated.

Many thanks

Ed

I am trying element-wise addition of two arrays where one array is Cauchy distribution. but this calculation using much memory. Please help.

 

CAUCHY_DISTRIBUTION.mw

Dear members, Can anyone help me, how to adjust the spacing between lines, sections in adjacent paragraphsand sections within a paragragraph.


 

"line 1"

" line 2  line 3"

Sec 1

   

``

Sec 2

   

Sec2

   


How do I vary the spacing between the lines?


 

Download spacingDoubt.mw

Hi,

How do I display the area between two curves? ( for example the area in sin and cos?) I tried with the option 'filled ' and 'display'

Deuxcourbes.mw

Hi,

I'm using the eBookTools package to convert a .mw file as a chapter into a PDF file. However, a problem arises when I convert a document with a few repeated plotting commands (such as plot(x^2)). The issue is that in the final PDF the images of the various plots overlap, and that the individual plots can't be clearly seen. Is there a resolution to this?

Thanks,
Bart

I am generating gaussian distribution by decreasing standard deviation but the distribution generation is getting very slow.

 

GAUSSIAN.mw

A book I am reading has the following

I cannot produce this in Maple 2017. Please tell me where I go wrong. Thank


 

restart

"P(t):=(r*Q[inf])/(2+2 cosh(b-r*t))"

proc (t) options operator, arrow; r*Q[inf]/(2+2*cosh(b-r*t)) end proc

(1)

"Q(t):=(∫)[0]^(t)P(t) ⅆt"

proc (t) options operator, arrow; int(P(t), t = 0 .. t) end proc

(2)

``


 

Download Hubbert.mw

the following maple code is to solve the SYS of ODE x',y',z'

then plot z' agianst t

i got confused each plot give me zero

N:=1:M:=sqrt(N*(N+1)):N1:=1+N:w:=10:f:=1;
                             f := 1


ini1:= x(0)=0.5,y(0)=0.5,z(0)=0;
            ini1 := x(0) = 0.5, y(0) = 0.5, z(0) = 0
var:={x(t),y(t),z(t)}: 
dsys:={diff(z(t),t)=-(N1+M*cos(2*w*t))*z(t)-1+f*(x(t)+y(t)), diff(x(t),t)=-(N1-I*w-2*M*exp(-2*I*w*t))*x(t)-f*(N1+(z(t)))-2*f*M*exp(2*I*w*t),diff(y(t),t)=-(N1+I*w-2*M*exp(2*I*w*t))*y(t)-f*(N1+(z(t)))-2*f*M*exp(-2*I*w*t)}:
zd:=diff(z(t),t);
                                d      
                         zd := --- z(t)
                                dt     
res:=dsolve(dsys union {x(0)=0.5,y(0)=0.5,z(0)=0},numeric,output=listprocedure):
tit:=sprintf("F=%g,N=%g",f,N):

P1:=plots[odeplot](res,[[t,(zd)]],0..6,axes=boxed,titlefont=[SYMBOL,14],font=[1,1,18],color=blue,linestyle=1,tickmarks=[3, 4],font=[1,1,14],thickness=2,titlefont=[SYMBOL,12]);

I'm trying to plot a graph of cos(2*theta)*omega*t+2*(sin(theta))^2*sin(omega*t)=0 in Maple (For values of theta between 40 and 88 degrees roughly, with a fixed value of omega). I have substituted x=omega*t and tried to solve, but as I'm sure you can tell it is not outputting the graph I'm after, I was hoping somebody would be able to tell me where I am going wrong. Thanks.

restart;
v := 145000;
thetavn := (1/6)*Pi;
omegac := .1;
s := cos(2*thetabn)*x+2*sin(thetabn)^2*sin(x);
plots:-implicitplot(s = 0, thetabn = 43*Pi*(1/180) .. 88*Pi*(1/180), x = -200 .. 200, tickmarks = ["piticks", "decimalticks"], gridrefine = 4, size = [800, 600]);

When generating gaussian distribution I am getting the following error. Please help. Thank you

 

GAUSSIAN.mw

Is package SumTools supposed to be a superset of the sum command in Maple? Or is it supposed to be a complementary to it? When should one use SumTools vs. sum?

The help on SumTools says

The SumTools package contains commands that help find closed forms of definite and indefinite sums. The package consists of three commands and three subpackages.
 

But does not make it clear when to use it vs. sum or what is its relation to sum command.

I am asking because on one example, sum is able to give an answer, while SumTools can't. I have expected the other way, where if sum failed, then one will try SumTools.

restart;
sum(1/n*sin(n*x),n=1..infinity) assuming 0<x,x<Pi

SumTools:-IndefiniteSummation(1/n*sin(n*x),n=1..infinity) assuming 0<x, x<Pi

 

 

Hello,

I am trying to solve CVRPSD by integer L shape method. I have some problems.

d=(0, 20,20,25,15,10): Demand
p=(1,1,1/3,1/2,1/4): the probability demand

K=50
1) How to write properly Recourse Policy (Q) in maple (I attached my problem) ? Recourse (Penalty cost) is applied when the demand exceed the vehicle capacity. We know that in CVRPSD, we don't know the demand until vehicle arrive at the node(customer).
(Look at my program)

Hopefully anybody could help me to solve this.

Thank you any way.
Exact_CVRPSD.mw

Hi everyone:

I want to calculate the value of eval(diff(y, x), x = 0.418e-1)-eval(diff(y, x), x = 0.1e-1), how?

y := (1-Heaviside(x-0.10e-1))*(cos(9.0218219*x)-.99533285*sin(9.0218219*x)-.99999991*cosh(9.0218219*x)+.99533285*sinh(9.0218219*x))+(Heaviside(x-0.10e-1)-Heaviside(x-0.418e-1))*(.24369100*cos(7.7520047*x)-.36109859*sin(7.7520047*x)-.23739778*cosh(7.7520047*x)+.19615343*sinh(7.7520047*x))+Heaviside(x-0.418e-1)*(.95680995*cos(9.0218219*x)-.80884870*sin(9.0218219*x)-1.0381918*cosh(9.0218219*x)+1.1704059*sinh(9.0218219*x))

with regards...

Hi there

Can anyone explain the following calculation error? (The task seems quite simple.)
 

restart

Original - very unintuitive calculation error:

Vector(3, {(1) = 20.09230769, (2) = 32.43076923, (3) = 15.26153846}) = Vector[column](%id = 18446746432715486622)NULL

``

In 1D math it works:

Vector[column](3, [1306./65, 2108./65, 992./65]);

Vector(3, {(1) = 20.09230769, (2) = 32.43076923, (3) = 15.26153846})

(1)

````

Approximate works:

Vector(3, {(1) = 1306/65, (2) = 2108/65, (3) = 992/65})"(->)"Vector[column](%id = 18446746432750076862)

``

Multiplying by 1. works:

Vector(3, {(1) = 20.09230769, (2) = 32.43076923, (3) = 15.26153846}) = Vector[column](%id = 18446746432750171550)NULL

``

 

Download Maple_-_vector_of_fractions_with_floats.mw

Kind regards,

Jens Jacob Thomsen

how to submit maple job through command line. Thank you.

First 604 605 606 607 608 609 610 Last Page 606 of 2308