Skip to main content
added 105 characters in body
Source Link
bill s
  • 69.7k
  • 4
  • 103
  • 198

One way to smooth things is to use an appropriate interpolating order: with random points. The ends can be flattened out with the Hamming Window.

points = Flatten[{HammingWindow[Range[-0.7, 0.7, 0.1]] RandomReal[{0, 1}, 10], 0}]; 15];
Plot[Interpolation[points, InterpolationOrder -> 5][t]3][t], {t, 1, 12Length[points]}]

enter image description hereenter image description here

One way to smooth things is to use an appropriate interpolating order:

points = Flatten[{0, RandomReal[{0, 1}, 10], 0}]; 
Plot[Interpolation[points, InterpolationOrder -> 5][t], {t, 1, 12}]

enter image description here

One way to smooth things is to use an appropriate interpolating order with random points. The ends can be flattened out with the Hamming Window.

points = HammingWindow[Range[-0.7, 0.7, 0.1]] RandomReal[{0, 1}, 15];
Plot[Interpolation[points, InterpolationOrder -> 3][t], {t, 1, Length[points]}]

enter image description here

Source Link
bill s
  • 69.7k
  • 4
  • 103
  • 198

One way to smooth things is to use an appropriate interpolating order:

points = Flatten[{0, RandomReal[{0, 1}, 10], 0}]; 
Plot[Interpolation[points, InterpolationOrder -> 5][t], {t, 1, 12}]

enter image description here