Forum de Statistiques
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Les posteurs les plus actifs de la semaine
Aucun utilisateur

Le deal à ne pas rater :
Cartes Pokémon 151 : où trouver le coffret Collection Alakazam-ex ?
Voir le deal

Reshape.

2 participants

Aller en bas

Reshape. Empty Reshape.

Message par FMarwen Mer 14 Mai 2014 - 9:36

Bonjour à tous,

Je travaille sur des données de la fforme de l'image ci jointe(1), et je voudrais transformer les données de tableau de la forme suivante: image(2).
Est ce que la fonction "Reshape" résoudre ce problème? si oui, comment s’écrit le code SVP!
Merci beaucoup d'avance.
Fichiers joints
Reshape. Attachment
1.PNG Vous n'avez pas la permission de télécharger les fichiers joints.(48 Ko) Téléchargé 3 fois
Reshape. Attachment
2.PNG Vous n'avez pas la permission de télécharger les fichiers joints.(18 Ko) Téléchargé 2 fois

FMarwen

Nombre de messages : 226
Date d'inscription : 17/04/2013

Revenir en haut Aller en bas

Reshape. Empty Re: Reshape.

Message par droopy Mer 14 Mai 2014 - 13:29

Bonjour,

essaie ça :
Code:
tab <- structure(list(ind = 1:3, c130 = c(178, 82, 139), Statut = structure(c(3L,
2L, 1L), .Label = c("Cd", "d", "D"), class = "factor"), AzP = c(373,
286, 48), DistP = c(81, 43, 63), a1 = c(35, 272, 288), d1 = c(513,
243, 385), a2 = c(27, 221, 225), d2 = c(429, 172, 241)), .Names = c("ind",
"c130", "Statut", "AzP", "DistP", "a1", "d1", "a2", "d2"), row.names = c(NA,
-3L), class = "data.frame")

reshape(tab, idvar=colnames(tab)[1:5], varying=list(c(6,8),c(7,9)),direction="long", v.names=c("a" ,"d"))
Cdlt
droopy
droopy

Nombre de messages : 1156
Date d'inscription : 04/09/2009

Revenir en haut Aller en bas

Reshape. Empty Re: Reshape.

Message par FMarwen Jeu 15 Mai 2014 - 14:18

Merci droopy, mais ça marche pas !

FMarwen

Nombre de messages : 226
Date d'inscription : 17/04/2013

Revenir en haut Aller en bas

Reshape. Empty Re: Reshape.

Message par droopy Jeu 15 Mai 2014 - 14:42

Qu'est-ce qui ne fonctionne pas ?
Chez moi j'obtiens ceci avec mon exemple
Code:
tab2 <- reshape(tab, idvar=colnames(tab)[1:5], varying=list(c(6,8),c(7,9)),direction="long", v.names=c("a" ,"d"))
tab2[do.call(order, tab2[c(1,3)]),]
                ind c130 Statut AzP DistP time  a  d
1.178.D.373.81.1  1  178      D 373    81    1  35 513
1.178.D.373.81.2  1  178      D 373    81    2  27 429
2.82.d.286.43.1    2  82      d 286    43    1 272 243
2.82.d.286.43.2    2  82      d 286    43    2 221 172
3.139.Cd.48.63.1  3  139    Cd  48    63    1 288 385
3.139.Cd.48.63.2  3  139    Cd  48    63    2 225 241
ce qui ressemble bien à ton deuxième fichier.
droopy
droopy

Nombre de messages : 1156
Date d'inscription : 04/09/2009

Revenir en haut Aller en bas

Reshape. Empty Re: Reshape.

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut


 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum