Discussion :

[bouda53]

Bonjours à vous,

J'ai un problème que je n'arrive pas à résoudre et c'est un problème récurrent sous R.

Je m'explique :
Je voudrais organiser par colonnes mes données sélectionnées par facteurs.
Le souci c'est que les colonnes n'ont pas le même nombre d'observations, donc à chaque fois que je fais un cbind ou un rbind, R me dit que les arguments n'ont pas la même longueur.

Et donc comment faire, pour ne pas avoir de réplication?
Ou comment créer une matrix (avec x,y,z) même si c'est avec des NA pour compléter?

Exemple :

Code :

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

1
2
3
4
5
6
7
x<-c(1,2,3,4,5,6)
y<-c(77,88,55,66,99,88,77,44,55,66,33,77,55,66,33,22)
z<-c(1,3,6,8,7,6,55,66,9)
 
aa<-rbind(x,y,z)
Avis dans rbind(x, y, z) :
  number of columns of result is not a multiple of vector length (arg 1)

Merci d'avance.

[MMDM12]

Bonjour,
Je ne pense pas qu'il soit possible d'utiliser les fonctions rbind, cbind, matrix, data.frame avec des arguments de tailles différentes.
Sinon tu peux faire une liste

Code :

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

 L <- list(x=x,y=y,z=z)

et si tu souhaites accéder à x par exemple tu fais L$x, le premier élément de x : L$x[1], ainsi de suite.
Si tu souhaites appliquer une fonction à chaque élément tu peux utiliser les fonctions sapply, lapply ,....

Bonne continuation.

[bouda53]

Merci pour le réponse,
et si j'ai bien compris je suis bel est bien bloqué pour continuer

car j'ai besoin d'une matrice pour pouvoir faire ça:


http://addictedtor.free.fr/graphique...y.php?graph=54

[Guinue]

Bonjour,

Si le nombre d'objets n'est pas trop important tu peux tenter ça :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
x<-c(1,2,3,4,5,6)
y<-c(77,88,55,66,99,88,77,44,55,66,33,77,55,66,33,22)
z<-c(1,3,6,8,7,6,55,66,9)
 
temp <- c(length(x),length(y),length(z))
> temp
[1]  6 16  9
 
length(x) <- max(temp)
length(y) <- max(temp)
length(z) <- max(temp)
 
> x
 [1]  1  2  3  4  5  6 NA NA NA NA NA NA NA NA NA NA
> y
 [1] 77 88 55 66 99 88 77 44 55 66 33 77 55 66 33 22
> z
 [1]  1  3  6  8  7  6 55 66  9 NA NA NA NA NA NA NA
 
aa<-rbind(x,y,z)
 
 > aa
  [,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13] [,14] [,15] [,16]
x    1    2    3    4    5    6   NA   NA   NA    NA    NA    NA    NA    NA    NA    NA
y   77   88   55   66   99   88   77   44   55    66    33    77    55    66    33    22
z    1    3    6    8    7    6   55   66    9    NA    NA    NA    NA    NA    NA    NA

Si il y a beaucoup d'objets, il faudra peut-être faire une fonction qui se charge de les mettre tous à la même longueur que le plus grand. (ce qui ne pose pas de souci tu as vu, en disant que la longueur de x vaut celle de y, si y est plus grand que x, R rajoute des cases dont la valeur est NA.)

En espérant avoir aidé

A bientôt

[bouda53]

Merci pour la réponse .