hi

 

i made an implementation of the euklid algo (rekusiv and iterativ) und meassured the time that was needed to calculate the gcd. even for big numbers really fast, but if i use the maple command igcd i get a runtime that is far longer then the time i get with my own implementation.

how does that come ? what algo does maple use the calculate the gcd ?

anyone knows?

thx for reply

hi

i've 40 samples which i should split up in 5 classes with a width of 0.5

i used TallyInto for doing this:

with(Statistics):with(ArrayTools):with(plots): with(plottools):
A:= <10.1, 10.6, 10.9, 10.0, 10.4, 10.5, 9.7, 10.5, 10.4, 10.1, 10.8, 9.2, 10.2, 10.3, 10.5, 9.2, 10.2, 10.5, 9.4, 10.2, 9.6, 10.2, 9.7, 10.2, 10.8, 9.9, 10.5, 10.6, 9.8, 10.7, 11.2, 10.8, 9.0, 10.0, 10.5, 10.4, 11.4,10.4, 10.1, 10.4>;
TallyInto(A, [9.0..9.5,9.6..10.0, 10.1..10.5, 10.6..11.0, 11.1..11.5], bins=5);

<p>hi,</p>
<p>i tried to write a maple procedure that creates a prefix free tree based on the algorithmen of Shannon-Fano. the theory how the algorithm works is easy but for translating that into a maple procedure causes me headaches.</p>
<p>right now im stuck in the part where i have to split the characters i got until i only have one left. i suppose until that point my procedure might be ok but i how do i continue now? i lack the maple know-how to get further now....and i suppose i did already things wrong because i don't know how to save my nodes</p>

hi

i have a directed graph and i have to find all possible ways from a Node to another. with which command can maple calculate all possibel ways?

 

i just found only a command for minimal spannin tree, but my edges are not weighted.

hi

i have to calculate a extreme value for a box that is open on one side that should have a volume of 32.

V = x * y*z

For the surface ob the box-sides i used this function:

O = 2xz + xy + 2yz

my idea was to solve this in maple using lagrange because i ve a side condition

with(RealDomain):
L:=(x,y,lambda)->x*y + 2*x*z * 2*y*z +lambda*(x*y*z-32);
solve({diff(L(x,y,lambda),x)=0, diff(L(x,y,lambda),y)=0, diff(L(x,y,lambda),lambda)=0});
evalf(%);

it gives me for my values x = 32/x*y; y = y; z =z