# NOT RUN {
Q <- matrix(c(1,0,1,1,0,1,1,0), nrow = 2, ncol = 4)
models <- build_vae_independent(4, 2, Q,
enc_hid_arch = c(6, 3), hid_enc_activation = c('sigmoid', 'relu'),
output_activation = 'tanh', kl_weight = 0.1)
models <- build_vae_independent(4, 2, Q)
vae <- models[[3]]
# }
Run the code above in your browser using DataLab