@Markiyan Hirnyk 

Thank you for the quick answer,

I expect the result to be gaussian like because the fourier transform of a gaussian is another gaussian!

DId you do changes to the program, I do not get the same graph that you showed me?

Here is what I get

> plot(X, Y2, style = point);