2017-12-23 15 views
1

Wo und wie gebe ich Farben, Achsenlinien und die Entfernung von Hintergrund in Geombar an? Letztendlich möchte ich einen Balken dunkelgrau und einen Balken hellgrau haben. Sie sind derzeit blau und pink, die Standardwerte waren. Ich möchte auch, dass das x und y Achsenlinien haben und die Figur keinen grauen Hintergrund haben soll. Ich habe alles andere herausgefunden, mit dem untenstehenden Code. Danke für Ihre Hilfe.Angeben von Farben, Achsenlinien und Entfernen von Hintergrund in ggplot2

library(ggplot2) 
dodge <- position_dodge(width = 0.9) 
limits <- aes(ymax = myData$mean + myData$se, 
       ymin = myData$mean - myData$se) 

p <- ggplot(data = myData, aes(x = names, y = mean, fill = names)) + 

p + geom_bar(stat = "identity", position = dodge) + 
    geom_errorbar(limits, position = dodge, width = 0.9) + 
    theme(axis.text.x=element_blank(), axis.ticks.x=element_blank(), 
     axis.title.x=element_blank()) 
limits <- aes(ymax = myData$mean + myData$se, 
       ymin = myData$mean - myData$se) 

p <- ggplot(data = myData, aes(x = factor(site), y = mean, 
           fill = factor(infectionstatus))) 

p + geom_bar(stat = "identity", 
     position = position_dodge(0.9)) + 
    geom_errorbar(limits, position = position_dodge(0.9), 
      width = 0.25) + 
    labs(x = "Sites", y = "Average Calories in White Muscle Tissue") + 
    scale_fill_discrete(name = "Infection Status") 

Antwort

1

Sie wollten wohl so etwas wie folgt aus:

# Generate data 
myData <- data.frame(names = letters[1:2], 
        mean = 1:2, 
        SE = 0.1) 

# Plot data 
library(ggplot2) 
ggplot(myData, aes(names, mean)) + 
    geom_bar(aes(fill = names), 
      stat = "identity", position = "dodge") + 
    geom_errorbar(aes(ymin = mean - SE, ymax = mean + SE), 
      position = position_dodge(width = 0.5), width = 0.5) + 
    labs(title = "Calorie Amount", 
     subtitle = "Averaged per Tissue", 
     x = NULL, 
     y = "Average Calories in White Muscle Tissue", 
     fill = "Infection Status") + 
    scale_fill_manual(values = c("grey40", "grey60")) + 
    theme_classic() + 
    theme(axis.text.x = element_blank(), 
      axis.ticks.x = element_blank(), 
      axis.title.x = element_blank()) 

enter image description here

I theme_classic() verwendet, da es die meisten der Arbeit erledigt, wenn Sie saubere Grundstück wollen. Und bestimmte Farben mit scale_fill_manual(values = c("grey40", "grey60"))

+0

@Mary können Sie bitte meine Antwort akzeptieren, wenn es Ihr Problem gelöst hat – PoGibas

Verwandte Themen