Services & ResourcesWolfram ForumsMathGroup Archive

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

Inverse Interpolation

• To: mathgroup at smc.vnet.net
• Subject: [mg120944] Inverse Interpolation
• From: WetBlanket <wyvern864 at gmail.com>
• Date: Thu, 18 Aug 2011 03:22:52 -0400 (EDT)
• Delivered-to: l-mathgroup@mail-archive0.wolfram.com

Previously, the following code could be used to use the Plot functions
algorithm to select point at which to evaluate a function to assist in
obtaining a good numerical interpolation.  In Version 8 this code does
not seem to work ( at least for me).  Can someone assist me by showing
how this task is best accomplished in Version 8.  I use the Cos
function in this example for simplicity.  Clearly, numerical
interpolation is not needed to obtain an inverse for the Cos.

list={};
F = Cos[x];

Plot[ (  ss=F;  AppendTo[list, {ss,x}]; ss), {x,-1,1}, PlotPoints-
>1000,
PlotRange->All, AxesLabel->{"x","F"}]

Thanks for the help.

• Follow-Ups:
  • Re: Inverse Interpolation
    • From: DrMajorBob <btreat1@austin.rr.com>
  • Re: Inverse Interpolation
    • From: Fred Simons <f.h.simons@tue.nl>
  • Re: Inverse Interpolation
    • From: Heike Gramberg <heike.gramberg@gmail.com>