Hi all,

I am looking for a package to calculate the power mean (or Hölder mean) defined like

Mean_p(x_n)=(1/N Sum(x_n^p,n=1..N))^(1/p)

in a hopefully obvious notation. I can obviously implement this definition directly in Maple, but there are subtleties (like the limit of p=0) which maybe a mature implementation already covers (?).

I am still mostly on Maple 15 which does not have such a Mean. If 16 or 17 have it I would not becessarily know.

Hey Forums!

Im using maple 16 for some rather simple Engineering calculatioins. One thing about using maple bothers me, and that is the way my result is displayed.

Here is an example

Here is another

Adding "simplify" or "evalf" sometimes does the trick, but id really like...

This piece of code returns a vector 'Sinrdensity' with identity entries. what's wrong with it?

restart;
sinrvalue := [seq(10^((1/10)*i), i = -15 .. 25, .5)];

Sinrdensity := Matrix(1, nops(sinrvalue), 0);

task := proc (sinrdensity, initialpoint, endpoint)

local bft, Theta, bound, value;

for value from initialpoint to endpoint do

bft := unapply(1/(1+I*t), t);

for Theta from 0 to 10^10 while is(0.1e-1 <= evalf(abs(bft(2^Theta...

like f# do

match(tree)

with| verification('hyporesult'(alpha,beta), 'dedeuceto'('Conj'(alpha,beta),gamma) -> 'hyporesult'('Conj'(alpha,gamma),beta)

need to get hyporesult is prefix, and then use if the compare, and get first parameter and second parameter such as for 'Conj'(alpha, gamma)

i use typefunc('hyporesult'(alpha,beta)) can not get 'hyporesult'

moreover...

Who knows what Maple does wrong on this one?

Download sum.mw

Does any one know how to derive this model in Maple?

The_Price_is_Righ.pdf

I did two polar plots as you see and wanted to color the region between them.

> with(plots);
> a1 := polarplot(1, t = 0 .. 6*Pi*(1/3), thickness = 2, filled = true, color = black);
> a2 := polarplot(2*cos(t), t = 0 .. 6*Pi*(1/3), thickness = 2);
> a3 := polarplot(2*cos(t), t = -(1/3)*Pi .. (1/3)*Pi, filled = true, thickness = 2);
> display(a1, a2, a3);

The program makes the region colored red but there is an overlapping part which...

Can you help me how to program about the interference of wave on the water surface in Maple ?

Hi, 

I've bought NAG C Library for my mac in order to use it in Maple.

However, it seems that Maple doesn't know where to search for it.
Indeed, it returns

Error, (in NAG:-h03abc) external linking: error loading external library libnagc_nag.dylib: dlopen(libnagc_nag.dylib, 129): image not found 

I've installed NAG C Library in usr/Library

Thank you very much for your help 

Further tags : implicit form, Matlab codegen for GPOPS purposes

Hi there,

I would like to introduce my self and ask you for an advice. 

I have a four linked robot that i would really like to control by the meaning of the optimal control theory. The arm has 4 actuators (giving torques U) in corrispondence of 4 rotational joints. P parameters describe the system.

I got ht edynamic system with the Lagrangian method and now I have 4 2nd order...

So currently i am trying to programm a game. for that i would need a Textbox that is updating once the player makes an input. I have a textbox TB1 and a button with the action linked. the action that the button should make is calling an external procedure which in turn updates the textbox. But i currently i keep getting the following error expresion:

Error, (in Maplets:-Tools:-Set) invalid argument(s): [TB1]::string = [7, 8, 9]

So what die i do wrong.

How to write notation for logical induction programming in Maple like F# or Haskell having tuples?

such as 

Conj(A,Disj(B,C)) ...

I am trying to get Maple 16.02 to evaluate

cos(Pi/4 - I*ln(2))

using exactly the syntax I just typed.  The correct answer is 3/4 + I/4.  I cannot get Maple to give me this correct, simplified answer.  I have tried "expand", "simplify", and "value", and I get garbage containing terms such as

"sinh((1/2)*ln(2))".

How can I force Maple to give me the simplest answer?