Discussion :

[bowow]

Bonjour,

Je souhaiterais parser un fichier csv et dresser un histogramme sous R.

Jusqu'à présent, j'avais écris ceci:

Code :

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

1
2
3
setwd("C:/progs/")
pourcent <- read.table("Homp.csv", sep = ";", header = TRUE, dec = ",")
attach(pourcent)

Les données s'organisent ainsi:
A 14
B 22
C 33

Pour un nom de données "A" en abscisse, je voudrais associer un nombre 14 en ordonnées et ainsi de suite..

Comment dois je formatter mon fichier csv ?
A;14
B;22
C;33
??
Comment utiliser la fonction hist() pour obtenir un histogramme répondant à mes souhaits? (il faudrait que les A B et C s'affichent en abscisse, en verticale ça serait parfait!)

Merci.

[dev_ggy]

Bonjour,

Je ne suis pas sûr de comprendre toute ta demande. La question de l'histogramme avec A, B, C en abscisse pour le quel je ne suis pas sur de répondre correctement à ta demande.

Mais, concernant ton "csv". Tu dois avoir un point virgule entre chaque valeur comme tu l'as noté. Un échappement en fin de ligne "\n". En générale invisible sous les éditeurs de textes. C'est normal que tu ne le voies pas.

Concernant l'histogramme une bibliothèque très bien faite pour toute sorte de graphiques c'est ggplot2.

Avec elle tu peux coder cela(voire ci-dessous). Qui peut ressembler un peu à ce que je comprends de ta demande :

Code :

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

ggplot(data, aes(V2, fill = V1)) + geom_histogram()

avec data tes données, V1 ta colonne 1 et V2 ta colonne 2.

Cordialement.

[bowow]

J'ai finalement écris ceci:

Code :

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

1
2
3
4
5
6
7
8
setwd("C:/progs/")
matrix <- read.table("Homp.csv", sep = ";", header = TRUE, dec = ",")
attach(matrix)
p <- matrix[,1]
pourcentages <- matrix[,2]
m <- mean(pourcentages)
par(mar=c(7, 4, 4, 2) + 0.1)
barplot(pourcentages, names.arg=p, space=FALSE, col = "black", border = "white", las=2, main = "test", ylab = "Y label")

Problème:
- Je voudrais afficher la moyenne "m" sur l'histogramme, sur une ligne et afficher sa valeur numérique précise, si c'est possible.

merci

[dev_ggy]

Bonjour,

Avec la fonction lines pour la ligne de moyenne et text ou mtext selon ou tu veux placer ton texte, tu devrais t'en sortir.

Cordialement.

[bowow]

Bonjour,

Je n'ai pas encore réussi à utiliser correctement la fonction line.. il m'affiche bien la valeur, mais uniquement un petit carré à un endroit dans l'histogramme.

Je rebondis sur un autre problème, je souhaiterais colorier les barres de l'histogramme différemment selon le type de données. J'ai écris ceci juste avant le barplot():

Code :

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

1
2
3
4
len <- length(matrix)
for (i in 1:len) {
if (matrix[i,1] == "XXXX") { col = "blue" }
}

En procédant ainsi, ça devrait fonctionner non ?

[dev_ggy]

Excuse-moi, j'ai fait une petite faute, c'est lines et non line.

Concernant les couleurs tu dois dans ton barplot rajouter un vecteur des couleurs que tu veux tu utiliser. Une couleur par classe.

Exemple si tu as deux classes.

Code :

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

1
2
3
 
color <- c("red", "bleu")
barplot(pourcentages, names.arg=p, space=FALSE, col = color, border = "white", las=2, main = "test", ylab = "Y label")

Cordialement.