[R] Problème de Random

[Pelagos]

Bonjour ,

Je cherche a faire une fonction qui effectuerai un tirage aleatoire non indépendant de 120 valeurs numériques sur une plage variable (pouvant grosso modo aller jusqu'a 1000).
Apres avoir parcouru le forum, j'ai trouvé mon bonheur, seulement pour une raison que je ne comprends pas, la variable array ne stocke jamais aucune valeur, je n'ai que des msgbox vides...

voila le code :

Code : Tout sélectionner

#include <Array.au3>

Global $Melange[120], $Index, $i = 0, $size_sample

$size_sample = InputBox("Random Picker","Please enter sample size")

While $i < UBound($Melange)
    $Index = Random(1, $size_sample, 1)

    If _ArraySearch($Melange, $Index) = -1 Then
        $Melange[$i] = $Index
        $i += 1
        msgbox(0,"",$Melange[$i])
    EndIf

WEnd
 

Une idée ?
Merci d'avance.

[jbnh]

Salut,

Ca n'affiche rien parce que tout simplement tu incrémentes le $i avant d'afficher ton résultat ! Donc tu affiches le résultat de la case d'après qui est forcément vide !

Hésite pas à ajouter un ArrayDisplay en fin de script pour avoir un aperçu plus général

[Pelagos]

... Ok merci.
p..... je l'ai pas vu.
Merci encore.