An easy way to RFM analysis in R