if (FALSE) {
model <- ggml_model_sequential() |>
ggml_layer_conv_2d(32, c(3,3), activation = "relu",
input_shape = c(28, 28, 1)) |>
ggml_layer_max_pooling_2d(c(2,2)) |>
ggml_layer_flatten() |>
ggml_layer_dense(128, activation = "relu") |>
ggml_layer_dense(10, activation = "softmax")
}
Run the code above in your browser using DataLab