Skip to content

Commit

Permalink
remove functions that are deleted.
Browse files Browse the repository at this point in the history
  • Loading branch information
wendycwong committed Oct 23, 2024
1 parent a473673 commit fa0559a
Show file tree
Hide file tree
Showing 2 changed files with 0 additions and 61 deletions.
57 changes: 0 additions & 57 deletions h2o-r/tests/testdir_algos/hglm/runit_GH_8487_HGLM_testAgainstR1.R

This file was deleted.

4 changes: 0 additions & 4 deletions h2o-r/tests/testdir_algos/hglm/runit_GH_8487_coefs_check.R
Original file line number Diff line number Diff line change
Expand Up @@ -15,10 +15,8 @@ test.HGLMData1 <- function() {
seed=12345, max_iterations=10, em_epsilon=0.0000001, random_intercept=TRUE)
coeff <- h2o.coef(hglm_model)
coeff_random_effects <- h2o.coef_random(hglm_model)
coeff_random_effects_norm <- h2o.coef_random_norm(hglm_model)
level_2_names <- h2o.level_2_names(hglm_model)
coefs_random_names <- h2o.coefs_random_names(hglm_model)
coefs_random_names_norm <- h2o.coefs_random_names_norm(hglm_model)
scoring_history <- h2o.scoring_history(hglm_model)
t_mat <- h2o.matrix_T(hglm_model)
residual_var <- h2o.residual_variance(hglm_model)
Expand All @@ -29,9 +27,7 @@ test.HGLMData1 <- function() {
expect_true(mse < mean_res_fixed)
expect_true(length(icc)==length(coeff))
expect_true(length(level_2_names)*length(coefs_random_names) == length(coeff_random_effects))
expect_true(length(coeff_random_effects) == length(coeff_random_effects_norm))
expect_true(residual_var < mean_res_fixed)
expect_true(length(t_mat) == length(coefs_random_names)*length(coefs_random_names_norm))
expect_true(length(scoring_history[[1]]) <= 10)
print(hglm_model)
}
Expand Down

0 comments on commit fa0559a

Please sign in to comment.