aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions
RosettaCodeData/Task/Caesar-cipher/Mathematica/caesar-cipher.math
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

1 line
133 B
Text
Raw Blame History

cypher[mesg_String,n_Integer]:=StringReplace[mesg,Flatten[Thread[Rule[#,RotateLeft[#,3]]]&/@CharacterRange@@@{{"a","z"},{"A","Z"}}]]
Reference in a new issue View git blame Copy permalink