ZENIT-POLAR substitution cipher method of encryption

Source: R/encryption.R

Returns a message encrypted by ZENIT-POLAR substitution cipher method of encryption using by default TENIS-POLAR key.

encryption(x, key_from = "tenis", key_to = "polar")

Arguments

x

message to encrypt
key_from

first one-way cipher
key_to

second one-way cipher

Value

encrypted message

Details

This kind of encryption replace the nth character of 1th key to the nth character of 2nd key and vice versa.

Examples


x <- "orro o um psibinhe tisi er kisir: e ivorre der ceseir, e celpsisae der cisopir!"
encryption(x, key_from = "polar", key_to = "tenis")
#> [1] "esse e um trabalho para os karas: o avesso dos coroas, o contrario dos caretas!"