sco2let {holland}

Convert Holland score profiles to Holland-letter-codes

Description

The function converts a individual (person or environment) score profile consisting of six numerical score values into a Holland-letter code with length varying from 1 to 6 letters.

Usage

sco2let(A, len = 3)

Arguments

A

a numeric vector with Holland score values for the interest profile of length = 6.

len

a integer with values of either 1, 2, 3, 4, 5 or 6 indicating how many letters to return; default is set to len = 3 to return a Holland three-letter code.

Details

The numeric vector containing the score profile (see argument A) should have named numerical values (which is recommended for clarity). In this case, the order of the scores (e.g. names(A) <- c("R","I","A","S","E","C") or names(A) <- c("C","E","S","I","A","R") or any other) in the vector assigned to argument A does not matter. However, a vector with unnamed numerical values can also be used, in which case the assumption is made that the order of the Holland scores (numerical values) follows the scheme names(A) <- c("R","I","A","S","E","C"); see examples below.

Value

a character with the Holland-letter code (in upper case letters).

References

Holland, J.L. (1997). Making vocational choices. A theory of vocational personalities and work environments. Lutz, FL: Psychological Assessment Resources.

Examples

# A fictional interest profile:
A <- c(70, 90, 120, 50, 60, 130)
names(A) <- c("R","I","A","S","E","C")
A
sco2let(A)
# which is the same as ...
A <- c(70, 90, 120, 50, 60, 130); names(A)
A
sco2let(A)
# But see ...
A <- c(70, 90, 120, 50, 60, 130)
names(A) <-c("c","e","s","i","a","r")
A
sco2let(A)
# other length of letter code ...
sco2let(A, len = 1)
sco2let(A, len = 6)
sapply(1:6, function(x){sco2let(A,x)})