Words containing "the" substring: Difference between revisions
+R
Puppydrum64 (talk | contribs) mNo edit summary |
(+R) |
||
Line 1,806:
Stack empty.</lang>
=={{header|R}}==
<lang rsplus>words <- readLines("http://wiki.puzzlers.org/pub/wordlists/unixdict.txt")
words <- words[nchar(words) > 11]
grep("the", words, value = T)</lang>
{{out}}
<pre> [1] "authenticate" "chemotherapy" "chrysanthemum" "clothesbrush"
[5] "clotheshorse" "eratosthenes" "featherbedding" "featherbrain"
[9] "featherweight" "gaithersburg" "hydrothermal" "lighthearted"
[13] "mathematician" "neurasthenic" "nevertheless" "northeastern"
[17] "northernmost" "otherworldly" "parasympathetic" "physiotherapist"
[21] "physiotherapy" "psychotherapeutic" "psychotherapist" "psychotherapy"
[25] "radiotherapy" "southeastern" "southernmost" "theoretician"
[29] "weatherbeaten" "weatherproof" "weatherstrip" "weatherstripping"</pre>
=={{header|Raku}}==
| |||