Problèmes avec fonction d'agrégation R

Question

Je suis en train de consolider des données et, malheureusement, il semble que je vais avoir une certaine perte ...

dataframe <- Project Subproject  Value  Date 
       A   1    9  2017-03-08 
       A   2    5  2017-03-08 
       B   1    1  2017-03-08 

overall <- aggregate(dataframe$Valeu, by=list(Date=dataframe$Date, Project=dataframe$Project), FUN=sum) 

va me revenir à seulement ceci:

dataframe <- Project  Value  Date 
       A   14  2017-03-08 

quand ce que je veux est cette mise à jour

dataframe <- Project Value  Date 
       A   14  2017-03-08 
       B   1  2017-03-08 

: J'ai essayé à nouveau avec la solution proposée et bien que R me dit qu'il ya un projet B dans mon dataframe avec lesdites valeurs et dates, mon ggplot me dit autrement ...

ggplot(data = dataframe, aes(x = Date, y = Value, fill = Project)) + 
    geom_bar(stat = 'identity') + geom_text(data = dataframe, aes(label = Value, fill = Project), size=4) 

Il complote que les données du projet A, peu importe ce que je fais. Cependant, si je ne résume pas/agréger les données, les deux projets seront pour moi normaux, mais le géomouvera continuera à donner la barre pour le projet A les deux nombres séparément. Mon objectif général est d'avoir une trame de données qui est agrégée comme je l'ai pour que je puisse tracer mes données agrégées proprement avec mes geom_text étiquetage des barres correctement ...

Answer 1

vous pouvez essayer:

df %>% 
    group_by(Project, Date)%>% 
    summarise(Value = sum(Value)) 

qui donne:

Project  Date Value 

1  A 2017-03-08 14 
2  B 2017-03-08  1 

et peut être tracée comme ggplot(data = df, aes(x = Date, y = Value, fill = Project)) + geom_bar(stat = 'identity')

modifier 1: basé sur le commentaire de l'OP, pour enregistrer la sortie dans la trame de données, utilisez quelque chose comme df %<>% ... au lieu de df %>% ... de la bibliothèque magrittr