Mathematica 9 is now available
Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2011

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

Search the Archive

Re: How to eliminate noises?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg122598] Re: How to eliminate noises?
  • From: "Oleksandr Rasputinov" <oleksandr_rasputinov at hmamail.com>
  • Date: Thu, 3 Nov 2011 03:43:46 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • References: <j8r98c$3hp$1@smc.vnet.net>

On Wed, 02 Nov 2011 11:23:56 -0000, 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}]
>

Work in 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
]



  • Prev by Date: Re: Bernoulli Numbers
  • Next by Date: Re: iteration question
  • Previous by thread: Re: How to eliminate noises?
  • Next by thread: Re: How to eliminate noises?