Discussion :

[petitclem]

Bonjour à tous,
j'ai un soucis pour calculer la moyenne de nombres que je sélectionne dans un fichier.
Je vous envoie mon code pour mieux comprendre mon problème :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
float Buf;
 
	for (int i = 3; i <= Fichier->Strings [i]; i++) {
 
		AnsiString Ligne = Fichier->Strings [i];
		AnsiString PH = strtok(Ligne.c_str()," ");
 
		Buf = (PH [i]+ PH [i-1])/2;
 
 
	}
 
	FormClient->EditPH->Text = Buf;

Le fichier se présente comme ceci :

8,2 4,9 37 0
8,9 4,9 37 0
9,2 4,9 37 0
8,2 4,8 37 0
7,0 4,9 37 0
8,2 4,9 37 0
8,2 4,8 37 0
8,2 4,8 37 0


Ce sont les nombres qui sont en rouge avec lesquels je veux faire une moyenne.

Merci d'avance pour vos réponses, à bientôt !

[pottiez]

Pour moi il y a plusieurs problème, tout d'abord la condition d'arrêt de ta boucle for est a revoir, ensuite, il faut que tu stock toutes tes valeurs dans un vecteur pour faire ensuite ta moyenne, cela donnerai un truc du genre

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
 
float moyenne;
vector<float> tabValeur;
 
for (int i = 3; i <= Fichier->Strings [i]; i++) //Condition à revoir
{
   AnsiString Ligne = Fichier->Strings [i];
   AnsiString PH = strtok(Ligne.c_str()," ");
   tabValeur.push_back(PH.ToDouble());
}
moyenne = 0;
for(int i=0;i<tabValeur.size();i++)
{
  moyenne += tabValeur[i];
}
moyenne = moyenne / tabValeur.size();
 
FormClient->EditPH->Text = AnsiString(moyenne);

[henderson]

Salut !

On suppose le nom complet du fichier dans :

Code :

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

1
2
 
AnsiString Filename;

Donc :

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
 
void __fastcall TForm1::SpeedButton1Click(TObject *Sender)
{
if(FileExists(Filename))
    {
    TStringList *Fichier = new TStringList;
    Fichier->LoadFromFile(Filename);
    AnsiString Chaine;
    AnsiString Nombre;
    int p;
    double s = 0.0;
    for(int j = 0; j < Fichier->Count; j++)
        {
        Chaine = Fichier->Strings[j];
        p = Chaine.Pos(" ");
        if(p != 0) Nombre = Chaine.SubString(1, p);
        s = s + Nombre.ToDouble();
        }
    s = s / Fichier->Count;
    //Echo dans un label
    Label1->Caption = FloatToStr(s);
    //Libération de la mémoire
    Fichier->Clear();
    delete Fichier;
    }
}

Si on devait faire la moyenne pour l'ensemble des colonnes, dans ce cas il faudrait travailler en profondeur.

On suppose un tableau :

Code :

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

1
2
 
double Tab[4];

Et une méthode supplémentaire (qu'il suffit de déclarer dans la classe de la form, en public):

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
 
void __fastcall TForm1::Colonnes(AnsiString Chaine)
{
Chaine.Trim();
AnsiString Nombre;
int d = 0;
//Pour faire sans goto... 
int p = Chaine.Pos(" ");
while(p != 0)
    {
    Nombre = Chaine.SubString(1, p);
    Tab[d] += Nombre.ToDouble();
    d++;
    Chaine = Chaine.SubString(p+1, Chaine.Length());
    p = Chaine.Pos(" ");
    }
Tab[d] += Chaine.ToDouble();
}

La méthode principale devient :

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
 
void __fastcall TForm1::SpeedButton2Click(TObject *Sender)
{
if(FileExists(Filename))
    {
    TStringList *Fichier = new TStringList;
    Fichier->LoadFromFile(Filename);
    //RAZ du tableau
    ZeroMemory(Tab, sizeof(double) * 4);
    //ligne par ligne
    for(int j = 0; j < Fichier->Count; j++)
        {
        Colonnes(Fichier->Strings[j]);
        }
    //Moyenne des colonnes
    for(int j = 0; j < 4; j++)
        {
        Tab[j] = Tab[j] / Fichier->Count;
        }
    //Echo dans mes labels
    Label1->Caption = FloatToStr(Tab[0]);
    Label2->Caption = FloatToStr(Tab[1]);
    Label3->Caption = FloatToStr(Tab[2]);
    Label4->Caption = FloatToStr(Tab[3]);
    //Libération de la mémoire
    Fichier->Clear();
    delete Fichier;
    }

Peut-être peut-on faire plus simple... (???)

A plus !

[petitclem]

Merci POTTIEZ, mais là je doit te dire que j'ai rien compris ...

[pottiez]

Désolé, j'avais oublié de supprimer une ligne de ton ancien code et le code que j'ai présenté n'été pas optimisé.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
float moyenne = 0;
int nbValeur = 0;
 
for (int i = 3; i <= Fichier->Strings [i]; i++) //Condition à revoir
{
   AnsiString Ligne = Fichier->Strings [i];
   AnsiString PH = strtok(Ligne.c_str()," ");
   moyenne += PH.ToDouble();
   nbValeur++;
}
moyenne = moyenne / nbValeur;
 
FormClient->EditPH->Text = AnsiString(moyenne);

Sinon le code de henderson est directement optimisé

[petitclem]

OK d'accord, merci à tous les deux.
Par contre comment je fais henderson si mes données dans le fichier ne commence qu'à la 4ème ligne jusqu'à la fin?

[pottiez]

Simplement en initialisant j à 3 au lieu de 0 dans la boucle for :

Code :

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

for(int j = 3; j < Fichier->Count; j++)

[petitclem]

C'est bon ça fonctionne, encore merci

[petitclem]

Excuse moi encore henderson mais lorsque j'exécute le code pour calculer la moyenne de plusieurs colonnes, il me met un message d'erreur :

" n'est pas une valeur à virgule flottante !

Quel est le problème ?

[henderson]

Salut !

J'ai testé avec le tableau que tu as donné et je n'ai pas eu de problèmes !
On est bien d'accord que chaque nombre est séparé par un espace ?
Si on devait se trouver avec un formatage différent, dans ce cas il suffirait d'en tenir compte !

Le fait qu'une expression ne soit pas une valeur décimale correcte montre qu'il y a des caractères non valides !

A plus !

[petitclem]

Tu as raison henderson, ça fonctionne.
Mais j'ai un soucis avec mes premières lignes du fichier : le calcul doit commencer à la 4ème ligne :

TYPE F: ST
ratp
1071208
8,2 4,9 37 0
8,2 4,9 37 0
8,2 4,9 37 0

Donc j'ai modifié le code :

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
 
// Ligne par ligne
		for(int i = 3; i < Fichier->Count ; i++) {
 
			Colonnes(Fichier->Strings[i]);
 
		}
 
		// Moyenne des colonnes
		for(int i = 0; i < 3; i++) {
 
			Tab[i] = Tab[i] / Fichier->Count;
 
		}
 
 
		FormClient->EditPH->Text = FloatToStr(Tab[0]);

Le problème est que pour la moyenne de la premiere colonne je doit avoir en résultat 8,2 , mais là j'ai 4,1 en résultat.

D'où vient le soucis ?

[pottiez]

Déjà tu ne doit plus divisé par Fichier->Count, mais par (Fichier->Count - 3) puisque tu ne prend pas les 3 premières lignes

[petitclem]

Pas folle la bête, je suis vraiment idiot quelques fois

Encore une fois merci henderson !

[petitclem]

Oh pardon : grand merci à toi aussi POTTIEZ

[pottiez]

de rien