encryption {tenispolaR}

ZENIT-POLAR substitution cipher method of encryption

Description

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

Usage

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

Details

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

Value

encrypted message

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")