inst/test-tools.R

In cluster: "Finding Groups in Data": Cluster Analysis Extended Rousseeuw et al.

#### Will be sourced by several R scripts in ../tests/

### ------- General test "tools" (from the Matrix package):
### ==> 'Suggests: Matrix' in ../DESCRIPTION
loadNamespace("Matrix", lib.loc = .Library)# needed (e.g. for MM's setup)
source(system.file("test-tools-1.R", package = "Matrix", lib.loc = .Library),
       keep.source = FALSE)

if(doExtras <- cluster:::doExtras())## from ../R/0aaa.R
    cat("doExtras <- cluster:::doExtras() :  TRUE\n")