Discussion :

[antoyou]

Bonjour, comme présenté dans la photo, je dois regrouper les même InvoiceNo ensemble afin de connaître le produit qui se trouve le plus au sein des transactions. Comment puis-je réussir ? J'ai essayé avec library(tidyverse), mais je n'arrive pas à télécharger ce package. Merci

[mgdondon]

Bonjour,

Votre demande manque de précision. Pour ce que je crois en comprendre :

• Tri des données

Code :

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

1
2
df <- read.csv("D:/temp/test.txt")
df <- df[order(df$InvoiceDate,-df$Quantity),]

• Sélection de la première observation de chaque groupe

Code :

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

1
2
3
myBys <- data.frame(df$InvoiceDate)
selec <- by(df, myBys, head, n=1)
selec <- do.call(rbind, selec)

• Résultat

Code :

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

1
2
3
4
5
> selec
               InvoiceNo StockCode                    Description Quantity    InvoiceDate UnitPrice CustomerlD        Country
12/1/2010 8:26    536365    84406B CREAM CUPID HEARTS COAT HANGER        8 12/1/2010 8:26      2.75      17850 United Kingdom
12/1/2010 8:28    536366     22633         HAND WARMER UNION JACK        6 12/1/2010 8:28      1.85      17850 United Kingdom
12/1/2010 8:34    536367     84879  ASSORTED COLOUR BIRD ORNAMENT       32 12/1/2010 8:34      1.69      13047 United Kingdom

Cordialement,

PS : Joignez un fichier txt plutôt qu'une copie d'écran, c'est plus facilement exploitable...