Position ausweicht nicht für Barplot in ggplot2

Question

Es gab viele Beiträge für diese Art von Frage, und ich habe viele von ihnen versucht, aber Position = "Ausweichen" nicht ausweichen die Balken in der Handlung. Meine Daten sind wie folgt:

+----------------------------------------------------+ 
|    Sps_wk0_wk7 Prot_Delta Seq_Delta  | 
+----------------------------------------------------+ 
| 1 Prevotella_copri_DSM_18205   25 -47.214 | 
| 2 Dorea_longicatena_DSM_13814   -2 12.925 | 
| 3  Acidaminococcus_sp_D21   6  8.328 | 
+----------------------------------------------------+ 

und jedes Mal, wenn ich dies: barplot using ggplot2 und wie Sie Position ausweichen sieht nicht. Ich wollte etwas wie folgt aus: barplot using Excel Dies ist der Code, den ich versucht habe:

ggplot(proteogenomic_diff, aes(x=Sps_wk0_wk7))+ 
    geom_bar(aes(y=Prot_Delta, group=Prot_Delta, fill="blue"), stat="identity", width=0.10)+ 
    geom_bar(aes(y=Seq_Delta, group=Seq_Delta, position="dodge", fill="Orange"), stat="identity", width=0.10) 

Die anderen Varianten des Codes hält mich eine Fehlermeldung und produzieren nicht einmal ein Grundstück. Kann mir bitte jemand in die richtige Richtung zeigen. Meine erste Frage an SO so entschuldigt, wenn der Code oder die Tabelle nicht korrekt formatiert ist. Ich kann das leicht in Excel machen, lerne aber R, und ich möchte nur wissen, warum R nicht eine ähnliche Art von Handlung produziert? Danke!

Answer 1

Sie müssen Ihre Daten in langen Format schmelzen zuerst:

library(reshape2) 
proteogenomic_diff.m <- melt(proteogenomic_diff) 

ggplot(proteogenomic_diff.m, aes(x = Sps_wk0_wk7, y = value, group = variable, fill = variable)) + 
    geom_bar(stat="identity", position = position_dodge(width = .1), width = .1)