Experimental`'NumericalFunction''
- To: mathgroup at smc.vnet.net
- Subject: [mg115920] Experimental`'NumericalFunction''
- From: tarun dutta <tarunduttaz at gmail.com>
- Date: Wed, 26 Jan 2011 05:03:42 -0500 (EST)
NMinimize::nnum: The function value
Experimental`NumericalFunction[{Hold[prob],Block},{{{},Hold[a[0]]},
{{},Hold[a[1]]},{{},Hold[a[2]]},{{},Hold[a[3]]},{{},Hold[a[4]]},
{{},Hold[a[5]]},{{},Hold[b[0]]},{{},Hold[b[1]]},{{},Hold[b[2]]},
{{},Hold[b[3]]},<<2>>},{{<<1>>}},{<<1>>},{444,<<5>>,None},
{None,None,None}] is not a number at
{a[0],a[1],a[2],a[3],a[4],a[5],b[0],b[1],b[2],b[3],<<2>>} =
{0.304936,0.266141,0.365626,0.132704,0.870404,0.952376,-0.523097,0.275125,-0.797803,0.291049,<<2>>}.
>>
the expression what I am using does not contain any imaginary parts
after simplification,still it shows above error..the expression ( f )
is following-----
d[i_] = a[i] + I*b[i];
f = Together[
Sum[4*p*(Sqrt[i + 1]*d[i]*
conj[d[i + 1]]*(Sum[
Sqrt[i + 1]*conj[d[i]]*d[i + 1], {i, 0, n}]) +
Sqrt[i + 1]*conj[d[i]]*
d[i + 1]*(Sum[
Sqrt[i + 1]*d[i]*conj[d[i + 1]], {i, 0, n}])) + (i (i -
1) - q*i)* d[i]*conj[d[i]], {i, 0, n}]];
so kindly give some valuable insight...
with regards,
tarun