@janhardo 

I am stunned by the beauty of this program !

It exactly mimics the function Position in Mathematica.

Tchüss,

JM

@janhardo 

That's the hell of an excellent way for "position".

However i have to ponder a bit on the proc. beautifully writen.

this *is* Maple programming.

Best,

JM

@Kitonum 

At least I have learnt a lot of things today.

Many thanks.

JM

@KonstantinW 

Fantastic and out of the box.

Thank you,

JM

@Kitonum 

hello Kitonum,

This doesn't work as Position.

M := [[1, a], a, [[3 + a]], 2*a - 1];
              M := [[1, a], a, [[3 + a]], 2 a - 1]

Search(a, M);
                               2  

SearchAll(a, M);
                               2

Search(3, M);
                               0

Search(1, M);
                               0

I don't understand what I do wrong

JM

@acer 

Thanks Acer...so far ..so good.

Wonderfull example.

JM

@Kitonum 

Many thanks Kitonium :)

JM

@Kitonum 

Hi Kitonum,

What is the Maple equivalent of Mathematica's Position ?

M := {1, a, {c}, {2 + a}, {{{a}}}, {1 + a}}

MatrixQ[M]

False

Position[M, a]

{{2}, {4, 1, 2}, {5, 1, 1, 1}, {6, 1, 2}}    et voilà :)

Thanks,

JM

@nm 

Hello again nm,

This is a question of terminology.

M above is not a matrix but...MatrixForm returns a correct answer.

So what is the point to "matrixform" something which is not a matrix?

"math"ematica is at least incoherent.

JM

@nm 

Thank you nm this closes my question :)

Regards,

JM

@dharr 

running your worksheet I have :

error (in dsolve/numeric/BVPSolve) matrix is singular.

JM

@Kitonum 

I think you couldn't make it better :)

thanks a lot

JM

@Kitonum 

hello kitonium,

it was useful to help me.

here is what i wanted to do :

l := x -> Generate(float(range = -sin(x) .. cos(x)));
l := proc (x) options operator, arrow; RandomTools:-Generate(flo\

  at(range = -sin(x) .. cos(x))) end proc

l(0);
                       0.8872250779482327

l(Pi/2);
                      -0.06168237488248558

plot('l(x)', x = -Pi .. Pi);

and it works correctly.

we "almost" have the graph of sin(x) or cos(x) but with some (white?) noise.

anyway i am not a probabilist nor a statistician.

thanks,

JM

@nm 

Thanks a lot nm. it does solve my little problem.

I didn"t think about evaluation.

IN "math"-ematica it is straitforward :

f[x_]:=RandomReal[{0,x}] then Plot. but from now on i will forget "math"ematica.

JM

@acer 

Acer I have Maple French Edition and the menus are...half in English and half in French...(rather strange idea)

So I was quite confused how to show all palettes.

But now I have "everything" and I can continue working with Maple.

Thank you so much acer :)

Jean-Michel