cc = function(string, n) { chartr(paste(letters, collapse = ""), paste(letters[n:(n + 25) %% 26 + 1], collapse = ""), string) } cc("pizzapizzapizza", 2)
To embed this project on your website, copy the following code and paste it into your website's HTML: