Paste a list of SNPs in a consistent way to create a model name

Paste a list of SNPs in a consistent way to create a model name

makestr(x)

Arguments

x

character vector

Value

character object

Examples

SNPS1 <- sample(letters[1:10])
SNPS2 <- sample(letters[1:10])
SNPS1
#>  [1] "a" "h" "e" "b" "j" "c" "g" "f" "d" "i"
SNPS2
#>  [1] "i" "b" "a" "c" "g" "h" "j" "e" "f" "d"
GUESSFM:::makestr(SNPS1)
#> [1] "a%b%c%d%e%f%g%h%i%j"
GUESSFM:::makestr(SNPS2)
#> [1] "a%b%c%d%e%f%g%h%i%j"