Discussion :

[SebCBien]

Bonjour,

Voici un data frame avec 2 colonnes : le nombre d'habitants par ville et le pays.

Code :

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

1
2
3
4
5
6
7
8
Pays Ville
FR   100.000
FR   75.000
FR   33.000
ES   49.000
ES   42.000
ES   25.000
ES   18.000

Comment extraire la n^ème ligne pour chaque pays ?
Ex : si je sélectionne la 3ème ligne, j'obtiens :

Code :

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

1
2
3
Pays Ville
FR   33.000
ES   25.000

Espérant avoir été assez explicite.

[Theta]

Une façon de faire parmis d'autres :

Code :

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

Reduce(rbind,by(DF,DF['Pays'],function(df){cbind(df,n=1:nrow(df))}))

Après il suffit de filtrer avec la nouvelle colonne.

[A. D.]

Bonjour,

Une autre manière de procéder en ayant recours au package "dplyr" (ici sélection de la 2ème ligne pour chaque pays) :

Code :

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

1
2
3
require(dplyr)
 
group_by(DF, Pays) %>% mutate(n = 1:n()) %>% filter(n == 2) %>% select(Pays, Ville)

Cordialement,


A.D.

[ced]

Allez, encore une autre solution, avec le package data.table :

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
27
28
29
30
31
32
library(data.table)
test <- data.frame(Pays = c("FR", "FR", "FR", "ES", "ES", "ES", "ES"), Ville = c(100,75,33,49,42,25,18))
 
test
  Pays Ville
1   FR   100
2   FR    75
3   FR    33
4   ES    49
5   ES    42
6   ES    25
7   ES    18
 
dt <- data.table(test)
 
dt
  Pays Ville
1   FR   100
2   FR    75
3   FR    33
4   ES    49
5   ES    42
6   ES    25
7   ES    18
 
n <- 3 #ici, on fixe la valeur de n
 
dt[, .SD[n], by = Pays]
 
   Pays Ville
1:   FR    33
2:   ES    25