Update keras_example

bkrai · web-flow · commit 340115d97386 · 2021-08-15T12:16:44.000-04:00
diff --git a/keras_example b/keras_example
@@ -45,8 +45,8 @@ model %>% compile(loss = 'categorical_crossentropy',
 fit <- model %>%   
   fit(training, 
   trainLabels, 
-  epochs = 200,
-  batch_size = 32, 
+  epochs = 25,
+  batch_size = 8, 
   validation_split = 0.2)
   plot(fit)
 
