tests/testthat/greedy/test_z_for.R

In langfob/bdpg: Package For Building and Testing Biodiversity Problem Generators

#===============================================================================

                            #  test_z_for.R

#===============================================================================

options(warn=2)
library (bdpg)

source ("/Users/bill/D/Projects/ProblemDifficulty/pkgs/bdpg/R/test_greedy_reserve_selection.R")  #  for gen_dummy_bpm()
source ("/Users/bill/D/Projects/ProblemDifficulty/pkgs/bdpg/R/greedy_reserve_selection.R")  #  for gen_dummy_bpm()
source ("/Users/bill/D/Projects/ProblemDifficulty/pkgs/bdpg/R/do_zonation_analysis_and_output.R")
source ("/Users/bill/D/Projects/ProblemDifficulty/pkgs/bdpg/R/test_z.R")
source ("/Users/bill/D/Projects/ProblemDifficulty/pkgs/bdpg/R/z_using_for.R")

verbose = FALSE

zmeths = "for"

#zu =test_z (zmeths, seed = 456, num_spp = 4, num_PUs = 3)
#zu =test_z (zmeths, seed = 456, num_spp = 20, num_PUs = 15)
#zu =test_z (zmeths, seed = 456, num_spp = 40, num_PUs = 30)
#  VEEEEEERY SLOW  #  zu =test_z (zmeths, seed = 456, num_spp = 400, num_PUs = 300)

zu =test_z (zmeths, seed = 1223, num_spp = 6, num_PUs = 5)

cat ("\n")
print (zu)

#===============================================================================