[R] calcul de nombre

[touslesmatins]

Bonjour,
Il y a quelque temps j'avais clos un sujet, un peu rapidement, je reviens avec cette meme demande, pour laquelle L4crymal et Iste avaient commencé à répondre. mais à vrai dire je ne maitrise pas cette partie.
La voici de nouveau.
Je n'arrive pas à additionner les nombres qui s inscrivent au fur et a mesure d'un script. je souhaite tout d'abord compter les lignes et ensuite additionner à partir d' un fichier ini, tous les nombres.
Pour compter :

► Afficher le texte

$CountLines = _FileCountLines(@MyDocumentsDir &"\nombre-moyennecycle.ini")
MsgBox(64, "Nombre", "There are " & $CountLines & "nombre-moyennecycle.")

pour lire :

► Afficher le texte

$var=IniReadSection($cycle, "SECTION1")

Pas bien compris le procedé pour additionner les nombres et obtenir le total, merci de votre aide.

Merci

[Tlem]

Je pense que je n'ai pas tout compris, mais au cas ou ...

Si $CountLines est égal à un nombre et si $var est aussi égal à un nombre, alors $CountLines + $var est égal au total des deux nombres.

[Iste]

heu, en effet il faudrait etre plus claire ^^'
mais si j'ai bien compris le 1er spoiler, _FileCountLines est a proscrire !!
Pour compter le nombre de key d'une section, IniReadSection() le fait tres bien, couplé a un IniReadSectionNames() si il y a plusieurs section

enfin, déja, un peu plus de détaille svp ^^'

[Tlem]

C'est bien ce qu'il fait dans le deuxième spoiler ...
Le fait de compter le nombre de ligne à sans doute une autre utilité.

[touslesmatins]

Aie... désolé...
En fait je souhaiterais calculer tous les nombres se situant dans le fichier ini. Une fois ce resultat obtenu je le divise par le nombre de ligne, ce qui me donnera une moyenne.
J'espere que c est plus clair.
Merci

[Tlem]

Heuuu, les miettes de pain pour résoudre votre problème c'est pas mal, mais ça ne fait pas avancer le schimilblik.

Donc donnez nous l'ensemble des données et nous pourrons sans doute vous aider, sinon je supprime le sujet jusqu'à ce que vous donniez tous les éléments indispensables.

[touslesmatins]

Ce que je souhaite faire est ecrit dans le post precedent, et voila ce que j'ai pour inscrire mes donnees :

► Afficher le texte

;----------------- Ecriture dans fichier ini --------------------

global $dif
local $choix,$i,$val,$lec,$cycle
$cycle=@MyDocumentsDir &"\heures-moyennecycle.ini"
;-----------------------------------------------------------------
$choix=$dif/1000
;-----------------Inscrire dans init-------------------------
$aChoix = StringSplit($choix,"{enter}")
For $i = 1 To $aChoix[0]
$lec=IniWrite($cycle, "SECTION1", $aChoix[$i], $val)
Next

Dans ce fichier les donnees sont inscrites comme ceci :

► Afficher le texte

21.791772697368=
23.2343160932465=
22.1237984157204=
22.1623994110983=
19.518411418211=
19.8488441966786=
19.3983249267714=
26.5887063858675=
16.5142231764093=
36.3526931495483=
107.286353712553=
17.9459308375785=
22.4528044765466=
21.4013607874744=
21.6215066440008=
13.7298503022032=
16.3363393950907=
16.7960654217226=
18.5349079282423=
21.5365620490872=
.
.
.

Voilà j'aimerais maintenant additionner tous les nombres qui sont dans ce fichier et ainsi obtenir le resultat. Voilà ce que je n arrive pas à faire.
Ensuite j utiliserais cette ligne de commande _FileCountLines(@MyDocumentsDir &"\heures-moyennecycle.ini").
Et pour finir je diviserais le $Resultat/$Nombredeligne afin d 'obtenir une moyenne
Ce sont les éléments que j'ai.
Merci pour votre aide

[Tlem]

Après avoir interprété le fichier .ini (il faut lire votre code + un long spoiler de nombre) et si vous nous avez bien donné toutes les informations, voici comment faire pour additionner vos nombres et en retirer la moyenne :

Code : Tout sélectionner

$aIni = IniReadSection("Fichier.ini", "Section1")

If IsArray($aIni) Then
    Global $Res
    For $i = 1 To $aIni[0][0]
        $Res += $aIni[$i][0]
    Next

    MsgBox(64, 'Résultat moyen :', $Res / $aIni[0][0])
Else
    MsgBox(16, 'Erreur', 'Erreur de lecture du fichier .INI')
EndIf

[touslesmatins]

Exactement ce que je voulais....
J'obtiens bien une moyenne... Cool
Merci beaucoup