Re: Experimental`'NumericalFunction''
- To: mathgroup at smc.vnet.net
- Subject: [mg115964] Re: Experimental`'NumericalFunction''
- From: DrMajorBob <btreat1 at austin.rr.com>
- Date: Thu, 27 Jan 2011 03:42:46 -0500 (EST)
You didn't tell us what "conj" is or what values "q" and "i" have, and you
didn't show the NMinimize statement.
Bobby
On Wed, 26 Jan 2011 04:03:42 -0600, tarun dutta <tarunduttaz at gmail.com>
wrote:
> 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
>
--
DrMajorBob at yahoo.com