MathGroup Archive 2011

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: How to eliminate noises?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg122625] Re: How to eliminate noises?
  • From: Bob Hanlon <hanlonr357 at gmail.com>
  • Date: Thu, 3 Nov 2011 03:49:02 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <201111021121.GAA03503@smc.vnet.net>

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}]



  • Prev by Date: Re: How to eliminate noises?
  • Next by Date: Re: Mathematica 8.0.4 now available
  • Previous by thread: Re: How to eliminate noises?
  • Next by thread: Re: How to eliminate noises? A better way perhaps.