Attach additional StandardScale to already created ScoreTable

Usage

attach_scales(x, scale)

Arguments

x: A ScoreTable object
scale: a StandardScale object or list of multiple StandardScale objects

Examples

# having a ScoreTable with one StandardScale attached
st <- ScoreTable(FrequencyTable(HEXACO_60$HEX_C), STEN)
st$scale
#> $sten
#> <StandardScale>: sten
#> `M`: 5.5 `SD`: 2 `min` 1: `max`: 10
#> 
names(st$table)
#> [1] "score" "n"     "freq"  "quan"  "Z"     "sten" 

# possibly attach more scales to ScoreTable
st <- attach_scales(st, list(STANINE, WECHSLER_IQ))
st$scale
#> $sten
#> <StandardScale>: sten
#> `M`: 5.5 `SD`: 2 `min` 1: `max`: 10
#> 
#> $stanine
#> <StandardScale>: stanine
#> `M`: 5 `SD`: 2 `min` 1: `max`: 9
#> 
#> $wechslerIQ
#> <StandardScale>: wechslerIQ
#> `M`: 100 `SD`: 15 `min` 40: `max`: 160
#> 
names(st$table)
#> [1] "score"      "n"          "freq"       "quan"       "Z"         
#> [6] "sten"       "stanine"    "wechslerIQ"