So ändern Sie den Legendentitel in ggplot

Ich habe die folgende Handlung wie unten. Es wurde mit diesem Befehl erstellt:

library(ggplot2)

df <- data.frame(cond = factor(rep(c("A", "B"), each = 200)), 
                 rating = c(rnorm(200), rnorm(200, mean=.8)))

ggplot(df, aes(x=rating, fill=cond)) + 
geom_density(alpha = .3) +
xlab("NEW RATING TITLE") +
ylab("NEW DENSITY TITLE")

Als nächstes möchte ich den Legendentitel von cond in NEW LEGEND TITLE ändern .

Also habe ich einfach die folgende Zeile hinzugefügt und das Ende des obigen Codes hinzugefügt:

+labs(colour="NEW LEGEND TITLE")

Aber es funktioniert nicht. Was ist der richtige Weg, um es zu tun?

Das sollte funktionieren:

p <- ggplot(df, aes(x=rating, fill=cond)) + 
           geom_density(alpha=.3) + 
           xlab("NEW RATING TITLE") + 
           ylab("NEW DENSITY TITLE")
p <- p + guides(fill=guide_legend(title="New Legend Title"))

(oder alternativ)

p + scale_fill_discrete(name = "New Legend Title")

Ich habe mich nicht viel damit beschäftigt, aber weil du fill = cond in ggplot () verwendet hast,

 + labs(color='NEW LEGEND TITLE') 

könnte nicht funktioniert haben. Wie auch immer Sie Farbe durch Füllen ersetzen , es funktioniert!

+ labs(fill='NEW LEGEND TITLE') 

Dies hat bei mir in ggplot2_2.1.0 funktioniert

Da Sie zwei Dichten haben, kann es sein, dass Sie Ihre eigenen Farben einstellen möchten scale_fill_manual.

Wenn ja, können Sie Folgendes tun:

df <- data.frame(x=1:10,group=c(rep("a",5),rep("b",5)))

legend_title <- "OMG My Title"

ggplot(df, aes(x=x, fill=group)) + geom_density(alpha=.3) +   
    scale_fill_manual(legend_title,values=c("orange","red"))

Keiner der oben genannten Codes hat bei mir funktioniert.

Folgendes habe ich gefunden und es hat funktioniert.

labs(color = "sale year")

Sie können auch ein Leerzeichen zwischen dem Titel und der Anzeige einfügen, indem Sie \nam Ende hinzufügen .

labs(color = 'sale year\n")

Da Sie in Ihrem Code ggplot(data, fill= cond)das Histogramm erstellt haben, müssen Sie den Legendentitel hinzufügen, indem Sie auch "Beschriften" im Beschriftungsabschnitt verwenden, d +labs(fill="Title name"). H. Wenn Sie einen anderen Plottyp verwenden, bei dem der Code ggplot war (Daten, Farbe = Kond), können Sie diesen verwenden +labs(colour= "Title Name"). Zusammenfassend muss das Laborargument mit dem Argument aes übereinstimmen.

Ich habe + guides(fill=guide_legend("my awesome title"))den Legendentitel in geom_bar-Plots geändert, aber es schien für geom_point nicht zu funktionieren.

Es gibt eine andere sehr einfache Antwort, die für einige einfache Diagramme funktionieren kann.

Fügen Sie einfach einen Aufruf von guide_legend () in Ihr Diagramm ein.

ggplot(...) + ... + guide_legend(title="my awesome title")

Wie in den sehr schönen ggplot-Dokumenten gezeigt .

Wenn dies nicht funktioniert, können Sie Ihre Guide-Parameter mit einem Aufruf von Guides genauer einstellen :

ggplot(...) + ... + guides(fill=guide_legend("my awesome title"))

Sie können auch die Form / Farbe / Größe variieren, indem Sie diese Parameter auch für Ihren Anruf guidesangeben.

Nur um der Liste hinzuzufügen (die anderen Optionen hier haben bei mir nicht funktioniert), können Sie auch die Funktion update_labels für ggplot verwenden:

p <- ggplot(df, aes(x=rating, fill=cond)) + 
           geom_density(alpha=.3) + 
           xlab("NEW RATING TITLE") + 
           ylab("NEW DENSITY TITLE")

update_labels(p, list(colour="MY NEW LEGEND TITLE")

Auf diese Weise können Sie auch die Beschriftungen der x- und y-Achse mit separaten Zeilen ändern:

update_labels(p, list(x="NEW X LABEL",y="NEW Y LABEL")

Ich habe festgestellt, dass es zwei Möglichkeiten gibt, legend.title für ggboxplot () zu ändern / anzugeben:

library(ggpubr)

bxp.defaultLegend <- ggboxplot(ToothGrowth, x = "dose", y = "len",
                               color = "dose", palette = "jco")

# Solution 1, setup legend.title directly in ggboxplot()
bxp.legend <- ggboxplot(ToothGrowth, x = "dose", y = "len",
                 color = "dose", palette = "jco", legend.title="Dose (mg)")

# Solution 2: Change legend title and appearnace in ggboxplot() using labs() and theme() option:
plot1 <-  bxp.defaultLegend + labs(color = "Dose (mg)") +
  theme(legend.title = element_text(color = "blue", size = 10), legend.text = element_text(color = "red"))

ggarrange(list(bxp.legend, bxp.defaultLegend, plot1), nrow = 1, ncol = 3,  common.legend = TRUE)

Der Code wird basierend auf dem Beispiel von GitHub geändert .

Ich verwende ein facet_wrap in meinem ggplot und keine der vorgeschlagenen Lösungen hat für mich funktioniert, außer der Lösung von ArnaudA:

qplot(…) + guides(color=guide_legend(title="sale year")) 

Viele Leute verbringen viel Zeit damit, Beschriftungen, Legendenbeschriftungen, Titel und die Namen der Achse zu ändern, weil sie nicht wissen, dass es möglich ist, Tabellen in R zu laden, die Leerzeichen enthalten " ". Sie können dies jedoch tun, um Zeit zu sparen oder die Größe Ihres Codes zu verringern, indem Sie die Trennzeichen angeben, wenn Sie eine Tabelle laden, die beispielsweise durch Tabulatoren (oder ein anderes Trennzeichen als das Standardtrennzeichen oder ein einzelnes Leerzeichen) begrenzt ist:

read.table(sep = '\t')

oder indem Sie die Standardladeparameter des CSV-Formats verwenden:

read.csv()

Dies bedeutet, dass Sie den Namen direkt "NEW LEGEND TITLE"als Spaltennamen (Kopfzeile) in Ihrer ursprünglichen Datendatei behalten können, um zu vermeiden, dass in jedem Diagramm ein neuer Legendentitel angegeben wird.

ggplot(df) + labs(legend = '<legend_title>')