我有一个维度为 Nx*Ny*Nz 的真实 3D 数组,并希望使用 FFTW对每个 z 值进行 2D 傅里叶变换。这里 z 索引是内存中变化最快的。目前,以下代码按预期工作:
int Nx = 16; int Ny = 8; int Nz = 3;
// allocate memory
const int dims = Nx * Ny * Nz;
// input data (pre Fourier transform)
double *input = fftw_alloc_real(dims);
// why is this the required output size?
const int outdims = Nx * (Ny/2 + 1) * Nz;
// we want to perform the transform out of place
// (so seperate array for output)
fftw_complex *output = fftw_alloc_complex(outdims);
// setup "plans" for forward and backward transforms
const int rank = 2; const int howmany = Nz;
const int istride = Nz; const int ostride = Nz;
const int idist = 1; const int odist = 1;
int n[] = {Nx, Ny};
int *inembed = NULL, *onembed = NULL;
fftw_plan fp = fftw_plan_many_dft_r2c(rank, n, howmany,
input, inembed, istride, idist,
output, onembed, ostride, odist,
FFTW_PATIENT);
fftw_plan bp = fftw_plan_many_dft_c2r(rank, n, howmany,
output, onembed, ostride, odist,
input, inembed, istride, idist,
FFTW_PATIENT);
outdims = (Nx/2 + 1)*(Ny/2 + 1)*Nz
据我了解,转换长度为 N 的 1D 序列需要 (N/2 + 1) 个复数值,那么如果我设置为 2D 转换所期望的那样,为什么上面的代码会崩溃?
其次,我认为我可以qx = 0 to Nx/2
使用以下方法从(包括)访问模式的实部和虚部是否正确:
#define outputRe(qx,qy,d) ( output[(d) + Nz * ((qy) + (Ny/2 + 1) * (qx))][0] )
#define outputIm(qx,qy,d) ( output[(d) + Nz * ((qy) + (Ny/2 + 1) * (qx))][1] )
编辑:为那些想要玩的人提供完整的代码和Makefile 。假设已安装 fftw 和 gsl。
EDIT2:如果我理解正确,索引(允许正频率和负频率)应该是(对于宏来说可能太混乱了!):
#define outputRe(qx,qy,d) ( output[(d) + Nz * ((qy) + (Ny/2 + 1) * ( ((qx) >= 0) ? (qx) : (Nx + (qx)) ) ) ][0] )
#define outputIm(qx,qy,d) ( output[(d) + Nz * ((qy) + (Ny/2 + 1) * ( ((qx) >= 0) ? (qx) : (Nx + (qx)) ) ) ][1] )
for (int qx = -Nx/2; qx < Nx/2; ++qx)
for (int qy = 0; qy <= Ny/2; ++qy)
outputRe(qx, qy, d) = ...
其中outputRe(-Nx/2, qy, d)
指向与 相同的数据outputRe(Nx/2, qy, d)
。在实践中,我可能只是循环第一个索引并转换为频率,而不是反过来!