Discussion :

[kira9744]

Bonjour,
j'aimerais savoir si à l'inverse de la fonction "unique" il existerait une fonction me permettant de ne conserver que les éléments en double dans une cellule,
par exemple dans l'exemple qui suit j'aimerais avoir en retour, simplement: '028977'

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
K>> Doub
 
Doub = 
 
  Columns 1 through 9
 
    '028977'    '028977'    '031217'    '032026'    '032088'    '033349'    '033653'    '033655'    '033866'
 
  Columns 10 through 18
 
    '033903'    '034019'    '034135'    '034235'    '034236'    '034237'    '034283'    '034457'    '034458'
 
  Columns 19 through 27
 
    '034480'    '034481'    '034524'    '034692'    '034769'    '034787'    '034789'    '034797'    '034799'
 
  Columns 28 through 36
 
    '034800'    '034843'    '034920'    '035075'    '035383'    '035765'    '036374'    '036758'    '036764'
 
  Columns 37 through 45
 
    '036767'    '036768'    '036770'    '036811'    '036813'    '036834'    '036837'    '037653'    '037655'
 
  Columns 46 through 54
 
    '037656'    '037657'    '037659'    '037660'    '037661'    '037664'    '037665'    '037666'    '037740'
 
  Columns 55 through 63
 
    '037742'    '037743'    '037744'    '037858'    '037859'    '037860'    '037861'    '037864'    '037866'
 
  Columns 64 through 70
 
    '037867'    '037868'    '037869'    '037871'    '037879'    '037882'    '038090'

Merci

[duf42]

Bonjour,

Voici une idée de solution:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
unique(Doub(cellfun(@(x) sum(strcmp(x,Doub)), Doub) > 1))

Duf

[kira9744]

Merci sa marche parfaitement, je m'étais compliqué la tache et emmêlé les pinceaux en essayant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
    K=numel(Doub)
for i=2:K
        for j=1:K 
            j=i-1;
            D = findstr(Doub{i},Doub{j});
            if(~isempty(D))
                for z=j+1:K
                    D2 = findstr(Doub{j},Doub{z});  
                    if(~isempty(D2))
                        T{x}=Doub{j};
                        x=x+1;
                    end
                end
            end
 
        end
 
    end

Ce qui plantai facilement avec un K assez grand :s
encore merci

[Jerome Briot]

Une autre piste :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
[uDoub,a,b] = unique(char(Doub{:}),'rows');
n = histc(b,1:max(b));
Doub{n==2}