#predict.R
library(data.table)

Training = fread("zhaopin_round1_train_20190716/table3_action", encoding = "UTF-8", fill = T)
Testing = fread("zhaopin_round1_user_exposure_A_20190723", encoding = "UTF-8", fill = T)

Prediction = merge(Testing, Training[, .(satisfied_ratio = mean(satisfied)), .(jd_no)], by = "jd_no", all.x = T)
Prediction[is.na(Prediction)] = 0
Prediction = Prediction[, .(user_id, jd_no, score = satisfied_ratio)]
Prediction = Prediction[order(-score)]

write.csv(Prediction[, .(user_id, jd_no)], "result.csv", row.names = F, quote = F)