Algorithme : Répartition sur 3 groupes à somme constante

Bonjour, je cherche à faire un algorithme qui vise à répartir un groupe de 40 personnes dans 3 groupes différentes. Associés à d'autres valeurs, elle me permettront de choisir la meilleure répartition.

Voici l'exemple :

Groupe 1 Groupe 2 Groupe 3 Total

1 1 38 40

1 2 37 40

... ... ... 40

5 5 30 40

etc...

Avec le nombre de possibilités, vous comprendrez certainement que cela peut être très long de le faire à la main...

Auriez-vous des suggestions de calculs pour arriver a ce résultat ?

D'avance merci.

Bonsoir,

Est-ce qu'un 1,1,38 est différent d'un 38,1,1

vu que le nombre de personne en fonction des groupes n'est pas le même , même si la "combinaison" est la même ?

Sinon avec une touche de VBA et quelques boucles...

@ bientôt

LouReeD

Bonsoir,

38, 1, 1 et 1, 1, 38 sont considérés comme des combinaisons différentes.

J'ai réussi à bidouiller un petit quelque chose mais ce n'est pas très automatisé malheureusement

Bonsoir et bienvenue,

Pour ce qui est des algorithmes, vu le nombre de répartitions (3), je m'en passerais ...à moins que ....

S'il s'agit de rechercher toutes les combinaisons possibles, je propose un tableau qui devra faire l'objet de permutations:

ce tableau de base a 133 combinaisons (à multiplier par 6 pour chaque groupe, par permutation des colonnes).

Je te laisse le soin des permutations

Bonne suite

Cordialement

Edit pour erratum du nombre de permutations et nbre combinaisons

bonjour,

une solution possible en vba

Sub aargh()
    s = 1
    For i1 = 1 To 40
        For i2 = 1 To 40
            If i1 + i2 < 40 Then
                For i3 = 1 To 40
                    t = i1 + i2 + i3
                    If t = 40 Then
                        s = s + 1
                        Cells(s, 1) = i1
                        Cells(s, 2) = i2
                        Cells(s, 3) = i3
                    ElseIf t > 40 Then
                        Exit For
                    End If
                Next i3
            End If
        Next i2
    Next i1
End Sub