comp.lang.idl-pvwave archive: archive » Re: FFT in 1 dimension

Home » Public Forums » archive » Re: FFT in 1 dimension

Show: Today's Messages :: Show Polls :: Message Navigator
E-mail to friend

Re: FFT in 1 dimension [message #28500 is a reply to message #28498]

Fri, 07 December 2001 11:05

hradilv.nospam
Messages: 19
Registered: November 2001

Junior Member

Here's what I came up with. Any comments?

function ft1d, data, dim, inverse=inverse

ds = size(data)
ndim = ds[0]
nlines = n_elements(data)/ds[dim]

dims = lindgen(ndim)+1
dims[dim-1] = -1
porder = sort(dims)

fdata = transpose(data,porder)
fdata = reform(fdata,ds[dim],nlines)

for i=0, nlines-1 do fdata[*,i] = fft(fdata[*,i],inverse=inverse)

porder = (ds[1:ndim])[sort(dims)]
fdata = reform(fdata,porder)
fdata = transpose(fdata,sort(porder))

return, fdata
end

Report message to a moderator

[Message index]

		Re: FFT in 1 dimension By: Paul Woodford on Fri, 07 December 2001 20:09
		Re: FFT in 1 dimension By: Wayne Landsman on Fri, 07 December 2001 13:41
		Re: FFT in 1 dimension By: hradilv.nospam on Fri, 07 December 2001 12:10
		Re: FFT in 1 dimension By: hradilv.nospam on Fri, 07 December 2001 11:05

Previous Topic:	Re: go button
Next Topic:	fontpath in RH 7.2. PV-WAVE confused

-=] Back to Top [=-

[ Syndicate this forum (XML) ] [

] [

]

Current Time: Wed Oct 08 16:08:05 PDT 2025

Total time taken to generate the page: 0.00290 seconds