Re: How to eliminate noises?
- To: mathgroup at smc.vnet.net
- Subject: [mg122708] Re: How to eliminate noises?
- From: Barrie Stokes <Barrie.Stokes at newcastle.edu.au>
- Date: Mon, 7 Nov 2011 05:52:01 -0500 (EST)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- References: <201111021121.GAA03503@smc.vnet.net>
Hi Bob
Values of WorkingPrecision of 20 and less give interesting plots in this case. Does one settle on 25 (22 or more seems to work here) by trial and error? (Which very often isn't hard in Mathematica.)
Barrie
>>> On 03/11/2011 at 7:49 pm, in message <201111030849.DAA15344 at smc.vnet.net>, Bob
Hanlon <hanlonr357 at gmail.com> wrote:
> Use higher precision.
>
> Plot[(-1 + 2 n)^2 (-5077311495040 + 256771815840909 n -
> 6285087811295946 n^2 + 99108751736880828 n^3 -
> 1130572436430176064 n^4 + 9932051583279890496 n^5 -
> 69845429986320295296 n^6 + 403489321408322272512 n^7 -
> 1949815250878086761472 n^8 + 7985109816575584026624 n^9 -
> 27976513439837284724736 n^10 + 84423827219928959287296 n^11 -
> 220448430557212109488128 n^12 + 499528909151513065046016 n^13 -
> 983522463480512590086144 n^14 + 1682263859668487045185536 n^15 -
> 2495534893540205641334784 n^16 + 3200240859272788875411456 n^17 -
> 3529950418080000008257536 n^18 + 3325177849291516859645952 n^19 -
> 2648782194444972790382592 n^20 + 1760454182292395183308800 n^21 -
> 958285503480825479430144 n^22 + 416134125894081039040512 n^23 -
> 138626084433937223909376 n^24 + 33263436995017750609920 n^25 -
> 5117451845387346247680 n^26 + 379070507065729351680 n^27), {n,
> 0.35, 0.53}, WorkingPrecision -> 25]
>
>
> Bob Hanlon
>
>
> On Wed, Nov 2, 2011 at 7:21 AM, Artur <grafix at csl.pl> wrote:
>> Plot[ (-1 + 2 n)^2 (-5077311495040 + 256771815840909 n -
>> 6285087811295946 n^2 + 99108751736880828 n^3 -
>> 1130572436430176064 n^4 + 9932051583279890496 n^5 -
>> 69845429986320295296 n^6 + 403489321408322272512 n^7 -
>> 1949815250878086761472 n^8 + 7985109816575584026624 n^9 -
>> 27976513439837284724736 n^10 + 84423827219928959287296 n^11 -
>> 220448430557212109488128 n^12 + 499528909151513065046016 n^13 -
>> 983522463480512590086144 n^14 + 1682263859668487045185536 n^15 -
>> 2495534893540205641334784 n^16 + 3200240859272788875411456 n^17 -
>> 3529950418080000008257536 n^18 + 3325177849291516859645952 n^19 -
>> 2648782194444972790382592 n^20 + 1760454182292395183308800 n^21 -
>> 958285503480825479430144 n^22 + 416134125894081039040512 n^23 -
>> 138626084433937223909376 n^24 + 33263436995017750609920 n^25 -
>> 5117451845387346247680 n^26 + 379070507065729351680 n^27), {n,
>> 0.35, 0.53}]
- References:
- How to eliminate noises?
- From: Artur <grafix@csl.pl>
- How to eliminate noises?