Maple Questions and Posts

These are Posts and Questions associated with the product, Maple

How to plot 3D graph for the following infinite series sum?

How do I create a plot like Figure I as uploaded in the PDF-document?

On Figure I, you see the plot of two income functions. The income functions are defined by equations (5), (6), (7), and (8).
Please note that:
0<a<1
0<g<1
0<"tau"<1
0<"delta"*g<1
"delta" belongs to open interval (0,1)

/Regards.

IMG_499.pdf

For examples, they are two non-commutative variables x and y, and i use "Setup(noncommutativeprefix={x,y})" to define.
 As the previous results have shown that AntiCommutator(x,x)=0 and AntiCommutator(y,y)=0, so i just define Setup(algebrarules={%AntiCommutator(x,x)=0, %AntiCommutator(y,y)=0}).
When i am calculating AntiCommutator(x,y), the maple automatically simplifies the results and returns AntiCommutator(x,y)=0, as variables x and y are thought to be GrassmannParity =1 variables.

Consider two  3*3 matrix e23 and e32, the AntiCommutator of (e23, e23)=(e32,e32)=0, but the AntiCommutator(e23,e32)= e22+e33.

So how the algebrarules work and why there is the contradiction ?

How does Maple interpret the second line to get that result ??

I had to put expicitly a dot between the brackets to fix it.

 

Kind regards, Detlef Hoyer


 

restart; eq2 := ef*epsilon+x1*sinh(y1*L/r1)+x2*cosh(y1*L/r1)-.1*(ef*epsilon+x2) = 0; eq3 := ef*epsilon+x1*sinh(-y1*L/r1)+x2*cosh(-y1*L/r1)-.1*(ef*epsilon+x2) = 0; sol1 := solve({eq2, eq3}, {x1, x2})

.9*ef*epsilon+x1*sinh(y1*L/r1)+x2*cosh(y1*L/r1)-.1*x2 = 0

 

.9*ef*epsilon-x1*sinh(y1*L/r1)+x2*cosh(y1*L/r1)-.1*x2 = 0

 

{x1 = 0., x2 = -9.*ef*epsilon/(10.*cosh(y1*L/r1)-1.)}

(1)

assign(sol1); 1; x1, x2

0., -9.*ef*epsilon/(10.*cosh(y1*L/r1)-1.)

(2)

x1;

0.

(3)

x2;

-9.*ef*epsilon/(10.*cosh(y1*L/r1)-1.)

(4)

eq4 := ef*epsilon+x1*sinh(y1*z/r1)+x2*cosh(y1*z/r1);

ef*epsilon-9.*ef*epsilon*cosh(y1*z/r1)/(10.*cosh(y1*L/r1)-1.)

(5)

avg_eq4 := Typesetting:-delayDotProduct(1/L, int(eq4, z));

1/L.(ef*epsilon*z-9.*ef*epsilon*r1*sinh(y1*z/r1)/((10.*cosh(y1*L/r1)-1.)*y1))

(6)

Ecomp := Typesetting:-delayDotProduct(simplify((eval(subs(z = L, avg_eq4)-subs(z = 0, avg_eq4)))/epsilon), Vf)+(1-Vf)*Em;

(1/L.(ef*epsilon*(10.*L*y1*cosh(y1*L/r1)-L*y1-9.*r1*sinh(y1*L/r1))/((10.*cosh(y1*L/r1)-1.)*y1)))/epsilon.Vf+(1-Vf)*Em

(7)

tau := .5*(diff(eq4, z))*r1;

-4.5*ef*epsilon*sinh(y1*z/r1)*y1/(10.*cosh(y1*L/r1)-1.)

(8)

L := lfact*r1;

lfact*r1

 

0.65e-5

(9)

ef := 0.75e11;

0.75e11

 

0.326e10

 

.3

 

.5

(10)

Theo_Ecomp := Vf*ef+(1-Vf)*Em;

0.39130e11

(11)

y1 := 2*Em/((1+nu)*ef*ln(1/Vf))

0.9647560684e-1

(12)

Ecomp

0.5979989095e17*(1/lfact.(epsilon*(0.6270914445e-5*lfact*cosh(0.9647560685e-1*lfact)-0.6270914445e-6*lfact-0.585e-4*sinh(0.9647560685e-1*lfact))/(10.*cosh(0.9647560685e-1*lfact)-1.)))/epsilon+0.1630e10

(13)

epsilon := 0.1e-2;

0.1e-2

(14)

plot(Ecomp, lfact = 1 .. 500)

 

lfact := 90.81506;

90.81506

(15)

eq4

0.75e8-21149.64968*cosh(14842.40105*z)

(16)

plot(eq4, z = 0 .. L)

 

plot(tau, z = 0 .. L)

 

NULL


 

Download Fuly_bonded_updated.mw

A line is deternined on one side by 16*x-2*y-11*z=0, 14*x-y-10*z=3 and on the other by (x-2)/3=(y-5)/2=(z-2)/4. Are they equivalent  ?  Thank you. 

Latest updates of Physics package (problem start with version cca 1020) is not announced at Maple cloud user window (see attacehd snapshot). The same problem occur on Windows and Linux platform!

 

I need to express a function after factoring out a variable. How do I do this?

L/(z*sqrt(z^2 + L^2)

Need to write in terms of L/z or z/L.

 

Hi,

I have had trouble with a  .mw worksheet..which I will attach.(I am using Maple 2021)..This is second time it got corrupted..I used the

"CompleteMiniCourseComputerAlgebraPhysics" and copy parts to worksheets so I can work the problems and I do 

Alot of markups and highlighting as well as add coments a copy as Text from help on certain commands..

I read some other posts that discuss corrupt file thats use XML I think in the worksheet....I checked this in the area I was working and did not find anything (I completed about half of the course saving as I went and had no problems)....so any guidance would be appreciated..

ThanksMyMinitCourseComputerAlgebraForPhysicsPart2_-_Copy_-_Copy.zipMyMinitCourseComputerAlgebraForPhysicsPart2_-_Copy_-_Copy.zip

Frank McFee

I have attached some screenshots of the display in Maple 2021 which seem to appear after Maple has been up for an extended period of time (seemingly 3+ hours). The odd characters are not present when the tabs are initially opened, and the problem disappears for awhile after a restart.  Generally, I have not noticed a similar problem in Maple 2020.  However, the corruption of the output affects not only user created worksheets, but also help pages and examples opened from help as can be seen in the image below.

FYI I am using M2021 on an HP Omen gaming laptop that is several years old, but has been updated (drivers and windows)  as they become available.

I have made a procedure named Eratosthenes that will return a sequence of all the primes less than some given number N which must be a positive integer. However, I couldn't figure out the error but still, the code is not working either. Can anyone please go through my code to let me know if I have a mistake? Thanks.

Eratosthenes := proc (N::posint) local L, primeslist, n, k; description "Calculate all primes less than or equal to N"; L := Array(2 .. N, proc (i) options operator, arrow; true end proc); for n from 2 to trunc(sqrt(N)) do if L__n = true then for k from n while k*n <= N do `L__k*n` := false end do end if end do; primeslist := NULL; for n from 2 to N do if L__n = true then primeslist := primeslist, n end if end do; primeslist end proc:

Warning, ``L__k*n`` is implicitly declared local to procedure `Eratosthenes`

 

``NULL


 

Download issue.mwissue.mw

I have been trying to solve the following question using Maple for quite some time but couldn't do it. Any guide will be highly appreciated. 

P.S: I have just started learning it by myself in the last few days. I have been following An Introduction to Modern Mathematical Computing: With Maple. If you could suggest a more useful text, that would be helpful.

Please find the question below.

Warning: Solutions may have been lost;  Pleas help, i have uploaded .mw file

How I have used maple 2018, 2019 and 2020. I am now trying to switch to 2021, however the resolution is irritating. The resoluion in the palettes tab is bad and is especially bad for the "popup suggestion window" when you press escape on like "sum" or "e". I have tried searching on google to fix it but have not been able to find any help. Using windows 10

The pictures attached shows the resolution problem.

I know it is a small issue, but it annoys me a lot. So any suggestions to what I could do?

Where should I put the activation code ! 

First 378 379 380 381 382 383 384 Last Page 380 of 2216