Agrégation et comptage de données

Veuillez me pardonner d'avance si ma question peut sembler triviale.
J'ai actuellement un problème avec R que je n'arrive pas à résoudre.
Vous semblez très actif sur ce forum et j'espère pouvoir un jour m'en sortir.
Ainsi, j'ai une table contenant des dates et des chiffres et du texte. Ce texte représente une clef et peux apparaitre plusieurs fois.
J'aimerais effectuer un regroupement par période (mois, année) pour obtenir le nombre de clef différentes par période.
01/01/2017 cleA
01/02/2017 cleA
02/02/2017 cleB
03/02/2017 cleA
01/03/2017 cleB

Ainsi, j'aimerais obtenir
Janvier 1 (1 seule clé)
Février 2 (2 clé déférentes uniquement)
Mars 1

une variante serait comme un tableau croisé
Cle mois
cleA janvier
cleaB fevrier mars

merci par avance

Bonjour,

Voici un petit code avec la fonction "substr" qui permet de sélectionner l'emplacement de ta chaine de caractère que tu veux copier (ici le mois et l'année) :

Code:

data=matrix(,4,3)
data[,1]=c("01/01/2017","01/03/2017","01/02/2017","01/01/2017")
data[,2]=c("A","A","B","B")
data[,3]=substr(data[,1],4,10)

Ensuite tu fais un "table" des deux variables qui t'intéressent :

Code:

table(data[,3],data[,2])

Bonjour,

avec les packages tidyr et dplyr (qui font partie de tidyverse) :

Code:

df <- structure(list(date = structure(c(1L, 2L, 4L, 5L, 3L), .Label = c("01/01/2017",
"01/02/2017", "01/03/2017", "02/02/2017", "03/02/2017"), class = "factor"),
    cle = structure(c(1L, 1L, 2L, 1L, 2L), .Label = c("cleA",
    "cleB"), class = "factor")), .Names = c("date", "cle"), class = "data.frame", row.names = c(NA,
-5L))

df %>% separate(date, into = c("jour", "mois", "annee"), sep = "/") %>%
  group_by(annee, mois) %>% summarise(N = n_distinct(cle))

# avec xtabs :
 xtabs( ~ cle +  mois, df %>% separate(date, into = c("jour", "mois", "annee"), sep = "/"))


cdlt