Graphiques sous R?

Bonjour, j'utilise (je teste) le langage R. J'utilise Factominer et l'interface graphique R-commander. Et j'essaye de produire des graphiques.

J'ai quelleque difficulté pour certaine de es attentes:
- Comment produire un graphique avec plusieurs courbe-écart-type avec des plage de données (et non l'ensemble des valeurs)
-comment produire un diagramme en baton avec plusieur classement ( un groupe de bâton par jour séparé par le traitement)
Comment mettre plusieurs variables réponses sur le même histogramme.

Merci d'avance

Bonjour,

1. sélectionner tes données qui sont dans la plage que tu souhaites, regarde du côté de la fonction subset par exemple.

2. regarde dans l'aide de la fonction barplot il y a quelque chose qui ressemble beaucoup à ce que tu cherches faire.

3. tout dépend de ce que tu cherches à faire, si tu veux afficher des histogramme cumulés ou non. A priori ce ne sera pas direct il te faudra programmer un peu.

Merci... Alors l'aide me donne cela:
barplot(height, width = 1, space = NULL, names.arg = NULL, legend.text = NULL, beside = FALSE, horiz = FALSE, density = NULL, angle = 45, col = NULL, border = par("fg"), main = NULL, sub = NULL, xlab = NULL, ylab = NULL, xlim = NULL, ylim = NULL, xpd = TRUE, log = "", axes = TRUE, axisnames = TRUE, cex.axis = par("cex.axis"), cex.names = par("cex.axis"), inside = TRUE, plot = TRUE, axis.lty = 0, offset = 0, add = FALSE, args.legend = NULL, ...)

Je veut faire un diagramme d'abord en fonction d'une variable jour (J=0-1-2-3) chacune divisé selon la variable traitement (T= 1 ou 2)

Concrétement, quelle commande dois-je essayer?

tu n'es pas allé assez loin dans l'aide.

Regarde l'exemple suivant :

Code:

hh <- t(VADeaths)[, 5:1]
mybarcol <- "gray20"
mp <- barplot(hh, beside = TRUE,
        col = c("lightblue", "mistyrose",
                "lightcyan", "lavender"),
        legend = colnames(VADeaths), ylim= c(0,100),
        main = "Death Rates in Virginia", font.main = 4,
        sub = "Faked upper 2*sigma error bars", col.sub = mybarcol,
        cex.names = 1.5)


Il semble correspondre à ce que tu recherches. A toi de mettre en forme tes données pour reproduire le même type de graph.

Alors pas à pas....

Code:

> histo <- t(mache1)[2:4,]

> histo
  [,1]    [,2]    [,3]    [,4]    [,5]    [,6]    [,7]    [,8]   
MR " 99.06" "113.70" "114.93" "106.78" "101.74" " 81.45" " 86.69" " 88.58"
J  "1"      "1"      "1"      "1"      "1"      "1"      "1"      "1"   
T  "2"      "2"      "2"      "2"      "2"      "1"      "1"      "1"   
  [,9]    [,10]    [,11]    [,12]    [,13]    [,14]    [,15]    [,16] 
MR " 85.10" " 81.31" "107.51" "113.58" "126.86" "130.84" "122.28" " 75.25"
J  "1"      "1"      "2"      "2"      "2"      "2"      "2"      "2"   
T  "1"      "1"      "2"      "2"      "2"      "2"      "2"      "1"   
  [,17]    [,18]    [,19]    [,20]    [,21]    [,22]    [,23]    [,24] 
MR " 80.14" " 77.65" " 75.34" " 74.48" "109.51" "139.96" "168.29" "134.22"
J  "2"      "2"      "2"      "2"      "3"      "3"      "3"      "3"   
T  "1"      "1"      "1"      "1"      "2"      "2"      "2"      "2"   
  [,25]    [,26]    [,27]    [,28]    [,29]    [,30]    [,31]    [,32] 
MR "142.05" " 58.12" " 61.43" " 68.52" " 64.57" " 69.22" "120.84" "149.26"
J  "3"      "3"      "3"      "3"      "3"      "3"      "4"      "4"   
T  "2"      "1"      "1"      "1"      "1"      "1"      "2"      "2"   
  [,33]    [,34]    [,35]    [,36]    [,37]    [,38]    [,39]    [,40] 
MR "165.55" "145.36" "136.69" " 51.82" " 65.04" " 60.14" " 71.07" " 61.83"
J  "4"      "4"      "4"      "4"      "4"      "4"      "4"      "4"   
T  "2"      "2"      "2"      "1"      "1"      "1"      "1"      "1"   

> mybarcol <- "gray20"

La j'ai un objet avec ma valeur réponces "MR" et mes variable entré "J" et "T"

Code:

> mp <- barplot(histo, beside = TRUE,
+        col = c("lightblue", "mistyrose",
+                "lightcyan", "lavender"),
+        legend = colnames(mache1), ylim= c(0,100),
+        main = "Death Rates in Virginia", font.main = 4,
+        sub = "Faked upper 2*sigma error bars", col.sub = mybarcol,
+        cex.names = 1.5)

et ça répond

Code:

 5] ERREUR: 
  argument non numérique pour un opérateur binaire

ou est ce que je me trompe?

Les "" t'indiquent que les valeurs stockées dans ta matrice ne sont pas des nombres mais des caractères, d'où le "argument non numérique". Ce que tu peux aussi savoir en faisant mode(histo). Il te faut transformer tes valeurs en numérique :

Code:

hisot <-  matrix(as.numeric(histo),nrow(histo))

Alors, j'ai tenté...
[code]hisot <- matrix(as.numeric(histo),nrow(histo))
mp <- barplot(hisot, beside = TRUE, col = c("lightblue", "mistyrose",
"lightcyan", "lavender"),
legend = colnames((mache1)[2:4,]), ylim= c(0,100),
main = "Test d'histogramme", font.main = 4,
sub = "Faked upper 2*sigma error bars", col.sub = mybarcol,
cex.names = 1.5) [code] J'ai un diagramme bâton. manque les barres d'erreur. la légende n'est pas bonne...
mais ça prend allure

il est normal que la légende ne corresponde pas ... tu as utilisé 4 couleurs pour représenter 3 colonnes du coup les barres d'un même groupe ne sont pas colorées de la même façon.

Code:

barplot(histo, beside=T,col = c("lightblue", "mistyrose","lightcyan"),legend=rownames(histo))