test_ll_2d <-log_likelihood_generalized_2d(init_params_full,
uu[,1],
uu[,2],
xx_train,
zz_train[,1,],
zz_train[,2,],
"Gaussian")
Run the code above in your browser using DataLab