RFM分析-在R.Missing列中使用ddply

Question

I am trying to use the code mentioned for RFM modelling in R from the blog here . However, grouping the data frame into “Buy” and “No Buy” has not been explained clearly. As a result, when I try to execute the function getPercentages , I get error like:

object "Buy" not found.

I am trying to add a Buy column as follows: df$Buy <- ifelse(df$Frequency > 1, 1, 0) before executing the function. I do not know if this is right way to get the values. My head for df after getDataframe is

    ID       Date  Amount Recency Frequency  Monetary 
1207779 2016-06-22 2112.00       8        20 1576.7725
2455590 2016-06-26 1064.00       4        16 1074.8400
2660337 2016-06-21 1870.00       9        20 1616.1700
 257997 2016-06-22  616.00       8        22  684.8968
 963883 2016-06-27  703.12       3        16  626.1125
1124489 2016-06-21  594.15       9        18  752.2011

Answer 1

Try this :

Buy<-rep(0,nrow(dftry))
dftry<-cbind(dftry,Buy)