ืืื, ืืฉ ืื ืืื ืืืืืื ืฉืื ืืชื ื R ย ืืื ื ืจืืฆื ืืืขืช ืืื ืืืฉืชืืฉ ืืื.
ืื ื ืจืืฆื ืืงืื ื ืชืื ืื ืืจื ืงืืืฅ ROLLOUT.CSV , ืืืจืืฅ ืืช ืืืืื ืฉืื ืืชื ืืฉืืืืืื ืืืื ืืืฉืชื ื ืืชืืื BUYER_FLAG ืชืืืคืก ืืงืืืฅ ืืงืกื
ย
ืืืืื 1 (ืจืืจืกืื ืืืืืกืืืช)
ย
ย
mdl <- glm(formula = BUYER_FLAG ~ . , family= "binomial", data = ds_tr (
y_hat = predict(mdl, data = ds_tr , type = 'response('
ืื ื ืื ืืื ืฉืืงืจืืื ืฉื ืื ืชืื ืื ืชืืื ืืืืคื ืืื:
ds = read.csv(file_path, na.strings="")
ืืื ืืช ds ืื ื ืืชื ืืชืืจ newdata
y_hat = predict(mdl, newdata =ย ds, type = 'response')
y = (ds_te$BUYER_FLAG == 1)
cutoff= (y_hat > 0.5)
ย
ย
ืืื ืื ื ืฉืืคืืช ืืช ืืชืืฆืืืช ืืงืืืฅ ืืงืกื? ืชืืื!
write.csv ืื ย write.table ืืขืฉื ืืช ืืขืืืื
--
You received this message because you are subscribed to the Google Groups "Israel R User Group" group.
To unsubscribe from this group and stop receiving emails from it, send an email to israel-r-user-g...@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
This email has been sent from a virus-free computer protected by Avast. www.avast.com |