Rパッケージケラスがモデルをコンパイルしているかどうかを確認

Question

次のRスクリプトを実行すると、ケラスモデルと追加されたレイヤーに関する概要情報が表示されますが、モデルがコンパイルされたことは確認されません。コンパイルステップが完了したかどうかを確認するにはどうすればよいですか？

library(keras) 

model <- keras_model_sequential() 

model %>% 
    layer_dense(units = 64, activation = 'relu', input_shape = c(20)) %>% 
    layer_dropout(rate = 0.5) %>% 
    layer_dense(units = 64, activation = 'relu') %>% 
    layer_dropout(rate = 0.5) %>% 
    layer_dense(units = 10, activation = 'softmax') %>% 
    compile(
    loss = 'categorical_crossentropy', 
    optimizer = optimizer_sgd(lr = 0.01, decay = 1e-6, 
    momentum = 0.9, nesterov = TRUE), 
    metrics = c('accuracy')  
    ) 

summary(model) 

Answer 1

ビルドフラグを確認しますか？

library(keras) 
model <- keras_model_sequential() 

model$built # False 

model %>% 
    layer_dense(units = 64, activation = 'relu', input_shape = c(20)) %>% 
    layer_dropout(rate = 0.5) %>% 
    layer_dense(units = 64, activation = 'relu') %>% 
    layer_dropout(rate = 0.5) %>% 
    layer_activation(activation = 'relu') %>% 
    layer_dense(units = 10) %>% 
    layer_activation(activation = 'softmax') 

model$built # False 

model %>% 
    compile(
    loss = 'categorical_crossentropy', 
    optimizer = optimizer_sgd(lr = 0.01, decay = 1e-6, 
          momentum = 0.9, nesterov = TRUE), 
    metrics = c('accuracy')  
) 

model$built # True