cypher_decode. — cypher_decode • cypher

decode a secret message.

Usage

cypher_decode(x)

Arguments

x: coded text

Value

decoded message

Examples

xx <- cypher_code("This is a secret coded message")
#> Error in substr(cyphers[cn], 1, nchar(x)): object 'cyphers' not found
xx
#> Error in eval(expr, envir, enclos): object 'xx' not found
cypher_decode(xx)
#> Error in strsplit(x, split = " "): object 'xx' not found