- Charte d'utilisation de CodeS-SourceS - Aspects légaux
- Charte d'utilisation de Codes Sources
- Charte de CommentCaMarche.net - Conseils d'écriture
- Charte d'utilisation de CodeS-sourceS-- Respect d'autrui
- Charte de Codes-SourceS -- Neutralité
- Charte d'utilisation de Codes-Sources -- Gestion de communauté
Calcul moyenne glissée à partir d'un tableau de données
Fran974
Contributeur Dernière intervention
18 janvier 2019
- 28 juin 2016 à 10:07
- Messages postés
- 2
- Date d'inscription
- dimanche 26 juin 2016
- Dernière intervention
- 26 juin 2016
- Messages postés
- 12572
- Date d'inscription
- mardi 11 mars 2003
- Statut
A voir également:
- Calcul moyenne glissée à partir d'un tableau de données
- Insertion d'image en VBA Excel 2007 à partir d'un tableau de données ✓ - Forum - VB.NET
- Calculer l'age à partir d'une date de naissance (idéal pour un site communautaire ;-)). - Codes sources - PHP (Date / Heure)
- Java : Calcul de la valeur maximale d'un tableau - CodeS SourceS - Guide
- Calcul de distance à partir des coordonnées - Codes sources - Delphi / Pascal (Divers)
- Créer une image jpeg à partir d'un tableau de pixel - Codes sources - Visual Basic / VB.NET (Graphique)
6 réponses
- Messages postés
- 12572
- Date d'inscription
- mardi 11 mars 2003
- Statut
Ce que je comprends de ton texte n'est pas cohérent avec ton code.
Ai je bien compris:
tu veux faire la moyenne des 10 premiers enregistrements (0 à 9), sur tes 2 dimensions, diviser les résultats puis stocker quotient quelque part, ensuite faire de même avec les enregistrement de 10 à 19, etc...
Et à la fin retourner le plus grand quotient c'est bien ça?
Quand j'étais petit, la mer Morte n'était que malade.
George Burns
Ai je bien compris:
tu veux faire la moyenne des 10 premiers enregistrements (0 à 9), sur tes 2 dimensions, diviser les résultats puis stocker quotient quelque part, ensuite faire de même avec les enregistrement de 10 à 19, etc...
Et à la fin retourner le plus grand quotient c'est bien ça?
Quand j'étais petit, la mer Morte n'était que malade.
George Burns
- Messages postés
- 1749
- Date d'inscription
- samedi 11 janvier 2014
- Statut
Bonsoir
J'ai compris la même chose que Whismeril
De plus en VB Net les tableaux commencent à l'indice 0
donc le boucle serait plutôt
Le code donnerait à mon avis si j'ai bien compris
remarque
peut se simplifier par
(100/10)/(50/10) est équivalent à 100/50
10 / 5 est égal à 100 / 50
J'ai compris la même chose que Whismeril
De plus en VB Net les tableaux commencent à l'indice 0
donc le boucle serait plutôt
For i = 0 to 5999 step 10
Le code donnerait à mon avis si j'ai bien compris
Dim valeur As Decimal
Dim valeurmax As Decimal = 0
Dim moy1 As Decimal
Dim moy2 As Decimal
Dim index as Integer
For i = 0 To 599 ' 600 boucles
valeur = 0
moy1 = 0
moy2 = 0
Index = i * 10
For j = 0 To 9 ' à faire 10 fois
moy1 = moy1 + tableau(index + j, 1)
moy2 = moy2 + tableau(index + j, 2)
Next j
valeur = (moy1 / 10) / (moy2 / 10)
If valeur > valeur_max Then valeur_max = valeur
Next i
remarque
valeur = (moy1 / 10) / (moy2 / 10)
peut se simplifier par
valeur = moy1 / moy2
(100/10)/(50/10) est équivalent à 100/50
10 / 5 est égal à 100 / 50
- Messages postés
- 12572
- Date d'inscription
- mardi 11 mars 2003
- Statut
- Messages postés
- 1749
- Date d'inscription
- samedi 11 janvier 2014
- Statut
La structure est à la classe ce que le tableau est à la collection.... ;-)
- Messages postés
- 1749
- Date d'inscription
- samedi 11 janvier 2014
- Statut
- Messages postés
- 12572
- Date d'inscription
- mardi 11 mars 2003
- Statut
Donc mieux vaut une classe qu'une structure ainsi qu'une collection plutôt qu'un tableau
Plus facile pour moi à visualiser le mécanisme dans ma tête qu'à me servir de ce même mécanisme dans le code surtout au niveau classe et structure
Pour les collections je commence à pas trop mal les maitriser
Merci pour toutes ces infos Whis
Plus facile pour moi à visualiser le mécanisme dans ma tête qu'à me servir de ce même mécanisme dans le code surtout au niveau classe et structure
Pour les collections je commence à pas trop mal les maitriser
Merci pour toutes ces infos Whis
- Messages postés
- 12572
- Date d'inscription
- mardi 11 mars 2003
- Statut
- Messages postés
- 1749
- Date d'inscription
- samedi 11 janvier 2014
- Statut
Un petit exemple vite fait.
D'abord la classe
Et le traitement, la première partie sert à initialiser des données et la 2eme à faire "la moyenne glissée"
D'abord la classe
Public Class Division Public Sub New(ByVal LeNumerateur As Double, ByVal LeDenominateur As Double) 'constructeur avec les deux nombres à diviser Numerateur = LeNumerateur Denominateur = LeDenominateur End Sub Public Property Numerateur() As Double Public Property Denominateur() As Double Public ReadOnly Property Quotient() As Double 'propriété en lecture seule qui retourne le quotient Get Return Numerateur / Denominateur End Get End Property End Class
Et le traitement, la première partie sert à initialiser des données et la 2eme à faire "la moyenne glissée"
'======Initilialisation Dim mesDivisions(49) As Division Dim rnd As New Random() For i As Integer = 0 To 49 mesDivisions(i) = New Division(rnd.NextDouble(), rnd.NextDouble()) Next i '======="moyenne glissée" selon Fran974 Dim lesQuotients As New List(Of Double)() For i As Integer = 0 To 49 Step 10 lesQuotients.Add(mesDivisions.Skip(i).Take(10).Average(Function(x) x.Quotient)) Next i Dim MoyenneMaxi As Double = lesQuotients.Max()
- Messages postés
- 1749
- Date d'inscription
- samedi 11 janvier 2014
- Statut
- Messages postés
- 12572
- Date d'inscription
- mardi 11 mars 2003
- Statut
Salut Whis
un chef d’œuvre ce code
Je me le garde
On n'a aucune nouvelle du postulant en tout cas
un chef d’œuvre ce code
Je me le garde
On n'a aucune nouvelle du postulant en tout cas
- Messages postés
- 12572
- Date d'inscription
- mardi 11 mars 2003
- Statut
- Messages postés
- 1749
- Date d'inscription
- samedi 11 janvier 2014
- Statut
Salut, c'est pas La Naissance de Venus non plus hein!
- Messages postés
- 18039
- Date d'inscription
- lundi 7 décembre 2009
- Statut
Bonjour à tous,
J'aimerais connaître la signification précise que donne Fran974 aus termes "moyenne glissée".
S'agit-il :
1) - d'une moyenne glissante, donc mobile
ou
2) - d'une moyenne "lissée"
Si réponse 2 : indiquer de manière précise (en langage naturel) la manière décidée pour "lisser"
Si réponse 1 : le code que je vois, tant en ce qui concerne moy_1 que moy_2, n'est pas celui du calcul d'une moyenne glissante !
J'aimerais connaître la signification précise que donne Fran974 aus termes "moyenne glissée".
S'agit-il :
1) - d'une moyenne glissante, donc mobile
ou
2) - d'une moyenne "lissée"
Si réponse 2 : indiquer de manière précise (en langage naturel) la manière décidée pour "lisser"
Si réponse 1 : le code que je vois, tant en ce qui concerne moy_1 que moy_2, n'est pas celui du calcul d'une moyenne glissante !
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.