Maple 2016 Questions and Posts

These are Posts and Questions associated with the product, Maple 2016

Hello

I am trying to write my Measuring Data into several Arrays with lengt of rowdim

I was able to extract them from the Datafile and Refering them to separate Vectors

My Code is in the attachemend and the Datafile too.

Insert the txt Path in the Messdaten in definition of A to load it.

I was able to convert the Time from Seconds to Minutes. What i realy want is an x-Axis wich is like hh:mm:ss

and Plot for Example T__1,T__2,T__Scheibe together in one Plot as y Axis and t__Minuten as x Axis

But the

plot([seq([`t__Sekunden`[i],`T__1`[i]],i=1..rowdim,LinearAlgebra[rowdim](`t__Sekunden`))

doesnt work and i also tried others

Thank you for your Help

 

Hallo,

im currently using Mathcad 15 and i want to change to a newer and better software with more possibilities.

But up to now i have not found a better software for calculating. One big advantage with mathcad is the possibilitie of symbolic formula input and calculation with units.

Now my question: Is it possible with Maple to write symbolic formulas (2D Structure of big formulas)

I dont write a formula in one row. Its nearly impossible ...

And can i calculate with units?

Thx Stefan

 

Hey there
 
I'm Trying to install maple on my Linux laptop, i have it install and starting fine but, i cant activate it. I get the massage " This Purchase code is only valid for Maple 2016 " But I know that it is the right Activation code, On a Side note I'm a student so the code is form the my school.
 

hope you can understand it.

I did not realize Maple 2016, since Maple 2015 actually, had stopped Windows XP support. 

hi

how i can remove this error?

1) ''Error, invalid input: lhs received diff(diff(diff(diff(w(x, y, t), x), x), x), x)+.12*(diff(diff(diff(diff(w(x, y, t), x), x), y), y))+0.11e-2*(diff(diff(diff(diff(w(x, y, t), y), y), y), y))+10-.4*(diff(diff(w(x, y, t), x), x))-0.4e-2*(diff(diff(w(x, y, t), y), y))+diff(diff(w(x, y, t), t), t)-w(x, y, t)-tau, which is not valid for its 1st argument, expr'''''

2)'' Error, incorrect number of extra arguments in select''

thanks

scale.mw
 

 

NULL

restart:Digits := 15: beta := 1: alpha := 0.1: Upsilon := .1: xi := 10: eta := .1: N_X := .4: N_Y := .4: psi:NULL=4.73:tau = 10

tau = 10

(1)

A5 := 1; A6 := 2*alpha^2; A7 := alpha^4; A8 := xi; A9 := xi*alpha^2; A10 := xi*alpha^4; A11 := -N_X; A12 := -N_Y*alpha^2; A13 := 1; A14 := -beta; A15 := -tau

-tau

(2)

EOM := A5*(diff(w(x, y, t), x, x, x, x))+A6*(diff(w(x, y, t), x, x, y, y))+A7*(diff(w(x, y, t), y, y, y, y))+A8(diff(w(x, y, t), x, x, x, x))+A9*(diff(w(x, y, t), x, x, y, y))+A10*(diff(w(x, y, t), y, y, y, y))+A11*(diff(w(x, y, t), x, x))+A12*(diff(w(x, y, t), y, y))+A13*(diff(w(x, y, t), t, t))+A14*w(x, y, t)+A15

diff(diff(diff(diff(w(x, y, t), x), x), x), x)+.12*(diff(diff(diff(diff(w(x, y, t), x), x), y), y))+0.11e-2*(diff(diff(diff(diff(w(x, y, t), y), y), y), y))+10-.4*(diff(diff(w(x, y, t), x), x))-0.4e-2*(diff(diff(w(x, y, t), y), y))+diff(diff(w(x, y, t), t), t)-w(x, y, t)-tau

(3)

BC := w(0, y, t) = 0, (D[1, 1](w))(0, y, t) = 0, w(a, y, t) = 0, (D[1, 1](w))(a, y, t) = 0, w(x, 0, t) = 0, (D[2, 2](w))(x, 0, t) = 0, w(x, b, t) = 0, (D[2, 2](w))(x, b, t) = 0

w(0, y, t) = 0, (D[1, 1](w))(0, y, t) = 0, w(a, y, t) = 0, (D[1, 1](w))(a, y, t) = 0, w(x, 0, t) = 0, (D[2, 2](w))(x, 0, t) = 0, w(x, b, t) = 0, (D[2, 2](w))(x, b, t) = 0

(4)

 

 

BC1:=subs(a=1,b=1,[BC])

[w(0, y, t) = 0, (D[1, 1](w))(0, y, t) = 0, w(1, y, t) = 0, (D[1, 1](w))(1, y, t) = 0, w(x, 0, t) = 0, (D[2, 2](w))(x, 0, t) = 0, w(x, 1, t) = 0, (D[2, 2](w))(x, 1, t) = 0]

(5)

We use the method of multiple scales to directly attack EOM1 and BC1. To transform the time derivatives in EOM1 in terms of the scales  and , we let

timeScales:=T[0],T[1]

T[0], T[1]

(6)

dt[1]:=expr->add(epsilon^i*diff(expr,timeScales[i+1]),i=0..1)

proc (expr) options operator, arrow; add(epsilon^i*(diff(expr, timeScales[i+1])), i = 0 .. 1) end proc

(7)

msForm:={w(x,y,t)=w(x,y,timeScales),seq(diff(w(x,y,t),t$i)=dt[i](w(x,y,timeScales)),i=1..2)}

{diff(diff(w(x, y, t), t), t) = dt[2](w(x, y, T[0], T[1])), diff(w(x, y, t), t) = diff(w(x, y, T[0], T[1]), T[0])+epsilon*(diff(w(x, y, T[0], T[1]), T[1])), w(x, y, t) = w(x, y, T[0], T[1])}

(8)

multiScales:=`union`(map(s->subs(w=s,msForm),[w])[])

{diff(diff(w(x, y, t), t), t) = dt[2](w(x, y, T[0], T[1])), diff(w(x, y, t), t) = diff(w(x, y, T[0], T[1]), T[0])+epsilon*(diff(w(x, y, T[0], T[1]), T[1])), w(x, y, t) = w(x, y, T[0], T[1])}

(9)

Then, we seek a second-order approximate solution in the form

solRule:=w(x,y,timeScales)=add(epsilon^j*w[j](x,y,timeScales),j=1..3)

w(x, y, T[0], T[1]) = epsilon*w[1](x, y, T[0], T[1])+epsilon^2*w[2](x, y, T[0], T[1])+epsilon^3*w[3](x, y, T[0], T[1])

(10)

We introduce the detuning  to describe the nearness of the edge lengths  and , consider the case of primary resonance, and hence let

tau=epsilon^3*tau(x,y)*convert(cos(Omega*T[0]),exp)

tau = epsilon^3*tau(x, y)*((1/2)*exp(I*Omega*T[0])+(1/2)*exp(-I*Omega*T[0]))

(11)

lhs(EOM)

Error, invalid input: lhs received diff(diff(diff(diff(w(x, y, t), x), x), x), x)+.12*(diff(diff(diff(diff(w(x, y, t), x), x), y), y))+0.11e-2*(diff(diff(diff(diff(w(x, y, t), y), y), y), y))+10-.4*(diff(diff(w(x, y, t), x), x))-0.4e-2*(diff(diff(w(x, y, t), y), y))+diff(diff(w(x, y, t), t), t)-w(x, y, t)-tau, which is not valid for its 1st argument, expr

 

Substituting multiScales, solRule, and scaleRule2 into EOM1, expanding the result for small , and discarding terms of order higher than , we obtain

expr83a:=seq(convert(series(value(subs(multiScales,solRule,lhs(EOM))),epsilon,4),polynom),i=1)

Error, invalid input: lhs received diff(diff(diff(diff(w(x, y, t), x), x), x), x)+.12*(diff(diff(diff(diff(w(x, y, t), x), x), y), y))+0.11e-2*(diff(diff(diff(diff(w(x, y, t), y), y), y), y))+10-.4*(diff(diff(w(x, y, t), x), x))-0.4e-2*(diff(diff(w(x, y, t), y), y))+diff(diff(w(x, y, t), t), t)-w(x, y, t)-tau, which is not valid for its 1st argument, expr

 

NULL

NULL

t0 := time(); ST1_like := map(combine, select(has, select(has, ST, sin(m*Pi*x)), sin(n*Pi*y))); time_taken := time()-t0

.187

 

Error, incorrect number of extra arguments in select

 

0.

(12)

``


 

Download scale.mw

 

Hello

I changed the color of the background of a worksheet in black (I introduced a Table for that reason) because the white color hurts my eyes. I still have a couple of things that I'd like to modify:

1. The blinking cursor is black and is now invisible. How can I change its color?

2. The default input color is red ; i'd like to change it in white. How can I do?

Thanks Nicola

Let us look in RealDomain and then in the RealDomain:-solve command. One is addressed to the usual solve command. The commands of the RealDomain package are not still documented since Maple 7 when the package was introduced. There is a general description only 

  • By default, Maple performs computations under the assumption that the underlying number system is the complex field. The RealDomain package provides an environment in which computations are performed under the assumption that the basic underlying number system is the field of real numbers.
  • Results returned by procedures are postprocessed by discarding values containing any detectable non-real answers or replacing them with undefined where appropriate.

The above is not enough. Here is an example which confuses me: 

RealDomain:-solve(exp(I*x) = -1, AllSolutions);
NULL

though 

solve(exp(I*x) = -1, AllSolutions);
                         Pi (2 _Z1 + 1)

and 

RealDomain:-solve(exp(I*x) = -1);
                               Pi

I lie awake thinking about that. Maplesoft staff help me!

I need yours hepl.  I work with the physics paсkage and I set:

with(Physics)

Setup(mathematicalnotation = true)

 Coordinates(X)

Setup(Dgammarepresentation = standard)

Setup(spaceindices = uppercaselatin)

Define(m, m5, y, p, mm, pp)

I try to square the next value: 

W := Dgamma[mu]*d_[mu]+M+Psigma[A]*aa[A]-mm*Dgamma[0]-m5*Dgamma[0]*Dgamma[5]+I*Dgamma[5]*Psigma[B]*pp[B]+I*Dgamma[5]*y

("*" is multiplication)

W*W

And after that I want to simplify it:

Simplify(W*W)

I guess that matter is owing to d_[`~mu`]. If I remove this term:

E:=Psigma[A]*aa[A]-mm*Dgamma[0]-m5*Dgamma[0]*Dgamma[5]+I*Dgamma[5]*Psigma[B]*pp[B]+I*Dgamma[5]*y

And if i do:

E*E

Then next error emerges:

What is it?

 

When transfering a particular worksheet from my home Windows 7 computer to an office Linux computer I lose some of the end of the worksheet, namely I lose a rather memory intensive animation at the end. And the office compute crashes when I attempt to run the animation. This seems strange since apparently the office computer (see below) is more powerful than my home computer.  When this happens there are apparently few if any other users of the office computer. I  would be grateful for suggestions for remedies for this problem or any ideas of what the problem could be.

Home computer: Windows 7 Intel(R) Core(TM) i7-2600 CPU@3.40GHz, 12 GB RAM 64-bit OS

Office computer: CentOS, Kernel Linux 2.6.32-573.12.1.l6.x86.64, Gnome 2.28.2, Memory 94.4GiB, 6 processors each an Intel(R) Xeon(R) CPU E5-2643 v2@3.5BHz, Available Disk Space 1061.0 BiB

I have solved a BVP using finite difference method in maple. But the comparsion with the dsolve solution shows big difference,

Why there is too much difference? Is there an elegant way to implement FDM?

FDM_Dbvp_sheet_1.mw

hi

i want save result in text file?

how i can do it?

for example eta and F(eta) in two  column

sample file is attache.

printf.mw

txtop1.txt

sample for save results::::

eta                     F(eta)

0.00000000, 0.00000000
0.10000000, 0.00096663
0.20000000, 0.00373543
0.30000000, 0.00810907
0.40000000, 0.01388926
0.50000000, 0.02087683
0.60000000, 0.02887169
0.70000000, 0.03767307
0.80000000, 0.04707963
0.90000000, 0.05688968
1.00000000, 0.06690139

Download txtop1.txt

 

 

 

Hello, 

I loaded Maple to my friend's PC. But we can not execute any command in worksheet. When we write some lines and hit enter, it does not respond in anyway. (excluding simple calculations such as: 2+3 etc.) What is the problem and how can we solve it? 

PC: Windows 10 

Maple 2016.1

How do I solve a differential equation in maple? Is there a specific identity that you can use?

Hello all, 

A question concerning NetCdf files was asked in 2012 and is still unanswered today.
Browsing the questions only returns this item, suggesting the NetCdf topic is not a concern in the Maple community.
Nevertheless, does it exist some capabilities in reading and writting NetCDF files ?
If not, are there some planned development on the subject ?

Let's hope now for not having to wait four years for an answer, all responses will be greatly appreciated, even negative.

years


PS : NetCdf capabilities already exist in Sage or Mathematica

Hi.

I´m making a work sheet where I use the VectorCalculus package to evaluate surface of a plane.

When I try to evaluate a regular tripple integral after loading the VectorCalculus package I get the following error:

Error, (in VectorCalculus:-int) the domain must be an equation with a list of names on the left hand side

If I use the task menu to remove the package it works just fine, however I want it all as executable syntax within my worksheet so I tried "unwith(VectorCalculus)" but the package wont be removed by using this command.

How can I go about solving this issue?

https://i.gyazo.com/0f56ebe62bc54c7db303ab2ae05a601c.png

First 38 39 40 41 42 43 44 Last Page 40 of 60