Я пытаюсь изменить форму данных
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.
, пожалуйста, помогите ...