Discussion :

[pitchu]

Bonjour,

Je voudrais savoir comment faire la moyenne des colonnes score1 et score2 pour un même couple id et name

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
# Exemple:
dt1 <- matrix(ncol = 4)
colnames(dt1) <- c("id", "name", "score1", "score2")
dt2 <- data.frame("id" = (1:2), "name" = c("a", "b"),
                 "score1" =  c(sample(1:10, 2)) , 
                 "score2" = c(sample(1:10, 2)))
dt1 <- rbind(dt1, dt2)
dt2 <- data.frame("id" = (1:2), "name" = c("a", "b"),
                  "score1" =  c(sample(1:10, 2)) , 
                  "score2" = c(sample(1:10, 2)))
dt1 <- rbind(dt1, dt2)
dt1 <- dt1[-1, ]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
> dt1
  id name score1 score2
  1    a      2      1
  2    b      7      9
  1    a     10      2
  2    b      2      4
 
# resultat
  id name score1 score2
  1    a      6      1.5
  2    b      4.5      6.5

[pitchu]

J'ai trouvé une solution

Code :

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

1
2
3
 
library(dplyr)
dt1 %>% group_by(id, name) %>% summarise_each(funs(mean))

[mgdondon]

Bonjour,

Une solution avec la fonction aggregate :

Code :

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

1
2
3
4
5
6
7
8
9
10
> dt1 <- data.frame(id=c(1,2,1,2),
+                   name=c("a","b","a","b"),
+                   score1=c(2,7,10,2),
+                   score2=c(1,9,2,4))
> dt1
  id name score1 score2
1  1    a      2      1
2  2    b      7      9
3  1    a     10      2
4  2    b      2      4

Code :

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

1
2
3
4
> aggregate(cbind(score1,score2) ~ id+name, data=dt1, mean)
  id name score1 score2
1  1    a    6.0    1.5
2  2    b    4.5    6.5

Cordialement,