OK

Removing peaks function. Use quantmod::findPeaks