![]() |
|
We don't bite newbies here... much | |
PerlMonks |
Re: Challenge: 8 Letters, Most Wordsby repellent (Priest) |
on Oct 31, 2013 at 18:06 UTC ( #1060617=note: print w/replies, xml ) | Need Help?? |
Haven't been on Monastery grounds in a while, so I'm a little late to this party.
My solution: <Reveal this spoiler or all in this thread>
My strategy is to aggregate up the word counts from candidates with the fewest letters to the most letters. (This approach is not thorough but is fast, see Update #2). The trick to make it fast is to realize that there is a one letter difference between candidate tiers, and to cycle through 26 letters for subset matching. My winner is aeilprst with it being able to make at least 343 words (using all 8 letters, or a subset of that). This may not be the best answer because of the simplistic aggregation, but it points to the likely champs. Update: I see what's wrong now. The aggregation has to keep track of contributing counts of specific candidates. Back to drawing board. Update #2: I have updated the script and results, which is more in line with what others have gotten. The total word counts do come up short because of the aggregation strategy. But the tradeoff in speed is significant.
In Section
Seekers of Perl Wisdom
|
|