Find words whose first and last three letters are equal: Difference between revisions
Content added Content deleted
Alextretyak (talk | contribs) (Added 11l) |
ReeceGoding (talk | contribs) m (→{{header|R}}: Syntax highlighting.) |
||
Line 645: | Line 645: | ||
=={{header|R}}== |
=={{header|R}}== |
||
<lang |
<lang rsplus>dict <- scan("https://web.archive.org/web/20180611003215/http://www.puzzlers.org/pub/wordlists/unixdict.txt", what = character()) |
||
dict[nchar(dict) > 5 & substr(dict, 1, 3) == substr(dict, nchar(dict) - 2, nchar(dict))]</lang> |
dict[nchar(dict) > 5 & substr(dict, 1, 3) == substr(dict, nchar(dict) - 2, nchar(dict))]</lang> |
||