tenispolaR (version 0.1.4)

encryption: 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

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

# NOT RUN {
x <- "orro o um psibinhe tisi er kisir: e ivorre der ceseir, e celpsisae der cisopir!"
encryption(x, key_from = "polar", key_to = "tenis")

# }