[Date Index]
[Thread Index]
[Author Index]
Re: NIntegrate to compute LegendreP approximations to functions
*To*: mathgroup at smc.vnet.net
*Subject*: [mg123004] Re: NIntegrate to compute LegendreP approximations to functions
*From*: DrMajorBob <btreat1 at austin.rr.com>
*Date*: Sun, 20 Nov 2011 05:36:18 -0500 (EST)
*Delivered-to*: l-mathgroup@mail-archive0.wolfram.com
Like you (I assume), I was getting a plot that showed the constant term
was wrong.
But now, when I Quit and recompute, the plot is right (without subtracting
1 as I did in an earlier, too-hasty reply).
There's something strange going on!
Bobby
On Sat, 19 Nov 2011 05:46:10 -0600, J. Jes=FAs Rico Melgoza
<jerico at umich.mx> wrote:
> Thanks for the advise. Though, I don't see why the constant term is not
> calculated properly.
> The resulting approximation in
>
> Plot[{u, Sum[c[k] LegendreP[k, t], {k, 0, 20}]}, {t, -1, 1}]
>
> has a different c[0].
> J. Rico
>
>
> El 18/11/2011, a las 06:50, Bob Hanlon escribi=F3:
>
>> Do the integration once.
>>
>> u = Sign[t];
>>
>> c[k_] = Simplify[
>> (2 k + 1)/2 Integrate[u LegendreP[k, t], {t, -1, 1}],
>> Element[k, Integers]]
>>
>> ((1 + 2*k)*Sqrt[Pi])/(2*Gamma[1 - k/2]*Gamma[(3 + k)/2])
>>
>>
>> Bob Hanlon
>>
>>
>> 2011/11/18 "J. Jes=FAs Rico Melgoza" <jerico at umich.mx>:
>>>
>>> Hello
>>> I am approximating general scalar functions via orthogonal series. I am
>>> using LegendreP polynomials.
>>> As an example, I have approximated a Sign function. The coefficients
>>> have been calculated as follows:
>>>
>>> n = 20;
>>> u = Sign[t];
>>> N[Table[(2 k + 1)/2 Integrate[u LegendreP[k, t], {t, -1, 1}], {k, 0,
>>> n}]]
>>>
>>> Everything works well but I would like to speed up computations since
>>> for large values of n, Integrate takes long computations times. I need
>>> to speed up the process since in general I will be approximating
>>> multi-variable functions. I have tried NIntegrate but I get multiple
>>> messages such as
>>>
>>> NIntegrate::slwcon : "Numerical integration converging too slowly;
>>> suspect \
>>> one of the following: singularity, value of the integration is 0,
>>> highly
>>> \
>>> oscillatory integrand, or WorkingPrecision too small.
>>> =91=99=98ButtonBox["
>>> ",
>>> Appearance->{Automatic, None},
>>> BaseStyle->"Link",
>>> ButtonData:>"paclet:ref/message/NIntegrate/slwcon",
>>> ButtonNote->"NIntegrate::slwcon"]"
>>>
>>> NIntegrate is a very complete function in Mathematica, so much that it
>>> has been rather difficult to find an adequate combination of a method
>>> and a strategy of integration that would improve the timing of
>>> Integrate.
>>>
>>> Could anyone give me some advice?
>>>
>>> Jesus Rico-Melgoza
>>
>
>
--
DrMajorBob at yahoo.com
Prev by Date:
**Re: NIntegrate to compute LegendreP approximations to functions**
Next by Date:
**Re: NIntegrate to compute LegendreP approximations to functions**
Previous by thread:
**Re: NIntegrate to compute LegendreP approximations to functions**
Next by thread:
**Re: NIntegrate to compute LegendreP approximations to functions**
| |