Legende hinzufügen
Verfasst: Di Nov 05, 2019 2:40 pm
Nochmal hallo von mir,
leider komme ich nach mehreren Stunden suchen im Netz nicht weiter. Ich möchte gerne eine Grafik erstellen die die Preise von Kohle, Erdgas und Strom abbildet. (Kohle=coal, Erdags=gas, Strom=ebase). Mein Dataframe heißt "daten" (ja sehr einfallsreich ich weiß )
Ich bin schon dahinter gekommen wie ich meine Grafik erstelle und auch die verschiedenen Farben anzeigen lasse. Mein Code sieht bis jetzt wie folgt aus:
Auf der X-Achse sind jeweils die Jahresdaten von 2013 bis 2018 abgebildet. Auch die Schriftgröße der Achsen habe ich angepasst. Jetzt möchte ich aber noch eine Legende hinzufügen, die mir die ausgewiesenen Farben abbildet. Diese Legende braucht keine Überschrift und sollte für Blau = Erdgas, Grau = Kohle und Schwarz = Strom ausgeben. Ich habe es schon mehrmals mit der Funktion scale_colour_manual versucht, jedoch nichts rausbekommen. Die meisten Beispiele im Internet bilden einfach eine ganze Spalte ab und färben die einzelnen Einträge farblich, da bin ich dann auch nicht weitergekommen...
Vielleicht weiß von Euch ja einer wie ich das gelöst bekomme?
leider komme ich nach mehreren Stunden suchen im Netz nicht weiter. Ich möchte gerne eine Grafik erstellen die die Preise von Kohle, Erdgas und Strom abbildet. (Kohle=coal, Erdags=gas, Strom=ebase). Mein Dataframe heißt "daten" (ja sehr einfallsreich ich weiß )
Ich bin schon dahinter gekommen wie ich meine Grafik erstelle und auch die verschiedenen Farben anzeigen lasse. Mein Code sieht bis jetzt wie folgt aus:
Code: Alles auswählen
ggplot(daten, aes(x = daten$datum)) +
geom_line(aes(y=daten$gas), colour = "blue", show.legend = TRUE) +
geom_line(aes(y=daten$coal), colour = "grey", show.legend = TRUE) +
geom_line(aes(y=daten$ebase), colour = "black", show.legend = TRUE) +
labs(x = "", y = "Euro in Mwh") + theme(axis.title.y = element_text(size=10)) +
scale_x_date(date_breaks = "1 year", date_labels = "%Y")
Vielleicht weiß von Euch ja einer wie ich das gelöst bekomme?