From d8c7c1401598ecf9111509a33812d7684f1805a3 Mon Sep 17 00:00:00 2001 From: Michael Hahsler Date: Wed, 23 Feb 2022 16:49:18 -0600 Subject: [PATCH] simplified test. --- tests/testthat/test-solve_POMDP.R | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/tests/testthat/test-solve_POMDP.R b/tests/testthat/test-solve_POMDP.R index fe75caa..6275bce 100644 --- a/tests/testthat/test-solve_POMDP.R +++ b/tests/testthat/test-solve_POMDP.R @@ -6,8 +6,7 @@ context("solve_POMDP") data("Tiger") sol <- solve_POMDP(Tiger) expect_identical(nrow(sol$solution$pg[[1]]), 5L) -#plot_policy_graph(sol, belief = FALSE) -plot_policy_graph(sol, belief = 100) +plot_policy_graph(sol) sol <- solve_POMDP(Tiger, horizon = 3, method = "incprune") expect_identical(length(sol$solution$pg), 3L)