Find words with alternating vowels and consonants: Difference between revisions

There have been a <i>lot</i> of "filter the dictionary" tasks almost identical to this one added to the wiki already. All call for filtering a word list, where the results of the filtering test depend on the characters in the word and its length, and may optionally also depend on what other words are in the same dictionary. Something like the generic function below can be used in most of these tasks.

<lang julia>function foreachword(wordfile::String, condition::Function; minlen = 0, colwidth = 15, numcols = 6, toshow = 0)

println("Word source: $wordfile\n")

words = split(read(wordfile, String), r"\s+")

dict, shown = Dict(w => 1 for w in words), 0

for word in words

if (output = condition(word, dict)) != "" && (minlen < 1 || length(word) >= minlen)

shown += 1

print(rpad(output, colwidth), shown % numcols == 0 ? "\n" : "")

toshow > 0 && toshow < shown && break

end

end

end

isvowel(c) = c in ['a', 'e', 'i', 'o', 'u'] # NB. leaves out 'α' and similar unicode vowels, and what about y?