This function list all layer names of a keras model.
Examples
keras_model <- try(get_keras_model("vss_phn_32"))
if (!inherits(keras_model, "try-error")) {
keras_wrapper(keras_model)$list_layer_name()
}
#> [1] "input_1" "grey_scale" "block1_conv1"
#> [4] "batch_normalization" "activation" "block1_conv2"
#> [7] "batch_normalization_1" "activation_1" "block1_pool"
#> [10] "dropout" "block2_conv1" "batch_normalization_2"
#> [13] "activation_2" "block2_conv2" "batch_normalization_3"
#> [16] "activation_3" "block2_pool" "dropout_1"
#> [19] "block3_conv1" "batch_normalization_4" "activation_4"
#> [22] "block3_conv2" "batch_normalization_5" "activation_5"
#> [25] "block3_conv3" "batch_normalization_6" "activation_6"
#> [28] "block3_pool" "dropout_2" "block4_conv1"
#> [31] "batch_normalization_7" "activation_7" "block4_conv2"
#> [34] "batch_normalization_8" "activation_8" "block4_conv3"
#> [37] "batch_normalization_9" "activation_9" "block4_pool"
#> [40] "dropout_3" "block5_conv1" "batch_normalization_10"
#> [43] "activation_10" "block5_conv2" "batch_normalization_11"
#> [46] "activation_11" "block5_conv3" "batch_normalization_12"
#> [49] "activation_12" "block5_pool" "dropout_4"
#> [52] "global_max_pooling2d" "additional_input" "concatenate"
#> [55] "dense" "dropout_5" "activation_13"
#> [58] "dense_1"