Extraction de données d'un data.frame

Bonjour,

Mes données sont présentés comme le tableau suivant (normalement sur une année complète avec une vingtaine de données par jours) :

Date	Turbidite	Niveau	Débit
01/01/2012	1	1	500
01/01/2012	2	2	500
02/01/2012	1	1	600
02/01/2012	2	2	600

Mon problème : j'ai besoin d'extraire pour chaque date -> 1 valeur maximale de turbidité, 1 valeur maximale de niveau (hauteur d'eau) et la valeur de débit.

Mais je ne sais pas s'il faut utiliser une boucle for, la fonction apply ou autre...

Merci par avance aux personnes qui sauront m'aider :)

Bonjour

Code:

---

aggregate(Turbidite ~ Date, Data, FUN=max)

---

Je ne suis pas sur du sens de la formule entre Turbidite et Date, mais l'idée doit être là.
Au plaisir.

Génial !

C'est exactement ce qu'il me fallait, maintenant j'aimerai savoir comment les remettre dans l'ordre car c'est dans un format désorganisé :/

Date Turbidite
1 01/02/12 83
2 01/03/12 232
3 01/04/12 412
4 01/05/12 187
5 01/06/12 147
6 01/07/12 235
7 01/08/12 263
8 01/09/12 703
9 01/10/12 967
10 01/11/12 777
11 01/12/12 594
12 02/02/12 131
13 02/03/12 305
14 02/04/12 489

Ensuite je pourrai créer une matrice avec mes données et les traiter :D

Ca me fait plaisir de voir autant d’entrain.

Pour trier des dates

Code:

---

1 2	Data$Date <- as.Date(Data$Date) Data[order(Data$Date),]

---

Au plaisir.

C'est naturel vous m'aidez grandement :)

En tapant vos lignes de code, voilà mon résultat. Le soucis vient-il des données ou de moi ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Turb<-aggregate(Turbidite ~ Date, complet2012, FUN=max) Turb$Date <- as.Date(Turb$Date) Turb[order(Turb$Date),] Date Turbidite 1 0001-02-12 83 2 0001-03-12 232 3 0001-04-12 412 4 0001-05-12 187 5 0001-06-12 147 6 0001-07-12 235 7 0001-08-12 263 8 0001-09-12 703 9 0001-10-12 967

---

Essayez ceci :

Code:

---

as.Date(Turb$Date, "%d/%m/%y")

---

Au lieu de :

Code:

---

as.Date(Turb$Date)

---

Au plaisir.

Je viens d'essayer avec :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Turb[order(Turb[,1],decreasing=F), ] Date Turbidite 1 01/02/12 83 2 01/03/12 232 3 01/04/12 412 4 01/05/12 187 5 01/06/12 147 6 01/07/12 235 7 01/08/12 263 8 01/09/12 703 9 01/10/12 967

---

Cela ne marche pas non plus, après si je modifie mes données sous EXCEL avec pour le 24/01/12 = 24 cela pourrait très bien marcher mais je perdrais la date en tant que telle :/

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

> Turb$Date <- as.Date(Turb$Date, "%d/%m/%y") > Turb[order(Turb$Date),] Date Turbidite 245 2012-01-24 116 257 2012-01-25 137 269 2012-01-26 185 281 2012-01-27 132 293 2012-01-28 127 305 2012-01-29 97 317 2012-01-30 81 328 2012-01-31 82 1 2012-02-01 83

---

Ca marche :)

Merci beaucoup pour votre aide :)

Bonne soirée :)