Find words whose first and last three letters are equal: Difference between revisions

Added R.
m (Added file closure statement)
(Added R.)
Line 567:
testes
</pre>
 
=={{header|R}}==
<lang R>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>
 
=={{header|Racket}}==
331

edits