[PDF] Jonathan Lenoir Pour importer des données

View - Download Jonathan Lenoir

Previous PDF

Next PDF

Manipulation et

visualisation de données dans R Jonathan Lenoir (MCU), jonathan.lenoir@u-picardie.fr http://www.u-picardie.fr/edysan/

Plan du cours

Chapitre 2 : Manipulation et visualisation de données dans R

2.1. Quelques fonctions utiles pour manipuler ses données

2.2. Quelques fonctions utiles pour visualiser ses données

2.3. Applications

2.3.1. À partir de données simulées

2.3.2. À partir de données réelles

2.3.2.1 Issues de tableaux de données (data frame)

Plan du cours

Chapitre 2 : Manipulation et visualisation de données dans R

2.1. Quelques fonctions utiles pour manipuler ses données

2.2. Quelques fonctions utiles pour visualiser ses données

2.3. Applications

2.3.1. À partir de données simulées

2.3.2. À partir de données réelles

2.3.2.1 Issues de tableaux de données (data frame)

Importer des données

Pour importer des données stockée dans un fichier texte (.txt) ou excel ¾Syntaxe : read.table(file, header, sep, dec, ...) -file: nom du fichier (e.g., .txt) -header: argument de type booléen TRUE ou FALSE (par défaut) permettant (TRUE) ou non (FALSE) la première ligne du fichier de données contient le nom des variables -sep -dec décimales

Exemple à partir de données de tableur

Ouvrez Excelet remplissez le tableau de données suivant :

Individus (id)Poids (g)Taille (mm)Sexe (F/M)

131185F

225169F

329177F

430180F

531185F

628180F

731181F

829179F

929176F

1033194F

1128181M

1229184M

1330191M

1429178M

1527175M

1626172M

1727178M

1828178M

1925171M

2028173M

Souris des Cactus (Peromyscuseremicus)

Enregistrez dans votre répértoire de travail le tableau de données au un séparateur de type tabulation :

Importation dans R

> souris <-read.table("souris.txt", header=TRUE, sep="\t") > str(souris) 'data.frame': 20 obs. of 4variables: $ Individus..id.: int 1 2 3 4 5 ... $ Poids..g. : int 31 25 29 30 31 ... $ Taille..mm. : int 185 169 177 180 185 ... $ Sexe..F.M. : Factor w/ 2 levels "F","M": 1 1 1 1 1 ... $PPHQPLRQAAA 5 Q›MLPH SMV certains symboles du types parenthèses etc. Il pourrait donc être utile de renommer les variables

R à bien codé la

YMULMNOH ™6H[H™ HQ

variable qualitative (factor) à deux modalités

Renommer des variables

> names(souris) [1] "Individus..id." "Poids..g." "Taille..mm." "Sexe..F.M." > names(souris) <-c("ind", "poids", "taille", "sex") > str(souris) 'data.frame': 20 obs. of 4 variables: $ ind: int1 2 3 4 5 6 7 8 9 10 ... $ poids: int31 25 29 30 31 28 31 29 29 33 ... $ taille: int185 169 177 180 185 180 181 179 176 194 ... $ sex : Factor w/ 2 levels "F","M": 1 1 1 1 1 1 1 1 1 1 ... > souris$ind <-as.character(souris$ind) > souris$poids <-as.numeric(souris$poids) > souris$taille <-as.numeric(souris$taille) > str(souris) 'data.frame': 20 obs. of 4 variables: $ ind: chr"1" "2" "3" "4" ... $ poids: num31 25 29 30 31 28 31 29 29 33 ... $ taille: num185 169 177 180 185 180 181 179 176 194 ... $ sex : Factor w/ 2 levels "F","M": 1 1 1 1 1 1 1 1 1 1 ... (e.g., numeric), on utilise les fonctions etc.

Sélectionner un sous-ensemble de données

Pour sélectionner un sous-ensemble de données qui répondent à

¾Syntaxe : which(x, arr.ind)

-x -arr.ind: argument de type booléen TRUE ou FALSE (par défaut) permettant données pour lesquelles la condition se réalise (TRUE) ide position de chacune des données pour lesquelles la condition se réalise (TRUE) > souris$sex [1] F F F F F F F F F F M M M M M M M M M M

Levels: F M

> souris$sex=="F" [1] TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE > which(souris$sex=="F") [1] 1 2 3 4 5 6 7 8 9 10 > index <-which(souris$sex=="F") > souris[index, c("ind", "poids", "sex")] ind poids sex

1 1 31 F

2 2 25 F

3 3 29 F

4 4 30 F

5 5 31 F

Où sont les femelles ?

Construire une table de contingence

une table de contingence :

¾Syntaxe : table(list, exclude, useNA, ...)

-list -exclude: vecteur contenant les modalités à exclure du calcul de la table de contingence, si besoin -useNA: argument à trois options permettant de gérer la présence de valeurs non-attribuées ou manquantes (NA) dans les données Le résultat renvoyé est une table de contingence avec les effectifs par > souris[, "pel"] <-c(rep("B", 3), rep("G", 10), rep("B", 7)) > table(souris$sex, souris$pel) B G F 3 7 M 7 3

Combiens de mâles et de femelles ?

calculer les effectifs chez les deux sexes : > table(souris$sex) F M 10 10 premiers individus au pelage brun, les dix suivants au pelage gris et les septs derniers au pelage brun puis calculer la table de contingence

Obtenir des informations par modalités

Pour calculer rapidement des informations statistiques (moyenne, variance, écart-

¾Syntaxe : tapply(x, index, fun, ...)

-x quantitatives représentant une variable quantitative -indexxet qui renseigne pour chaque observation du vecteur x, les modalités de la variable qualitative étudiée -fun: la fonction de calcul utilisée (e.g., moyenne, variance, écart- type, etc.) > tapply(souris$poids, list(souris$sex, souris$pel), mean)

B G

F 28.33333 30.14286

M 27.14286 29.00000

Poids moyens des mâles et des femelles ?

calculer le poids moyen chez les deux sexes : > tapply(souris$poids, souris$sex, mean)

F M

29.6 27.7

Même question mais cette fois-ci par modalité croisée des variables

Poids moyens des mâles et des femelles ?

NB : pour calculer les poids moyens par sexe, on peut également > F <-souris[souris$sex=="F", "poids"] > M <-souris[souris$sex=="M", "poids"] > lapply(list(F, M), mean) [[1]] [1] 29.6 [[2]] [1] 27.7

Découper des chaînes de caractères

¾Syntaxe : strsplit(x, split, ...)

-x -split: une séquence de lettres, de mots ou de caractères recherchée xet permettant de redécouper ce texte en plus petites sections détectées avant et aprés la séquence de caractères est un vecteur de caractères contenant les sections de texte > strsplit(liste_esp, " ") [[1]] [1] "Peromyscus" "californicus" [[2]] [1] "Peromyscus" "eremicus" [[3]] [1] "Peromyscus" "interparietalis" [[4]] [1] "Peromyscus" "dickeyi" suivante : > liste_esp <-c("Peromyscus californicus", "Peromyscus eremicus", "Peromyscus interparietalis", "Peromyscus dickeyi")

Peromyscus

Sélectionner par séquence de caractères

¾Syntaxe : grep(pattern, x, ...)

-pattern: une séquence de lettres, de mots ou de caractères recherchée dans le texte qui est contenu x -x: charactercontenant des éléments de texte et dans lequel chaque élément sera scanné pour détecter la séquence de caractères recherchée ide position des éléments de xpour lesquelles la séquence de caractères recherchée a été détectée > sel <-lapply(strsplit(liste_esp, " "), function (x) x[2]) > sel [[1]] [1] "californicus" [[2]] [1] "eremicus" [[3]] [1] "interparietalis" [[4]] [1] "dickeyi" > index <-grep("us", sel) > liste_esp[index] [1] "Peromyscus californicus" "Peromyscus eremicus"

Exemple de sélection

Plan du cours

Chapitre 2 : Manipulation et visualisation de données dans R

2.1. Quelques fonctions utiles pour manipuler ses données

2.2. Quelques fonctions utiles pour visualiser ses données

2.3. Applications

2.3.1. À partir de données simulées

2.3.2. À partir de données réelles

2.3.2.1 Issues de tableaux de données (data frame)

Les principales fonctions

Pour tracer un graphique de données :

¾hist(x, ...)

¾plot(x, y, ...)

¾contour(x, y, z, ...)

¾image(x, y, z, ...)

Pour ajouter des éléments à un graphique existant :

¾abline(a, b, h, v, ...)

¾points(x, y, ...)

¾lines(x, y, ...)

¾segments(x0, y0, x1, y1, ...)

¾polygon(x, y, ...)

Pour contrôler les paramètres graphiques :

¾par(font.axis, font.lab, font.main, font.sub, mfrow, ...)

¾windows(width, height, ...)

Histogrammes

> T <-souris$taille > hist(T, main="Taille (cm)", xlab="Classes", ylab="Nb. ind.") > hist(T, breaks=seq(160, 200, 2), main="Taille (cm)", xlab="Classes", ylab="Nb. ind.")

Nuages de points

> x <-1:10 > y<-x+x^2 > plot(x, y, main="Un nuage de points", type="p")

Plusieurs types de représentation

¾type="h"¾type="s"¾type="n"

Les symboles

des symboles du nuage de points : > x <-1:25 > y<-rep(1, 25) > plot(x, y, pch=x, axes=FALSE, xlab="Codes symboles", ylab="", cex.lab=2) > axis(side=1, at=seq(1, 25, 1))

La taille des symboles

symboles du nuage de points :quotesdbs_dbs9.pdfusesText_15

[PDF] comment tracer une courbe sur excel 2007

[PDF] casio fx 92 affichage décimal

[PDF] mode d'emploi calculatrice casio fx-92

[PDF] casio fx 92 speciale college mode demploi

[PDF] mode d'emploi casio graph 35+e

[PDF] racine carré calculatrice casio fx-92

[PDF] casio graph 35+ mode d'emploi pdf

[PDF] enthalpie libre standard de réaction

[PDF] enthalpie libre et potentiel chimique

[PDF] enthalpie libre standard de formation

[PDF] enthalpie libre définition

[PDF] delta r g 0

[PDF] enthalpie libre standard unité

[PDF] enthalpie libre négative

[PDF] evolution d'un système chimique corrigé