Obtain a summary of a Code's test results

# S3 method for TestList
summary(object, ...)

Arguments

object	TestList object of Code
...	Additional parameters

Value

list of Test summary

Examples

data(RS.data)
rs = RS.data
newcode = create.code(name = "Data",
    expressions = c("number","data"), excerpts = rs$text)
newcode <- handcode(newcode, this.set = 10:15, results = 0)
newcode = test(code = newcode, kappa_threshold = 0.65)
summary(newcode$statistics)
#> 
#> Test Set
#> ----------------------------------------
#> kappa	| rho	| N
#> ----------------------------------------
#> 1.00	| 0.36	| 6
#> ----------------------------------------
#> 
#> Training Set
#> ----------------------------------------
#> kappa	| N
#> ----------------------------------------
#> 0.00	| 
#> ----------------------------------------
#>