Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Contribuez Discussion :

[Défis][4] Comparer deux listes de mots


Sujet :

Contribuez

  1. #1
    Membre éprouvé
    [Défis][4] Comparer deux listes de mots
    J'ai deux listes de mots en nombre arbitraire et non ordonnées. Par exemple :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    A = {'un' 'deux' 'chateau' 'trois' 'quatre'} ;
    B = {'deux' 'quatre' 'six' 'huit' 'dix' 'douze' 'maison' 'bateau' 'chateau'} ;


    Le défi est le suivant :
    Écrire le code le plus compact(*) possible pour trouver tous les mots communs aux deux listes. c'est-à-dire quelque chose comme ça :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    >>votre formule magique ici
     
    ans = 
     
        'deux'    'chateau'    'quatre'


    -----------------------------------
    (*) un code est compact quand il a :
    • moins de boucles (for-end, while-end, ...)
    • moins de lignes de code
    • moins d'affectations (signe =)
    • moins de variables déclarées


    Pas besoin de hiérarchiser ces critères car toute amélioration de l'un impacte les autres.
    "La vraie grandeur se mesure par la liberté que vous donnez aux autres, et non par votre capacité à les contraindre de faire ce que vous voulez." Larry Wall, concepteur de Perl.

  2. #2
    Modérateur

    Salut,

    proposition avec cellfun justement :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    A = {'un' 'deux' 'chateau' 'trois' 'quatre'} ;
    B = {'deux' 'quatre' 'six' 'huit' 'dix' 'douze' 'maison' 'bateau' 'chateau'} ;
    C = repmat(A,size(B,2),1)
    D = repmat(B.',1,size(A,2))
    E = cellfun(@(x,y)strfind(x,y), C, D,'UniformOutput',false)

    ou en compactant encore plus :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    A = {'un' 'deux' 'chateau' 'trois' 'quatre'} ;
    B = {'deux' 'quatre' 'six' 'huit' 'dix' 'douze' 'maison' 'bateau' 'chateau'} ;
    E = cellfun(@(x,y)strfind(x,y), repmat(A,size(B,2),1), repmat(B.',1,size(A,2)),'UniformOutput',false)

    Juste une remarque pour préciser qu'un code compact n'est pas toujours un code optimisé et cela peut le rendre parfois illisible.
    Pour une bonne utilisation des balises code c'est ici!
    Petit guide du voyageur MATLABien : Le forum La faq Les tutoriels Les sources


    La nature est un livre écrit en langage mathématique. Galilée.

  3. #3
    Membre éprouvé
    Pour un début, la barre est assez haut : une seule instruction

    Par contre tu n'obtiens pas la solution (je vais ajouter une précision dans l'énoncé). Je veux les trois chaines communes. Et toi, il te faut encore quelques instructions de plus pour les sortir :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    E = cellfun(@(x,y)strfind(x,y), repmat(A,size(B,2),1), repmat(B.',1,size(A,2)),'UniformOutput',false)
     
    E = 
     
         []    [1]     []     []     []
         []     []     []     []    [1]
         []     []     []     []     []
         []     []     []     []     []
         []     []     []     []     []
         []     []     []     []     []
         []     []     []     []     []
         []     []     []     []     []
         []     []    [1]     []     []
    "La vraie grandeur se mesure par la liberté que vous donnez aux autres, et non par votre capacité à les contraindre de faire ce que vous voulez." Larry Wall, concepteur de Perl.

  4. #4
    Expert confirmé
    Bonjour,

    Je pense que la fonction INTERSECT doit faire l'affaire ici:
    Simulink & Embedded Coder

    Au boulot : Windows 7 , MATLAB r2016b
    A la maison : ArchLinux mais pas MATLAB

  5. #5
    Membre éprouvé
    Citation Envoyé par duf42 Voir le message
    Bonjour,

    Je pense que la fonction INTERSECT doit faire l'affaire ici:
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    A = {'un' 'deux' 'chateau' 'trois' 'quatre'} ;
    B = {'deux' 'quatre' 'six' 'huit' 'dix' 'douze' 'maison' 'bateau' 'chateau'} ;
    intersect(A,B)


    Duf

    Bravo Duf !

    0 boucle
    0 variables intermédiaires
    1 ligne de code,
    1 fonction matlab appelée.

    Je propose de t'accorder la victoire à ce défi

    Mon idée de départ était celle-ci, que tu as largement battu :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    A = {'un' 'deux' 'chateau' 'trois' 'quatre'} ;
    B = {'deux' 'quatre' 'six' 'huit' 'dix' 'douze' 'maison' 'bateau' 'chateau'} ;
    [a, b]=meshgrid(1:numel(A),1:numel(B)) ;
    A(any(strcmp(A(a),B(b))))
    "La vraie grandeur se mesure par la liberté que vous donnez aux autres, et non par votre capacité à les contraindre de faire ce que vous voulez." Larry Wall, concepteur de Perl.

  6. #6
    Membre éprouvé
    @Duf :

    J'ai essayé d'appliquer ta solution dans mon code, mais mon problème n'est pas exactement celui que j'ai formulé dans le défi. Le défi est un problème symétrique. Le mien ne l'est pas.
    J'ai une liste A de mots de référence (un dictionnaire) et une liste de mots B à chercher dans A. J'ai besoin des index des mots de B dans le dictionnaire A.
    Voici un bout de code qui résume les deux solutions, appliquées au problème non symétrique. Qu'en penses-tu ?

    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Dico = {'deux' 'quatre' 'six' 'huit' 'dix' 'douze' 'maison' 'bateau' 'chateau'} ;
    Chercher = {'deux' 'chateau'} ;
     
    % Duf
    M = intersect(Dico, Chercher) ;
    fprintf('\nLes mots communs sont -dans le désordre- (recette Duf) : ') ;
    fprintf('%s ', M{:}) ;
     
    % OL9245
    [a, b]=meshgrid(1:numel(Dico),1:numel(Chercher)) ;
    Ix = find(any(strcmp(Dico(a),Chercher(b)))) ;
    fprintf('\nLeurs index dans le dico sont -dans l''ordre- (recette OL9245) : ') ;
    fprintf('%d ', Ix) ;
    fprintf('\n') ;
    Résultat :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    Les mots communs sont -dans le désordre- (recette Duf) : chateau deux 
    Leurs index dans le dico sont -dans l'ordre- (recette OL9245) : 1 9
    "La vraie grandeur se mesure par la liberté que vous donnez aux autres, et non par votre capacité à les contraindre de faire ce que vous voulez." Larry Wall, concepteur de Perl.

  7. #7
    Modérateur

    Salut,

    Petit tour du côté de la doc :
    [c, ia, ib] = intersect(a, b) also returns column index vectors ia and ib such that c = a(ia) and c = b(ib) (or c = a(ia,:) and c = b(ib,:)).
    Donc à partir de là, ce n'est pas dur d'obtenir ces indices

    Sinon, deux autres solutions :
    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    A = {'un' 'deux' 'chateau' 'trois' 'quatre'} ;
    B = {'deux' 'quatre' 'six' 'huit' 'dix' 'douze' 'maison' 'bateau' 'chateau'} ;
     
    A(ismember(A,B))
     
    A ( cellfun(@(a) any(strcmp(a,B)), A) )


    Concernant ta solution ol9245, je rajouterais A(any(strcmp(A(a),B(b)),1)) dans le cas d'un seul mot à chercher.
    Avant de poser votre question : FAQ, Tutoriels et recherche sur le forum
    Une erreur ? Messages d'erreur et avertissements
    "Ça ne marche pas" n'apporte aucune information utile permettant de vous aider. Expliquez clairement votre problème (erreurs entières, résultat souhaité vs obtenu...).
    En essayant continuellement on finit par réussir. Donc: plus ça rate, plus on a de chance que ça marche. - Jacques Rouxel
    L'expérience, c'est le nom que chacun donne à ses erreurs - Oscar Wilde
    Mes extensions FireDVP (Firefox), ChroDVP (Chrome) : suivi des nouveaux messages, boutons/raccourcis et bien plus !

  8. #8
    Rédacteur/Modérateur

    Et pour une solution encore plus spécifique que la solution "générale" de duf42 :

    Mes compétences :
    • conception mécanique 3D (Autodesk Fusion 360)
    • développement informatique (MATLAB, Python, C, VBA)
    • impression 3D (Ultimaker)
    • programmation de microcontrôleur (Microchip PIC et Arduino)

    « J'étais le meilleur ami que le vieux Jim avait au monde. Il fallait choisir. J'ai réfléchi un moment, puis je me suis dit : "Tant pis ! J'irai en enfer" » (Saint Huck)

  9. #9
    Membre habitué
    sans aucun mérite car je ne fais que résumer les messages précédents :


    Code :Sélectionner tout -Visualiser dans une fenêtre à part
    1
    2
    3
     
    [C,IA,IB] = INTERSECT(Dico, Chercher) ;
    IA = sort(IA)


    on a ainsi le résultat suivant :


    Dico = {'deux' 'quatre' 'six' 'huit' 'dix' 'douze' 'maison' 'bateau' 'chateau'} ;
    Chercher = {'deux' 'chateau'} ;
    [C,IA,IB] = INTERSECT(Dico, Chercher) ;
    IA = sort(IA)

    IA =

    1 9

  10. #10
    Membre éprouvé
    Ca nous fait donc deux lignes, donc autant que ma proposition, mais ++ joli et ++ compact.
    "La vraie grandeur se mesure par la liberté que vous donnez aux autres, et non par votre capacité à les contraindre de faire ce que vous voulez." Larry Wall, concepteur de Perl.