Darstellung innerhalb der Legende ändern?

Wie erstelle ich Grafiken, was ist zu beachten?

Moderatoren: EDi, jogo

Antworten
Isegrim
Beiträge: 13
Registriert: Di Feb 02, 2021 11:18 pm

Darstellung innerhalb der Legende ändern?

Beitrag von Isegrim »

Hallo,
der folgende Code gibt mir eine Grafik zu zwei Dichten aus. Allerdings ist in der Legende der Verweis als farbiges Quadrat dargestellt. Wie kann ich das zu einem normalen (entsprechend farbigen) Strich bekommen?

Danke für die Hilfe...
P.S. ohne die Daten ist der Code natürlich nicht direkt lauffähig, sorry...

Code: Alles auswählen

daten1 <- read.table("Experiment II - Tagesumsaetze - alle Probanden.csv",
                    dec = ",", header = FALSE, sep = ";")

daten1 <- data.frame(V1 = c(t(daten1)), stringsAsFactors=FALSE)

daten2 <- read.table("Experiment II - Tagesumsaetze - Ausgangssituation.csv",
                     dec = ",", header = FALSE)
library(ggplot2)

p <- ggplot() + 
  geom_density(data=daten1, aes(x = V1, color="Daten1"), alpha=0.5, linetype="solid") + 
  geom_density(data=daten2, aes(x = V1, color="Daten2"), alpha=0.5, linetype="solid") + 
  scale_color_manual("", 
                     values=c("Daten1"="dodgerblue3", "Daten2"="orange"), 
                     labels=c("Dichte der neuen Tagesumsätze über alle Probanden", "Dichte der Tagesumsätze im Ausgangsdatensatz"),
                     guide=guide_legend(override.aes=list(linetype=c("solid","solid"), shape=c(NA,NA)))) + 
  theme(legend.position=c(0.8, 0.8),
        legend.background = element_blank(),
        legend.text=element_text(color="grey28"))

print(p)


Bild
Athomas
Beiträge: 768
Registriert: Mo Feb 26, 2018 8:19 pm

Re: Darstellung innerhalb der Legende ändern?

Beitrag von Athomas »

Du hast die Problematik der fehlenden Daten schon richtig erkannt.
Solange Du keine Spieldaten lieferst, hier zwei eher vage Tipps:
Antworten