Simple high pass filter
moving_average(x, order)
x
the vector or time-series
order
the order of the filter