Re: How to interpolate vectors?

• To: mathgroup at smc.vnet.net
• Subject: [mg112909] Re: How to interpolate vectors?
• From: Patrick Scheibe <pscheibe at trm.uni-leipzig.de>
• Date: Tue, 5 Oct 2010 05:36:57 -0400 (EDT)
• References: <201010050704.DAA11542@smc.vnet.net>

Hi,

interpolate the x-values and the y-values separately and use the
two interpolating functions to create your resampling:

data = Table[{y, -x}, {x, -3, 3, 6/31.}, {y, -3, 3, 6/31.}];
Block[{ipx, ipy}, {ipx, ipy} =
ListInterpolation[#, {{-3, 3}, {-3, 3}}] & /@
Transpose[data, {3, 2, 1}];
datanew =
Table[Through[{ipx, ipy}[y, x]], {x, -3, 3, 6/7.}, {y, -3, 3,
6/7.}]];
ListLineIntegralConvolutionPlot[#, StreamStyle -> White,
StreamPoints -> 20, ColorFunction -> "AvocadoColors",
PlotLabel ->
Style["Dimension: " <> ToString[Dimensions[#]], Blue,
FontFamily -> "Helvetica"]] & /@ {data, datanew}

Cheers
Patrick

On Tue, 2010-10-05 at 03:04 -0400, Szymon Roziewski wrote:
> Hello there,
> Does anybody know how to interpolate vector data e.g. wind data?
> For example I have wind data on grid 448 columns and 615 rows and I need
> this on grid 132x145.
> Does Mathematica provide such a function or maybe someone has that.
>
>
> Kind regards
> Szymon Roziewski
>
>

• Prev by Date: Re: Plotting a function dynamically in a loop
• Next by Date: Re: How to apply a list of functions
• Previous by thread: How to interpolate vectors?
• Next by thread: How to interpolate vectors?