MaplePrimes Questions

Hello everyone!

Suppose, we have a differential polynomial

P := u(x) + (D@@2)(u)(x)

Given this, I am looking for a procedure which gives coefficients depending on the order given as input, for example, lets say, procedure name is fun_coeff which depends on two parameters, original polynomial P and the order n, then

fun_coeff(P, 3) should give [1, 0, 1, 0]

where each entry corresponds to the coeff of

 [u(x), (D@@1)(u)(x), (D@@2)(u)(x), (D@@3)(u)(x)]

in the polynomial, similarly

fun_coeff(P,4) should give [1, 0, 1, 0, 0]

corresponding to

 [u(x), (D@@1)(u)(x), (D@@2)(u)(x), (D@@3)(u)(x), (D@@4)(u)(x) ]

Thank you all for your time :)

Dear all

I have downloaded a third party Maple package from following link:

http://cpc.cs.qub.ac.uk/summaries/AEQP_v1_0.html

The distribution format is  "tar.gz", but I don't know what to with this format, that how should I load this package into Maple library. I have window 8.1.

If anybody have an idea about this format "tar.gz" please help me out.

Hi

i am working on a simple control project.i should make a transfer function from the below equation (as an example):

 (s^2*m1+I1*(s^2)*(1/r^2))*x(s)+(-(1/2)*s^2*b*m1-s^2*m1*r-I1*(s^2)*(1/r)+m1*g)*theta(s)+(1/2)*theta(0)*s*b*m1+theta(0)*s*m1*r-x(0)*s*m1+(1/2)*(D(theta))(0)*b*m1+(D(theta))(0)*m1*r-(D(x))(0)*m1+I1*s*theta(0)*(1/r)+I1*(D(theta))(0)*(1/r)-I1*s*x(0)*(1/r^2)-I1*(D(x))(0)*(1/r^2) = 0

in order to make the T.F i have to make " x(s)/theta(s) " on the lhs and put the rest on the rhs. i have no idea how to do so.(the underlined part involves no x(s) and theta(s). obviously a theta(s) will appear on the rhs in the one of the denominators which doesn't matter.)

please help me with this problem.since i don't know what the commands are called in english, i failed in searching for it.

thanks.

hi.please remove error in attached file

thanks...gfhf.mw

 a new function from an existing function and how?

I try to assign a value "y" function "g" but not working. Should be g(0.5,y)=800, but it is not appear in screen. Regards.

value_function.mw

``

restart

``

``

``

g(.5, y) := 200*y;

200*y

(1)

y := 4;

4

(2)

g(.5, y)

g(.5, 4)

(3)

``

``



Download value_function.mw

 

Dear all
Please guide me how to convert system of expressions into system of equations, so as solve them using "solve command".

The following expressions are just coefficients extracted from certain equation.

16*a[2]^4*delta[1]^2-48*a[2]^3*a[3]*delta[1]*delta[2]-2*a[2]*b[2]*delta[1]^2, 48*a[2]^2*a[3]^2*delta[1]*delta[2]-80*a[3]^4*delta[1]*delta[2]-4*a[3]*b[3]*delta[1]*delta[2], 64*a[2]^3*a[3]*delta[1]*delta[2]-64*a[2]*a[3]^3*delta[1]*delta[2]-2*a[2]*b[3]*delta[1]*delta[2]-2*a[3]*b[2]*delta[1]*delta[2]

16*a[2]^4*delta[1]^2-48*a[2]^3*a[3]*delta[1]*delta[2]-2*a[2]*b[2]*delta[1]^2, 48*a[2]^2*a[3]^2*delta[1]*delta[2]-80*a[3]^4*delta[1]*delta[2]-4*a[3]*b[3]*delta[1]*delta[2], 64*a[2]^3*a[3]*delta[1]*delta[2]-64*a[2]*a[3]^3*delta[1]*delta[2]-2*a[2]*b[3]*delta[1]*delta[2]-2*a[3]*b[2]*delta[1]*delta[2]

(1)

It possible for me to write (1) in the following form

for EQ in 16*a[2]^4*delta[1]^2-48*a[2]^3*a[3]*delta[1]*delta[2]-2*a[2]*b[2]*delta[1]^2, 48*a[2]^2*a[3]^2*delta[1]*delta[2]-80*a[3]^4*delta[1]*delta[2]-4*a[3]*b[3]*delta[1]*delta[2], 64*a[2]^3*a[3]*delta[1]*delta[2]-64*a[2]*a[3]^3*delta[1]*delta[2]-2*a[2]*b[3]*delta[1]*delta[2]-2*a[3]*b[2]*delta[1]*delta[2] do EQ = 0 end do

16*a[2]^4*delta[1]^2-48*a[2]^3*a[3]*delta[1]*delta[2]-2*a[2]*b[2]*delta[1]^2 = 0

 

48*a[2]^2*a[3]^2*delta[1]*delta[2]-80*a[3]^4*delta[1]*delta[2]-4*a[3]*b[3]*delta[1]*delta[2] = 0

 

64*a[2]^3*a[3]*delta[1]*delta[2]-64*a[2]*a[3]^3*delta[1]*delta[2]-2*a[2]*b[3]*delta[1]*delta[2]-2*a[3]*b[2]*delta[1]*delta[2] = 0

(2)

But I want to write (1) in the following form

16*a[2]^4*delta[1]^2-48*a[2]^3*a[3]*delta[1]*delta[2]-2*a[2]*b[2]*delta[1]^2 = 0, 48*a[2]^2*a[3]^2*delta[1]*delta[2]-80*a[3]^4*delta[1]*delta[2]-4*a[3]*b[3]*delta[1]*delta[2] = 0, 64*a[2]^3*a[3]*delta[1]*delta[2]-64*a[2]*a[3]^3*delta[1]*delta[2]-2*a[2]*b[3]*delta[1]*delta[2]-2*a[3]*b[2]*delta[1]*delta[2] = 0

16*a[2]^4*delta[1]^2-48*a[2]^3*a[3]*delta[1]*delta[2]-2*a[2]*b[2]*delta[1]^2 = 0, 48*a[2]^2*a[3]^2*delta[1]*delta[2]-80*a[3]^4*delta[1]*delta[2]-4*a[3]*b[3]*delta[1]*delta[2] = 0, 64*a[2]^3*a[3]*delta[1]*delta[2]-64*a[2]*a[3]^3*delta[1]*delta[2]-2*a[2]*b[3]*delta[1]*delta[2]-2*a[3]*b[2]*delta[1]*delta[2] = 0

(3)

``

 

Download Maple_Query.mw

Find S=1+1/2+1/3+1/4+...+1/n ,n is integers .

Dear all, I have obtained some figures in Maple code. But they looks not very good. Iwant to export the plot data to matlab. Then try to plot in matlab. I think it should't be very hard. Does anyone can help me? Thanks

Hello,

I have a maple code, which some expressions have more that 80000 terms and I need to double integrate them. The terms have sine, cossine trigonometric functions.

I tried to used de MAP command, it works for the first expressions but, after a while, Maple displays an error message related to too large expression.

Do you know how to handle large expressions ?

Thank you.

 

Hi, I'm trying to reproduce the code book Burden Faires (Poisson Equation Finite-Difference. Buden Faires book Numerical Analysis 9th) page 720, algorithm 12.1., But I do not get the exact calculations of Example 2 from page 722. Under the code in maple. Regards.

CODIGO.mw

Hello people in mapleprimes,

I have a question about how Int does.

The following function spy returns 0, of course, with a side effect of listing the value of x one by one to secrets.

secrets := NULL:

spy:=proc(x::{name,numeric})
  global secrets;
  if type(x,name) then
    return 'procname'(args)
  else
  secrets:=x,secrets;
  return 0;
  end if;
end proc;

 

And, with this function, calculation of the Int, that is, following brings a sequence of numbers:

evalf(Int(spy,0..1));

secrets;

.7506605773, .2493394227, .9118140517, 0.881859483e-1, .9970470440, 0.29529560e-2, 1.0000000000, 2.2449529449*10^(-11), .5000000000

 

The question I have is why the number of this sequence is not from smaller( or greater) to greater (smaller) in order,

but in random order. And, numerical calculation of Int can be done with only 9 points extracted?

 

Best wishes.

taro

 

 

 

 

 

Dear all,

 

I am tryong to use the density plot for the first time.

Following maple instructions in maplsoft, I type 

densityplot(xex2y2,x=2..2,y=2..2,colorscheme=["π™±πš•πšžπšŽ","π™Άπš›πšŽπšŽπš—","π™Ύπš›πšŠπš—πšπšŽ"])

but I get the error below:

Error, (in plot/options2d) unexpected option: colorscheme =["π™±πš•πšžπšŽ","π™Άπš›πšŽπšŽπš—","π™Ύπš›πšŠπš—πšπšŽ"])

It actually works with one color, but not with colorscheme!

 

Nonzero complex numbers a, b, and c are such that every pair of the polynomials ( in x )
a*x^11+b*x^4+c, b*x^11+c*x^4+a, c*x^11+a*x^4+b has a common root. How to prove or disprove with Maple that all the three polynomials have a common root? I am aware of the resultant command in Maple.

http://www.mapleprimes.com/posts/38019-Calling-Out-To-C-From-Maple#

if i can use maple to call c# function such as AForge.QLearning

how to set some tasks for it to guess some system of polynomials to fit hibert series criteria?

how to set a game for it to run itself to discover itself?

First 1184 1185 1186 1187 1188 1189 1190 Last Page 1186 of 2434
ο»Ώ