test<-left_join(vol,pri,by=c(\'sku\',\'year\',\'month\')) test<-merge(x = vol, y = pri, by =c("sku","year","month"),all.x=TRUE)