En passant par une page de documentation, je me suis attardé sur std::next_permutation. Ça m’a tout de suite donné des idées d’anagrammes. En effet, de pouvoir aussi facilement boucler irréfragablement sur toutes les permutations des lettres d’un mot m’a  suscité l’irrépressible envie de créer un petit détecteur d’anagrammes.

Évidemment, pour détecter un anagramme, il faut d’abord et avant tout avoir une base de données de mots valides pour une langue donnée. Il se trouve que j’ai une telle base de données.  En effet, il y a déjà une vingtaine d’années, j’avais réalisé une petite page web d’aide aux mots-croisés. Pour ce faire j’avais contacté, via un forum, un cruciverbiste-internaute qui avait eu la grande gentillesse de me faire parvenir ce fichier par courriel. C’était un gros fichier à l’époque: presque 3 Mo. En fait, à l’origine c’était même 26 fichiers allant de A.txt à Z.txt. Cruciverbiste-internaute des années ’90 qui se reconnait dans cette histoire, je te remercie encore une fois!

Le corpus en tant que tel date un peu: le mot courriel, par exemple, n’y apparaît même pas. Quoi qu’il en soit, avec ses 280000 entrées composées de noms propres, de substantifs et d’adjectif au singulier comme au  pluriel, de verbes conjugués à toutes les formes, c’est suffisant pour tenter quelques expériences significatives.

En tout cas, c’est amplement suffisant pour tester une première version d’un détecteur d’anagramme. Une version pas très robuste mais qui a le mérite de tester l’utilisation de std::next_permutation.

La première version lit la base de données en insérant dans un std::vector> tous les mots rencontrées. Le vecteur est triée pour permettre une recherche rapide avec std::binary_search

Une fonction ressemblant à ça pourrait par exemple faire l’affaire (j’assume un compilateur C++11 ou plus qui garantit que les objets comme la base de données ne sont pas retournés par copie sur la pile mais bien en utilisant le mécanisme de Copy Elision).

[pastacode lang= »cpp » manual= »typedef%20vector%3Cstd%3A%3Astring%3E%20AnagramDB%20%3B%0A%0AAnagramDB%20GetAnagramDB(const%20std%3A%3Astring%26%20filename)%20%0A%7B%0A%09std%3A%3Avector%3Cstd%3A%3Astring%3E%20words%3B%0A%09std%3A%3Aifstream%20datafile(filename)%3B%0A%0A%20%20%20%20std%3A%3Astring%20str%3B%0A%20%20%20%20while%20(datafile%20%3E%3E%20str%20)%0A%09%7B%0A%09%09words.push_back(str)%3B%0A%20%20%20%20%7D%0A%0A%20%20%20%20std%3A%3Asort(words.begin()%2C%20words.end())%3B%0A%09return%20words%3B%0A%7D » message= »Lecture de la base de données et insertion dans un vecteur trié » highlight= » » provider= »manual »/]

Avec un vecteur ainsi trié, on peut rechercher un mot avec grosso-modo la même efficacité que dans un arbre binaire. En imaginant qu’on boucle sur les différentes permutations des lettres d’un mot, on voudra tester pour chaque combinaison si le mot est présent  ou pas dans la base de données. Quelque chose comme ça.

[pastacode lang= »cpp » manual= »bool%20isInDatabase(const%20AnagramDB%26%20database%2C%20const%20std%3A%3Astring%26%20str)%0A%7B%0A%09return%20std%3A%3Abinary_search(database.cbegin()%2C%20database.cend()%2C%20str)%3B%0A%7D » message= »Utilisation de binary_search pour trouver un mot dans une liste triée » highlight= » » provider= »manual »/]

Une fois qu’on a une base de données chargée et un mécanisme pour tester si un mot (une combinaison de lettres) est valide (donc présent dans le base de données), il ne reste plus qu’à obtenir un mot à tester, boucler sur toutes ses permutations et vérifier pour chaque anagramme si il correspond à un mot valide dans la langue française (ici représentée par notre fichier de base de données).

On pourrait par exemple lire en boucle sur stdin pour obtenir des mots, qu’on testerait un à la fois. Pour chacun des mots, la liste des anagrammes valides serait envoyée sur stdout, et ainsi de suite. On remarque que pour initier les permutations, le mot est tout d’abord trié en ordre lexicographique, de manière à commencer par le « premier » anagramme.

Ça ressemblerait donc à ça.

[pastacode lang= »cpp » manual= »int%20main(int%20argc%2C%20char**%20argv)%0A%7B%0A%09if(argc%3C%3D1)%20%0A%09%09return%200%3B%0A%09std%3A%3Astring%20str%20%3D%20argv%5B1%5D%3B%0A%20%20%20%20auto%20db%20%3D%20GetAnagramDB(str)%3B%0A%09std%3A%3Acout%20%3C%3C%20%22Word%20to%20look%20for%3A%20%22%3B%20%0A%09while(std%3A%3Acin%20%3E%3E%20str%20)%20%0A%09%7B%0A%09%09std%3A%3Asort(str.begin()%2C%20str.end())%3B%0A%09%09int%20num%20%3D%200%3B%0A%09%09while(std%3A%3Anext_permutation(str.begin()%2C%20str.end())%20)%0A%09%09%7B%0A%09%09%09if(%20isInDatabase(str)%20)%20%0A%09%09%09%7B%0A%09%09%09%09std%3A%3Acout%20%3C%3C%20str%20%3C%3C%20std%3A%3Aendl%3B%3B%20%0A%09%09%09%09num%2B%2B%3B%0A%09%09%09%7D%0A%09%09%7D%0A%09%09%09%0A%09%09std%3A%3Acout%20%3C%3C%20%22Found%20%3A%20%22%20%3C%3C%20num%20%3C%3C%20std%3A%3Aendl%3B%20%0A%09%09std%3A%3Acout%20%3C%3C%20%22Word%20to%20look%20for%3A%20%22%3B%20%0A%09%20%7D%0A%0A%09return%200%3B%0A%7D » message= »Boucle naïve pour la recherche d’anagrammes valides basé sur std::next_permutation » highlight= »12″ provider= »manual »/]

Cette boucle et ce programme fonctionne parfaitement comme il se doit. Par contre il souffre de quelques faiblesses:

• Le nombre de permutations est N! ; pour un mot de 10 lettres, on a déjà plus de 3,5 millions de combinaisons à tester (3628800)
• Les casses minuscule et majuscules sont considérées comme étant des lettres différentes
• Les accents et autres diacritiques génèrent des lettres différentes

Dans le prochain épisode sur les anagrammes, on améliorera tout ça en repensant la base de données et en évitant les multiples permutations. On s’affranchira aussi des problèmes de casse et de diacritiques.