wavenumbers = seq(400, 1000, length.out = 16)
dataset = list(
data = cbind(
sample1 = sin(seq(0, 2 * pi, length.out = 16)),
sample2 = cos(seq(0, 2 * pi, length.out = 16))
),
wavenumbers = wavenumbers
)
transformed = raman_transform_fourier(dataset)
dim(transformed$fourier$data)
Run the code above in your browser using DataLab