MathGroup Archive 2004

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

Search the Archive

RE: interpolation

  • To: mathgroup at smc.vnet.net
  • Subject: [mg46999] RE: [mg46979] interpolation
  • From: David.Annetts at csiro.au
  • Date: Fri, 19 Mar 2004 01:35:52 -0500 (EST)
  • Sender: owner-wri-mathgroup at wolfram.com

Hi Amanda,

> Is there a way to get Mathematica to display the function it
> uses to interpolate a data set (call it inp)
> of the form {Number, Number}?
> A command like f=Interpolation[inp], for example, just gives assigns
> this rule to a function I am calling f.
> Is there any way to display this function f that interpolates my data 
> set, as a function of an independent variable, rather than just
> have Mathematica generate values of f given a picked 
> numerical domain value?

The obvious way is to create a table from the InterpolatingFunction ...

ord = Range[10];
abs = ord[[#]]^2 & /@ Range[10];
int = Interpolation[Transpose[{ord, abs}]]
val = {#, int[#]} & /@ Range[10]

Another way is via NumericalMaths`Spline ...

Needs["NumericalMath`"]
spl = SplineFit[Transpose[{ord, abs}], Cubic]
val = spl[#] & /@ Range[0, 9]

You can even try 
val = spl[#] & /@ Range[0, 9, .5]
But this will be in error between the sampled points -- continuing the
above example
dif = {#[[1]], Sqrt[#[[2]]]} & /@ val

Regards,

Dave.
==========================================
  Dr. David Annetts
  EM Modelling Analyst
  CSIRO DEM            Tel: +612 9490 5416
  North Ryde           Fax: +612 9490 5467
  Australia         David.Annetts at csiro.au
===========================================


  • Prev by Date: RE: Exact real solutions of cubic equations
  • Next by Date: Re: List of solution
  • Previous by thread: interpolation
  • Next by thread: Re: interpolation