# NOT RUN {
library(DominoPredictionLogging)
prediction_client <- PredictionClient(
feature_names = c("sepal.length", "sepal.width", "petal.length"),
predict_names = c("variety")
)
prediction_client$record(
feature_values = c(sepal_length, sepal_width, petal_length),
predict_values = c(predicted_value),
event_id = event_id
)
# }
Run the code above in your browser using DataLab