dcast с оператором if в r - PullRequest
0 голосов
/ 23 мая 2018

Я пытаюсь изменить форму данных

cust_id<-sample(1:20,size = 100,replace = T)
prod_id<-sample(1:10,size=100,replace = T)
prod_id<-paste0("prodid",prod_id)
atm<-sample(1:10,size=100,replace = T)*100
atm[(sample(1:100,size=30,replace =F ))]<-0
sales<-data.frame(cust_id,prod_id,atm)  
sales

вот данные о продажах, если я хочу изменить data.frame следующим образом

(если atm> 0 по cust_id, prod_idзатем value = 1 и atm <0 по cust_id, prod_id затем value = 0) </p>

           cust_id prod_id1  prod_id2 prod_id3 prod_id4 ....
              1      1          0        1       0
              11     0          0        0       1
              23     0          0        1       0
              5      1          1        1       1

Я попытался сделать это с помощью функции dcast.но я не могу использовать оператор if в dcast.

, пожалуйста, помогите ...

...