Question: speed up fsolve ...

Hi all, my maple will crash when calculating this sheet.. Any help here?
 

``

``

restart

``

Digits := 15

15

(1)

NULL

NULL

``

c := .95

.95

(2)

``

theta := .9

.9

(3)

k := 1

1

(4)

p_l := 10^(-15)

1/1000000000000000``

(5)

n := 10^10

10000000000

(6)

``

fsolve(c = p_l^k*(1-p_l)^(n-k)*theta/(p_l^k*(1-p_l)^(n-k)*theta+p^k*(1-p)^n*(1-theta)), p = 10^(-6), 1.09*10^(-10) .. .1)

``

``

``

NULL

``

``

``

``

``

``

``

``

``

``

``

``


 

Download test.mw

Please Wait...