Mathematica 9 is now available
Services & Resources / Wolfram Forums
-----
 /
MathGroup Archive
2002
*January
*February
*March
*April
*May
*June
*July
*August
*September
*October
*November
*December
*Archive Index
*Ask about this page
*Print this page
*Give us feedback
*Sign up for the Wolfram Insider

MathGroup Archive 2002

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

Search the Archive

RE: Increased Precision in Plot?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg34695] RE: [mg34684] Increased Precision in Plot?
  • From: "DrBob" <majort at cox-internet.com>
  • Date: Sat, 1 Jun 2002 04:29:00 -0400 (EDT)
  • Reply-to: <drbob at bigfoot.com>
  • Sender: owner-wri-mathgroup at wolfram.com

The results aren't nonsense; the problem is.  You're wandering into
"chaos" country.

Bobby Treat

-----Original Message-----
From: Selwyn Hollis [mailto:shollis at armstrong.edu] 
To: mathgroup at smc.vnet.net
Subject: [mg34695] [mg34684] Increased Precision in Plot?

The command

f[t_]=Nest[1 - Integrate[2s(#/.t->s),{s, 0, t}]&, Cos[t],
12]//Simplify

returns a fairly innocent-looking result. However, evaluation (or
plotting) of the result with default precision produces garbage; for
example:

In[1]:= f[.5]
Out[1]:= 0.875

In[2]:= N[f[1/2]]
Out[2]:= 0.625

In[3]:= N[f[1/2],17]
Out[3]:= 0.77880078307140487

My question is this: How can I get Plot to graph such a function with
increased precision, so that the graph isn't overwhelmed by noise?

Thanks in advance,

Selwyn Hollis





  • Prev by Date: Re: Increased Precision in Plot?
  • Next by Date: RE: Re: Function as an argument of the function
  • Previous by thread: Re: Increased Precision in Plot?
  • Next by thread: Re: Increased Precision in Plot?