6 May 2018 by Member 13658733
for(i in 1:dim(dataset)[1]){ hitlist=trainmy2[trainmy2$VisitNumber==dataset[i,2],] dayofweek=names(hitlist)[3:9][hitlist[1,3:9]>0] dataset[i,dayofweek]=1 hitlist2=Copy_Walmart[Copy_Walmart$VisitNumber==dataset[i,2],] agg=aggregate(ScanCount~DepartmentDescription,data=hitlist2,sum) ...