R Tensorflow Discrete Predictions