Discussion :

[MegaNam]

Voilà, je dois faire un code de tri de tableau à une dimension et je voulais savoir si quelqu'un en avait un déjà dans ses vieux tiroirs.

J'arrive à trier le tableau par valeur croissante mais je bloque sur le tri des valeurs similaires.

Je voudrais faire un tableau 2 issu du tableau 1 mais où on aurait enlevé tous les doublons.

Si quelqu'un a une idee je suis preneur

[ZeLL]

Si j'ai bien compris tu as par exemple un tableau d'entier:
TSource:{4,6,2,7,4,8,8,4,2}
que tu veux trier en enlevant les doublons.
Pour l'instant tu obtient
T1:{2,2,4,4,4,6,7,8,8}
Pourquoi ne pas essayer au moment d'inserer ta variable dans T1
de verifier si cette valeur est déja présente dans T1, dans quel cas tu ne l'insert pas.
Et d'incrementer aussi une variable représentant le nombre d'items inserer dans T1, ce qui te permettrai de redimensioner ton tableau (si c'est possible)
tu aurait donc en resultat:
T1:{2,4,6,7,8,nil,nil,nil,nil}
et Count=5
En espérant que ca aide;-)

[MegaNam]

Bon deja j'ai avancé j'arrive a trié toutes les valeurs par ordre croissant à enlever les doublons.

Maintenant le pb est dans le tableau avec les valeurs trièes et les doublons enlevés. J'ai remplacé ceux-ci par une valeur arbitraire (big=2*maxval de t1).
Et je voudrais faire un nouveau tableau qui va garder que les valeurs différentes et ne pas prendre en compte les doublons qui sont devenus des valeurs big.

En mettant une condition en if j'elimine les éléments qui valent big masi je n'arrive pas à avoir mon joli tableau de fin avec que des valeurs différents. Toutes les positions ou etaient big sont devenu des 0 mais j'ai toujours un tableau "mal trié"

Voila si qq1 sait comment réattribuer les valeurs et enlever les éléments 0...

[ZeLL]

Peut tu poster ton code? je pense que ce serait plus simple pour
t'aider à résoudre le problème

[MegaNam]

C'est bon je viens de trouver comment faire en fait .
Il suffisait de retrier le nouveau tableau avec les valeurs big par ordre croissant et la on voit bien s'afficher les differentes valeurs dans l'ordre croissant et sans doublons avec a la fn du tableau toutes les valeurs de big.

Je peux mettre le code si des personnes sont intéressé.

Ps: Je vais essayer de l'améliorer cette aprem si je trouve la motivation

[Sylvain Bergeron]

Pour enlever les doublons, quelque chose comme :

Code :

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

1
2
 
Vecteur(2:) = pack(Vecteur(2:),Vecteur(:size(Vecteur)-1) /= Vecteur(2:),Vecteur(2:))

Réponse plus générale au problème initial :

http://www.fortran-2000.com/rank/index.html (de Michel Olagnon)