Change e letters to i in words: Difference between revisions

m
→‎{{header|R}}: Syntax highlighting.
m (omit)
m (→‎{{header|R}}: Syntax highlighting.)
Line 1,687:
 
=={{header|R}}==
<lang Rrsplus>dict <- scan("https://web.archive.org/web/20180611003215/http://www.puzzlers.org/pub/wordlists/unixdict.txt", what = character())
changed <- chartr("e", "i", dict)
cbind(old = dict, new = changed)[changed != dict & changed %in% dict & nchar(changed) > 5, ]</lang>
331

edits