Для отладки моего R-кода я пытаюсь отследить вызовы функции R fft() (быстрое преобразование Фурье) из библиотеки stats.Могу ли я позвонить C_fft, fftmx() и fft_work() немедленно из R?
Из файла src/library/stats/R/fft.R:
fft <- function(z, inverse=FALSE) .Call(C_fft, z, inverse)
C_fft определенов файле src/library/stats/src/fourier.c:
SEXP fft(SEXP z, SEXP inverse)
Логика реализована в fftmx() и fft_work(), определенных в src/library/stats/src/fft.c:
static void fftmx(double *a, double *b, int ntot, int n, int nspan, int isn,
int m, int kt, double *at, double *ck, double *bt, double *sk,
int *np, int *nfac)
...
Пока что я пробовал .Call(C_fft, z, inverse) и dyn.load("stats.dll") безрезультатно.