Break the code. K -> O O -> S E -> I ...
Each letter is shifted X positions in the alphabet. This encryption method is sometimes called Caesar chiffre.
Each letter has to be shifted 4 positions to the right in the alphabet. Position 1 (a) has to become position 5 (e).
plyr::mapvalues() (plus some preprocessing) is one way to do it. The builtin "letters" vector is useful.